Mysaa/pieuvre
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add space

Browse Source
This commit is contained in:
Adrien Vannson 2022-05-17 10:40:27 +02:00
parent 3c95807b7b
commit d15da6c958
No known key found for this signature in database
GPG Key ID: FE2E66FD978C1A55
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pieuvre.ml
View File

@ -18,7 +18,7 @@ let rec string_of_ty (t: ty) : string =
| TSimple(tn) -> tn
| TImpl(t1,t2) -> "(" ^ (string_of_ty t1) ^ " -> " ^ (string_of_ty t2) ^ ")"
| TAnd(t1,t2) -> "(" ^ (string_of_ty t1) ^ " /\\ " ^ (string_of_ty t2) ^ ")"
| TOr(t1,t2) -> "(" ^ (string_of_ty t1) ^ "\\/ " ^ (string_of_ty t2) ^ ")"
| TOr(t1,t2) -> "(" ^ (string_of_ty t1) ^ " \\/ " ^ (string_of_ty t2) ^ ")"
| TFalse -> "False"
| TTrue -> "True"
;;