Idris2/tests/idris2/total011/Issue1859.idr
2021-08-27 16:18:24 +01:00

7 lines
123 B
Idris

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