anchor.diff:                  <*> Controls.Select HU [HU, "Hungary"; FR, "France"]
                   |> Formlet.Horizontal)
   //        Formlet.Many f1
  +//        |> Formlet.WithSubmit "Submit"
           Formlet.Do {
               let! res =
                   manyModel
  
positive.code:     type Country =
          | [<Constant "HU">] HU
          | [<Constant "FR">] FR
  
      let Pair flX flY =
          Formlet.Return (fun x y -> (x, y))
  
negative.code:             return! Formlet.OfDoc (fun () ->
                  res
                  |> Seq.map (fun (b, c, d) ->
                      Console.Log d
                      p [text (sprintf "%s %b %s" b c (Country.ToString d))]
                      :> Doc)
                  |> Doc.Concat)
          }
          |> Formlet.WithFormContainer
          |> Formlet.RunWithLayout Layout.Table (fun x ->
              JS.Window?foo <- x)
  
  module Server =
  