procedure main()
  write(&host)
end