sig
  val genr_values :
    Tgenr_base.randomize ->
    Tgenr_base.max_length ->
    Tgenr_base.nesting_depth ->
    Parsetree.type_declaration -> Parsetree.core_type list -> Code.exp list
  val genr_core_values :
    Tgenr_base.randomize ->
    Tgenr_base.max_length ->
    Tgenr_base.nesting_depth -> Parsetree.core_type -> Code.exp list
end