mirror of
https://github.com/anoma/juvix.git
synced 2024-11-30 14:13:27 +03:00
12 lines
158 B
Plaintext
12 lines
158 B
Plaintext
|
module RecordProjectionSignature;
|
||
|
|
|
||
|
|
import Stdlib.Data.Nat open;
|
||
|
|
|
||
|
|
trait
|
||
|
|
type R A := mkR@{fun : (n : A) -> A};
|
||
|
|
|
||
|
|
f {{R Nat}} : Nat :=
|
||
|
|
R.fun@{
|
||
|
|
n := 1;
|
||
|
|
};
|