184 ("", "pttrn => pttrns", Delimfix "_"), |
184 ("", "pttrn => pttrns", Delimfix "_"), |
185 ("_pttrns", "[pttrn, pttrns] => pttrns", Mixfix ("_/ _", [1, 0], 0)), |
185 ("_pttrns", "[pttrn, pttrns] => pttrns", Mixfix ("_/ _", [1, 0], 0)), |
186 ("", "id => aprop", Delimfix "_"), |
186 ("", "id => aprop", Delimfix "_"), |
187 ("", "longid => aprop", Delimfix "_"), |
187 ("", "longid => aprop", Delimfix "_"), |
188 ("", "var => aprop", Delimfix "_"), |
188 ("", "var => aprop", Delimfix "_"), |
189 ("_BIND", "id => aprop", Delimfix "??_"), |
|
190 ("_DDDOT", "aprop", Delimfix "..."), |
189 ("_DDDOT", "aprop", Delimfix "..."), |
191 ("_aprop", "aprop => prop", Delimfix "PROP _"), |
190 ("_aprop", "aprop => prop", Delimfix "PROP _"), |
192 ("", "prop => asms", Delimfix "_"), |
191 ("", "prop => asms", Delimfix "_"), |
193 ("_asms", "[prop, asms] => asms", Delimfix "_;/ _"), |
192 ("_asms", "[prop, asms] => asms", Delimfix "_;/ _"), |
194 ("_bigimpl", "[asms, prop] => prop", Mixfix ("((3[| _ |])/ ==> _)", [0, 1], 1)), |
193 ("_bigimpl", "[asms, prop] => prop", Mixfix ("((3[| _ |])/ ==> _)", [0, 1], 1)), |
197 ("_TYPE", "type => logic", Delimfix "(1TYPE/(1'(_')))"), |
196 ("_TYPE", "type => logic", Delimfix "(1TYPE/(1'(_')))"), |
198 ("_K", "_", NoSyn), |
197 ("_K", "_", NoSyn), |
199 ("", "id => logic", Delimfix "_"), |
198 ("", "id => logic", Delimfix "_"), |
200 ("", "longid => logic", Delimfix "_"), |
199 ("", "longid => logic", Delimfix "_"), |
201 ("", "var => logic", Delimfix "_"), |
200 ("", "var => logic", Delimfix "_"), |
202 ("_BIND", "id => logic", Delimfix "??_"), |
|
203 ("_DDDOT", "logic", Delimfix "...")]; |
201 ("_DDDOT", "logic", Delimfix "...")]; |
204 |
202 |
205 val pure_appl_syntax = |
203 val pure_appl_syntax = |
206 [("_appl", "[('b => 'a), args] => logic", Mixfix ("(1_/(1'(_')))", [SynExt.max_pri, 0], SynExt.max_pri)), |
204 [("_appl", "[('b => 'a), args] => logic", Mixfix ("(1_/(1'(_')))", [SynExt.max_pri, 0], SynExt.max_pri)), |
207 ("_appl", "[('b => 'a), args] => aprop", Mixfix ("(1_/(1'(_')))", [SynExt.max_pri, 0], SynExt.max_pri))]; |
205 ("_appl", "[('b => 'a), args] => aprop", Mixfix ("(1_/(1'(_')))", [SynExt.max_pri, 0], SynExt.max_pri))]; |