TEMPLATE FUNCTION Duplicate(Value : T) RETURNS T RETURN Value ENDFUNCTION TEMPLATE PROCEDURE NotLast() ENDPROCEDURE TEMPLATE PROCEDURE TwoPacks() ENDPROCEDURE TEMPLATE TYPE Alias = ^T TEMPLATE OVERLOAD FUNCTION OPERATOR+(Value : T) RETURNS T RETURN Value ENDFUNCTION IF TRUE THEN TEMPLATE PROCEDURE Nested(Value : T) OUTPUT 99 ENDPROCEDURE ENDIF CLASS Outer TEMPLATE PROCEDURE Member(Value : T) ENDPROCEDURE ENDCLASS TEMPLATE <> PROCEDURE Empty() ENDPROCEDURE OUTPUT 0