IFNDEF UNDEFINED_VARIABLE THEN
DEFINE SQUARE (x) = x * x ;;
DEFINE DOUBLE_SQUARE (x) = (SQUARE x) * 2 ;;
END;;
Printf.printf "%d\n" (DOUBLE_SQUARE(42)) ;;