MODULE example ;

DCL
  integer value := 42 ;

BEGIN
  OUT("The answer is ", value, newline) ;

END example . ;