formlessField ::
  forall t form st act m sym e o t1 inputs i r q.
  IsSymbol sym =>
  Newtype (form Variant F.InputFunction) (Variant inputs) =>
  Cons sym (F.InputFunction e t o) t1 inputs =>
  FieldConfig sym ->
  F.PublicState form st ->
  H.Component HH.HTML q i (ComponentMessage t) m ->
  i ->
  F.ComponentHTML form act (ChildSlots t q r) m
formlessField config state component i =

wtype (form Variant F.InputFunction) (Variant inputs) =>
  Cons sym (F.InputFunction e t o) t1 inputs =>
И

F.Component OrderForm (Const Void) (ChildSlots + (DF.ChildSlots DT.Truck (S.Query')) + (DF.ChildSlots String q)  +  r) Unit Order m