1 2 3 4 5 6
CLASS Box PROCEDURE NEW() ENDPROCEDURE PROCEDURE new(Number : INTEGER) ENDPROCEDURE ENDCLASS