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;