4.3BSD/usr/contrib/icon/book/01/hello2.icn

procedure main()
   hello()
end

procedure hello()
   write("Hello world")
end