diff options
| author | Josh Chen | 2020-05-24 20:44:12 +0200 |
|---|---|---|
| committer | Josh Chen | 2020-05-24 20:44:12 +0200 |
| commit | 6f37e6b72905eff8f2c7078823e5577bc5b55eb0 (patch) | |
| tree | f841eba732061e25d9be00ad963733290a3c7dfb | |
| parent | 720da0f918118388d114e09664b129d2b29be2b1 (diff) | |
small comment
| -rw-r--r-- | spartan/lib/lib.ML | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/spartan/lib/lib.ML b/spartan/lib/lib.ML index fd5c597..615f601 100644 --- a/spartan/lib/lib.ML +++ b/spartan/lib/lib.ML @@ -78,6 +78,8 @@ val type_of_typing = #2 o dest_typing fun mk_Pi v typ body = Const (\<^const_name>\<open>Pi\<close>, dummyT) $ typ $ lambda v body fun typing_of_term tm = \<^const>\<open>has_type\<close> $ tm $ Var (("*?", 0), \<^typ>\<open>o\<close>) +(*The above is a bit hacky; basically we need to guarantee that the schematic + var is fresh*) (** Goals **) |