Idris2/tests/idris2/evaluator001/Issue650.idr
G. Allais 4a61146ba0
[ fix #705 ] Normalise primitives in mkPat (#718)
[ log ] prettier log for pats & clauses
[ re #650 ] Even lazier
[ fix #705 ] normalise primitives in mkPat
[ refactor ] introduce getPrimitiveNames
2020-10-02 12:22:57 +01:00

11 lines
174 B
Idris

%default total
isNat : Type -> Bool
isNat Nat = True
isNat (List Char) = False
isNat Int = False
isNat _ = False
trivialEquality : isNat Int = False
trivialEquality = Refl