EG
Size: a a a
EG
p
p
p
а
а
а
p
p
p
p
EG
nontotal : Int -> Type
nontotal x = nontotal x
foo : (nontotal 0) -> (nontotal 0)
foo x = foo x
main : IO ()
main = putStrLn (foo "x")
p
nontotal : Int -> Type
nontotal x = nontotal x
foo : (nontotal 0) -> (nontotal 0)
foo x = foo x
main : IO ()
main = putStrLn (foo "x")
EG
nontotal 0 имеет тип TypeEG
nontotal 0 не вернёт String никогда?p
nontotal 0 не вернёт String никогда?EG
p
p