src/HOL/HOL.thy

     and "!(if (_)/ then (_)/ else (_))")
   (OCaml "true" and "false" and "not"
     and infixl 3 "&&" and infixl 2 "||"
     and "!(if (_)/ then (_)/ else (_))")
   (Haskell "True" and "False" and "not"
-    and infixl 3 "&&" and infixl 2 "||"
+    and infixr 3 "&&" and infixr 2 "||"
     and "!(if (_)/ then (_)/ else (_))")
   (Scala "true" and "false" and "'! _"
     and infixl 3 "&&" and infixl 1 "||"
     and "!(if ((_))/ (_)/ else (_))")