GP
Size: a a a
GP
ЗП
GP
GP
forall sym i form v . SProxy sym → i → Variant ( modify ∷ form Variant F.InputFunction | v )
GP
DD
GP
GP
GP
VY
pointForm нет в рекордеGP
type ChildSlots =
( pointForm :: PFSlot Int
, select :: DS.Slot DM.Movers Unit
)
GP
AK
RendersTo view model с функцией render :: model -> view. RendersTo (Html MyMsg) MyInput. в другом RendersTo String MyInput, в третьем RendersTo Canvas MyInput. Но инстансы нельзя делать к алиасам (Html a — алиас) и нельзя делать вне модуля. где определён MyInput. Если бы можно было один и тот же модуль "размазать" по разным файлам, то проблема решилась бы, но, кажется, нельзя...GP
type ChildSlots =
( pointForm :: PFSlot Int
, select :: DS.Slot Movers Unit
)
GP
GP
formComponent :: forall m
. MonadAff m
=> ManageAutocomplete m
=> ManageTruck m
=> F.Component OrderForm (Const Void) ChildSlots Unit Order m
GP
GP