/* Test pipe function */

f : x -> x * 2;
g : x -> x + 1;

/* Test pipe function */
result : pipe(f, g) 5;
..out result;