mirror of
https://github.com/anoma/juvix.git
synced 2024-12-14 17:32:00 +03:00
74 lines
2.3 KiB
Plaintext
74 lines
2.3 KiB
Plaintext
|
module Ape;
|
||
|
axiom String : Type;
|
||
|
|
||
|
infixl 7 *;
|
||
|
axiom * : String → String → String;
|
||
|
|
||
|
infixr 3 -;
|
||
|
axiom - : String → String → String;
|
||
|
|
||
|
infixl 1 >>;
|
||
|
axiom >> : String → String → String;
|
||
|
|
||
|
infixl 6 +;
|
||
|
axiom + : String → String → String;
|
||
|
|
||
|
infixr 6 ++;
|
||
|
axiom ++ : String → String → String;
|
||
|
axiom f : String → String;
|
||
|
|
||
|
x : String;
|
||
|
x := "" + ("" ++ "");
|
||
|
|
||
|
axiom wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww : String → String;
|
||
|
|
||
|
nesting : String;
|
||
|
nesting := wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
(wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
|
||
|
("" + "" + "" + "" + ""))))))))))))))))))));
|
||
|
|
||
|
t : String;
|
||
|
t := "Hellooooooooo"
|
||
|
>> "Hellooooooooo"
|
||
|
>> "Hellooooooooo"
|
||
|
>> "Hellooooooooo"
|
||
|
>> "Hellooooooooo"
|
||
|
>> "Hellooooooooo"
|
||
|
>> "Hellooooooooo"
|
||
|
>> "Hellooooooooo"
|
||
|
+ "Hellooooooooo"
|
||
|
+ "Hellooooooooo"
|
||
|
+ ("Hellooooooooo"
|
||
|
++ "Hellooooooooo"
|
||
|
++ "Hellooooooooo"
|
||
|
++ "Hellooooooooo"
|
||
|
++ "Hellooooooooo"
|
||
|
++ "Hellooooooooo")
|
||
|
+ "Hellooooooooo"
|
||
|
+ "Hellooooooooo"
|
||
|
* "Hellooooooooo"
|
||
|
* "Hellooooooooo"
|
||
|
* "Hellooooooooo"
|
||
|
* "Hellooooooooo"
|
||
|
* "Hellooooooooo"
|
||
|
* "Hellooooooooo";
|
||
|
end;
|