Idris2/tests/idris2/total/total011/Issue1859.idr
2023-09-07 14:57:22 +01:00

7 lines
123 B
Idris

%default total
fix : Void
fix = case the (Either () Void) (Left ()) of
Left () => fix
Right p => absurd p