/* Debug test for equals function */

/* Test equals directly */
result1 : equals 5 3;
..out "equals 5 3:";
..out result1;

result2 : equals 0 0;
..out "equals 0 0:";
..out result2;

/* Test is_zero function */
is_zero : x -> equals x 0;
result3 : is_zero 0;
..out "is_zero 0:";
..out result3;

result4 : is_zero 5;
..out "is_zero 5:";
..out result4;

/* Test map with is_zero */
test_values : {0, 1, 2};
zero_test : map @is_zero test_values;
..out "map @is_zero {0, 1, 2}:";
..out zero_test;