hello: procedure options(main);
   put skip list('Hello world.');
end hello;