TYPE
 a = a1:INT
     a2:STR ;
 b = INT * STR ;
 c = INT + INT + STR ;
 d = INT * INT * STR ;
 e = d * c ;
ENDTYPE

f1(x)= x .+ 3 ;
f2(x)= x .+ 33 ;
f3(x)= x ++ "e mesmo" ++ x ;

a1 <- a(12,"a1");
b1 <- b(12,"a1");

c1 <- c(1,12);
c2 <- c(2,222222);
c3 <- c(3,"c3");

d1 <- d(12,333333,"d1");

e1 <- e(d1,c3);

m <- (f1 _x_ f2 _x_ f3)(d1);
n <- (f1 _x_ f2 _x_ f3)(<12,13,"batata">);
o <- (f1×f3)(a1);   /* using a non ascii char × (alt shit w) */
p <- ((f1 × f2 × f3) × (f1 _+_ f2 _+_ f3))(e1);