/* Debug compose function in detail */

/* Create simple functions */
double : x -> x * 2;
add1 : x -> x + 1;

/* Test individual functions */
test1 : double 5;
test2 : add1 5;
..out test1;
..out test2;

/* Test composition step by step */
step1 : add1 5;
step2 : double step1;
..out step1;
..out step2;

/* Test compose function */
composed : compose(double, add1);
result : composed 5;
..out result;