equal
deleted
inserted
replaced
11 end; |
11 end; |
12 |
12 |
13 structure BNF_LFP_Compat : BNF_LFP_COMPAT = |
13 structure BNF_LFP_Compat : BNF_LFP_COMPAT = |
14 struct |
14 struct |
15 |
15 |
|
16 open Ctr_Sugar |
16 open BNF_Util |
17 open BNF_Util |
17 open BNF_Ctr_Sugar |
|
18 open BNF_FP_Util |
18 open BNF_FP_Util |
19 open BNF_FP_Def_Sugar |
19 open BNF_FP_Def_Sugar |
20 open BNF_FP_N2M_Sugar |
20 open BNF_FP_N2M_Sugar |
21 |
21 |
22 fun dtyp_of_typ _ (TFree a) = Datatype_Aux.DtTFree a |
22 fun dtyp_of_typ _ (TFree a) = Datatype_Aux.DtTFree a |