2021-05-13 20:44:24 +03:00
|
|
|
1/1: Building Test (Test.idr)
|
2021-08-03 16:19:17 +03:00
|
|
|
Error: No unrestricted arguments of type `Integer` found for natToMyNat.
|
2021-05-13 20:44:24 +03:00
|
|
|
|
2021-06-05 14:53:22 +03:00
|
|
|
Test:20:1--20:37
|
2021-05-13 20:44:24 +03:00
|
|
|
16 | natToMyNat : Nat -> MyNat
|
|
|
|
17 | natToMyNat Z = Z
|
|
|
|
18 | natToMyNat (S k) = S $ natToMyNat k
|
|
|
|
19 |
|
|
|
|
20 | %builtin IntegerToNatural natToMyNat
|
|
|
|
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
|
|
|
|
|
|
|
|
Error: Return type is not a 'Nat'-like type
|
|
|
|
|
2021-06-05 14:53:22 +03:00
|
|
|
Test:25:1--25:42
|
2021-05-13 20:44:24 +03:00
|
|
|
21 |
|
|
|
|
22 | integerToNotNat : Integer -> Maybe String
|
|
|
|
23 | integerToNotNat x = Just "Boo"
|
|
|
|
24 |
|
|
|
|
25 | %builtin IntegerToNatural integerToNotNat
|
|
|
|
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
|
|
|
|
|
|
|
|
Main> Bye for now!
|