changeset 632 | f9a3f77f71e8 |
parent 615 | 84ac5f101bd1 |
child 675 | 59a4fa76b590 |
631:8bc44f7bbab8 | 632:f9a3f77f71e8 |
---|---|
218 ML |
218 ML |
219 |
219 |
220 (* 'Dependent' type operators *) |
220 (* 'Dependent' type operators *) |
221 |
221 |
222 val print_translation = |
222 val print_translation = |
223 [("Pi", dependent_tr' ("@PROD", "->")), |
223 [("Pi", dependent_tr' ("@PROD", "op ->")), |
224 ("Sigma", dependent_tr' ("@SUM", "*"))]; |
224 ("Sigma", dependent_tr' ("@SUM", "op *"))]; |