mirror of
https://github.com/anoma/juvix.git
synced 2024-12-12 04:43:18 +03:00
336a934d18
* Closes #2032. * Adds the `juvix dev core normalize` command. * Adds the `:n` command in JuvixCore REPL. * Adds the `--normalize` flag to `juvix dev core read` and `juvix dev core from-concrete`. * Adds `pipeline-normalize` which denotes pipeline steps necessary before normalization. * Adds normalization tests in `tests/VampIR/positive/Core`.
14 lines
244 B
Plaintext
14 lines
244 B
Plaintext
-- single-constructor inductive types
|
|
|
|
type Box2 {
|
|
box2 : Int -> Int -> Box2;
|
|
};
|
|
|
|
type Box {
|
|
box : Box2 -> Box;
|
|
};
|
|
|
|
\(x : Int) \(y : Int)
|
|
(\(b : Box) case b of { box u := case u of { box2 x y := x + y } }) (box (box2 x y))
|
|
-- result: 8
|