link graphics
procedure main()
   WOpen("size=100,20") | stop("No window")
   WWrites("Goodbye, World!")
   WDone()
end