mirror of
https://github.com/anoma/juvix.git
synced 2025-01-06 06:53:33 +03:00
f9d9b10fc9
* New target syntax and modular VP examples * [ .gitignore ] updated * Fix spaces new lines * Remove outdated lab folder
30 lines
561 B
Plaintext
30 lines
561 B
Plaintext
module Prelude;
|
|
|
|
import Data.Bool;
|
|
import Data.Int;
|
|
import Data.List;
|
|
import Data.Maybe;
|
|
import Data.Pair;
|
|
import Data.String;
|
|
import System.IO;
|
|
|
|
open Data.Bool;
|
|
open Data.Int;
|
|
open Data.List;
|
|
open Data.Maybe;
|
|
open Data.Pair;
|
|
open Data.String;
|
|
open System.IO;
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- Functions
|
|
--------------------------------------------------------------------------------
|
|
|
|
const : (A : Type) → (B : Type) → A → B → A;
|
|
const _ _ a _ ≔ a;
|
|
|
|
id : (A : Type) → A → A;
|
|
id _ a ≔ a;
|
|
|
|
end;
|