1 2 3 4 5 6 7 8 9 10
INCLUDE "nested/values.cps" CLASS Container Value : INTEGER FUNCTION Read RETURNS INTEGER RETURN Value + Base ENDFUNCTION ENDCLASS TYPE Pair DECLARE Value : INTEGER ENDTYPE