mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-20 18:21:47 +03:00
18 lines
264 B
Idris
18 lines
264 B
Idris
import Data.String
|
|
import Data.Nat
|
|
|
|
%default total
|
|
|
|
posNat : Maybe Nat
|
|
posNat = parsePositive "2"
|
|
|
|
posNatProof : Main.posNat === Just 2
|
|
posNatProof = Refl
|
|
|
|
int : Maybe Integer
|
|
int = parseInteger "-123"
|
|
|
|
integerProof : Main.int === Just (-123)
|
|
integerProof = Refl
|
|
|