(allowed ()
      "!work" "@lib.css" )

   (load "@lib/http.l" "@lib/xhtml.l" "@lib/form.l")

   (class +User +Entity)
   (rel username (+Need +Sn +Idx +String))
   (rel password (+String))
   (rel px (+Number))      
   (rel py (+Number))      
   (rel appearance (+String))   
   (rel login (+Date))       
   (rel created (+Date))       

   (de work ()
      (app)
      (action
         (html 0 "MMO Project" "@lib.css" NIL
	       (<h1> NIL "hello world!") ) ) )

   (de main ()
      (locale "US")
      (pool "users.db") )

   (de go ()
      (server 8080 "!work") )