include sig ... end
val show_group : group -> 'aval to_group : 'a -> 'b optionval name : unit -> stringval arbitrary : unit -> (V.t * F.t) QCheck.arbitraryval show :
(GoblintCil.varinfo * [< `Left of F.F.t | `Right of F.I.t ] list) ->
stringval pretty :
unit ->
(GoblintCil.varinfo * [< `Left of F.F.t | `Right of F.I.t ] list) ->
GoblintCil.Pretty.docval kill : GoblintCil.varinfo -> ('a * F.t) -> 'a * F.tval replace :
GoblintCil.varinfo ->
GoblintCil.exp ->
('a * ([> `Right of GoblintCil.exp ] as 'b) list) ->
'a * 'b list