1
1
mirror of https://github.com/anoma/juvix.git synced 2024-12-12 14:28:08 +03:00
juvix/tests/Internal/Core/positive/test006.juvix

17 lines
234 B
Plaintext
Raw Normal View History

module test006;
open import Stdlib.Prelude;
open import Stdlib.Data.Nat.Ord;
terminating
loop : Nat;
loop := loop;
e : Nat;
e := (if (3 > 0) 1 loop) + (if (2 < 1) loop (if (7 >= 8) loop 1));
main : IO;
main := printNatLn e;
end;