def tricky =
  let ab = funct(1)
  let cd = 3
  ab + cd


## *_this_*
## does *_this_* work?
## video::https://code.org[Cool]
##
## a list:
## * item1
## * item2
##
## === test
## Double TS language injection goes hard
##
## [source,c]
## ----
## int main() {
##   return 0;
## }
## ----
type t List = 'EOL | 'Cons {hd: t, tl: t List}

# comment

def xa =
  let data = 2
  if data then
    data and other and more
  else 'MyTag myList ++ [4 + 2 * -(4) - 1] = 2^2

## adds two numbers
## together
def add : int -> int -> int =
  a -> b : int -> a + b

def lol =
  let data = 2
  match x with
    a | b -> (match c with y -> 3 | z ->5)
  | c -> 3

def main = 
  let x = 2 ( 5 ) 
  [6 :: int,7,8,"helo world"]
  
  
def example = a -> b -> 1:x => y

extensible union io.Plan
extend io.Plan with 'WriteFile Unit

type a b = {a:Int,b: (Array Of Integ), c: a3}

type ?lol.FullPartial = {}

type t List = with lol: &t2 with cursed: 'Tag [t,t2] List option | 'Case2 | 'Case3 | ...?rem -> int -> float