src/Tools/isac/BaseDefinitions/termC.sml
changeset 60429 6953fb81ebb9
parent 60424 c3acf9c442ac
child 60477 4ac966aaa785
     1.1 --- a/src/Tools/isac/BaseDefinitions/termC.sml	Fri May 27 15:12:54 2022 +0200
     1.2 +++ b/src/Tools/isac/BaseDefinitions/termC.sml	Fri May 27 17:14:49 2022 +0200
     1.3 @@ -75,7 +75,6 @@
     1.4    val parseNEW': Proof.context -> string -> term
     1.5    val parseNEW'': theory -> string -> term
     1.6    val parse_strict: theory -> string -> term
     1.7 -(*val parse: theory -> string -> cterm option*)
     1.8  
     1.9    val parse_patt: theory -> string -> term
    1.10    val perm: term -> term -> bool
    1.11 @@ -556,10 +555,6 @@
    1.12  
    1.13  (* TODO clarify parse with Test_Isac *)
    1.14  fun parse_strict thy str = typ_a2real (Syntax.read_term_global thy str);
    1.15 -fun parse thy str = (* introduced 2010 *)
    1.16 -  \<^try>\<open>
    1.17 -    let val t = parse_strict thy str
    1.18 -    in Thm.global_cterm_of thy t end\<close>;
    1.19  
    1.20  (* parse term patterns; Var ("v",_), i.e. "?v", are required for instantiation
    1.21    WN130613 probably compare to