fun calculate c = concat
[" ",
"Temperature Conversion
",
Int.toString c, " degrees Celcius equals ",
Int.toString (9 * c div 5 + 32),
" degrees Fahrenheit. Go ",
"calculate a new temperature.",
"
Served by ",
"SMLserver "]
val _ = Web.Conn.return
(case FormVar.wrapOpt FormVar.getIntErr "temp_c"
of NONE => "Go back and enter an integer!"
| SOME i => calculate i)