mirror of
https://github.com/anoma/juvix.git
synced 2024-11-30 14:13:27 +03:00
13 lines
191 B
Plaintext
13 lines
191 B
Plaintext
|
-- Overapplication
|
||
|
|
module test062;
|
||
|
|
|
||
|
|
import Stdlib.Data.Nat open;
|
||
|
|
|
||
|
|
{-# inline: false #-}
|
||
|
|
I {A} (x : A) : A := x;
|
||
|
|
|
||
|
|
{-# inline: false #-}
|
||
|
|
I' {A} (x : A) : A := x;
|
||
|
|
|
||
|
|
main : Nat := I' (I I I I 1);
|