/* Test compose function directly */

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

/* Test compose function directly */
composed : compose(f, g);
result : composed 5;
..out result;