YogaStories.Controls

class InitialValue schema value | schema -> value where

Members

• initialValue :: schema -> value

Instances

• InitialValue String String
• InitialValue Number Number
• InitialValue Int Int
• InitialValue Boolean Boolean
• InitialValue Slider Number
• InitialValue (Select String) String
• InitialValue Color String
• InitialValue (Enum a) a
• InitialValue (CustomControl value) value
• InitialValue (Maybe String) (Maybe String)
• InitialValue (Maybe Number) (Maybe Number)
• InitialValue (Maybe Int) (Maybe Int)
• InitialValue (Maybe Boolean) (Maybe Boolean)
• (RowToList schema rl, InitialValues rl schema () values) => InitialValue (Record schema) (Record values)

class RenderControl schema value | schema -> value where

Members

• renderControl :: schema -> String -> value -> (value -> Effect Unit) -> JSX

Instances

• RenderControl String String
• RenderControl Number Number
• RenderControl Int Int
• RenderControl Boolean Boolean
• RenderControl Slider Number
• RenderControl (Select String) String
• RenderControl Color String
• (Generic a rep, GenericToString rep, GenericFromString rep, EnumOptions a) => RenderControl (Enum a) a
• RenderControl (CustomControl value) value
• RenderControl (Maybe String) (Maybe String)
• RenderControl (Maybe Number) (Maybe Number)
• RenderControl (Maybe Int) (Maybe Int)
• (RowToList schema rl, RenderControls rl schema values) => RenderControl (Record schema) (Record values)
• RenderControl (Maybe Boolean) (Maybe Boolean)

class InitialValues :: RowList Type -> Row Type -> Row Type -> Row Type -> Constraintclass InitialValues rl schemaRow from to | rl -> schemaRow from to where

Members

• initialValues :: forall g. g rl -> Record schemaRow -> Builder (Record from) (Record to)

Instances

• InitialValues Nil schemaRow () ()
• (IsSymbol name, InitialValue schemaType valueType, InitialValues tail schemaRow from from', Cons name schemaType whatever schemaRow, Lacks name from', Cons name valueType from' to) => InitialValues (Cons name schemaType tail) schemaRow from to

class RenderControls :: RowList Type -> Row Type -> Row Type -> Constraintclass RenderControls rl schemaRow valuesRow | rl -> schemaRow valuesRow where

Members

• renderControls :: forall g. g rl -> Record schemaRow -> Record valuesRow -> (Record valuesRow -> Effect Unit) -> Array JSX

Instances

• RenderControls Nil schemaRow valuesRow
• (IsSymbol name, RenderControl schemaType valueType, RenderControls tail schemaRow valuesRow, Cons name schemaType whatever1 schemaRow, Cons name valueType whatever2 valuesRow) => RenderControls (Cons name schemaType tail) schemaRow valuesRow

class ToParam schema value | schema -> value where

Members

• toParam :: schema -> value -> String

Instances

• ToParam String String
• ToParam Number Number
• ToParam Int Int
• ToParam Boolean Boolean
• ToParam Slider Number
• ToParam (Select String) String
• ToParam Color String
• (Generic a rep, GenericToString rep) => ToParam (Enum a) a
• ToParam (CustomControl value) value
• ToParam (Maybe String) (Maybe String)
• ToParam (Maybe Number) (Maybe Number)
• ToParam (Maybe Int) (Maybe Int)
• ToParam (Maybe Boolean) (Maybe Boolean)
• (RowToList schema rl, InitialValues rl schema () values, ToParams rl schema values) => ToParam (Record schema) (Record values)

class FromParam schema value | schema -> value where

Members

• fromParam :: schema -> String -> Maybe value

Instances

• FromParam String String
• FromParam Number Number
• FromParam Int Int
• FromParam Boolean Boolean
• FromParam Slider Number
• FromParam (Select String) String
• FromParam Color String
• (Generic a rep, GenericFromString rep) => FromParam (Enum a) a
• FromParam (CustomControl value) value
• FromParam (Maybe String) (Maybe String)
• FromParam (Maybe Number) (Maybe Number)
• FromParam (Maybe Int) (Maybe Int)
• FromParam (Maybe Boolean) (Maybe Boolean)
• (RowToList schema rl, InitialValues rl schema () values, FromParams rl schema values) => FromParam (Record schema) (Record values)

class ToParams :: RowList Type -> Row Type -> Row Type -> Constraintclass ToParams rl schemaRow valuesRow | rl -> schemaRow valuesRow where

Members

• toParams :: forall g. g rl -> Record schemaRow -> Record valuesRow -> Object String

Instances

• ToParams Nil schemaRow valuesRow
• (IsSymbol name, ToParam schemaType valueType, ToParams tail schemaRow valuesRow, Cons name schemaType whatever1 schemaRow, Cons name valueType whatever2 valuesRow) => ToParams (Cons name schemaType tail) schemaRow valuesRow

class FromParams :: RowList Type -> Row Type -> Row Type -> Constraintclass FromParams rl schemaRow valuesRow | rl -> schemaRow valuesRow where

Members

• fromParams :: forall g. g rl -> Record schemaRow -> Object String -> Record valuesRow -> Record valuesRow

Instances

• FromParams Nil schemaRow valuesRow
• (IsSymbol name, FromParam schemaType valueType, FromParams tail schemaRow valuesRow, Cons name schemaType whatever1 schemaRow, Cons name valueType whatever2 valuesRow) => FromParams (Cons name schemaType tail) schemaRow valuesRow

buildInitialValues :: forall schema rl to. RowToList schema rl => InitialValues rl schema () to => Record schema -> Record to

valuesToParams :: forall schema rl to. RowToList schema rl => ToParams rl schema to => Record schema -> Record to -> Object String

paramsToValues :: forall schema rl to. RowToList schema rl => FromParams rl schema to => Record schema -> Object String -> Record to -> Record to

controlsPanel :: Array JSX -> JSX

class GenericToString rep  where

Members

• genericToString :: rep -> String

Instances

• (IsSymbol name) => GenericToString (Constructor name NoArguments)
• (GenericToString a, GenericToString b) => GenericToString (Sum a b)

class GenericFromString rep  where

Members

• genericFromString :: String -> Maybe rep

Instances

• (IsSymbol name) => GenericFromString (Constructor name NoArguments)
• (GenericFromString a, GenericFromString b) => GenericFromString (Sum a b)

newtype Slider

Constructors

• Slider { max :: Number, min :: Number, step :: Number, value :: Number }

Instances

• Newtype Slider _

newtype Select a

Constructors

• Select { options :: Array a, value :: a }

Instances

• Newtype (Select a) _

newtype Enum a

Constructors

• Enum { options :: Array String, value :: a }

Instances

• Newtype (Enum a) _

newtype CustomControl value

Constructors

• CustomControl { fromStr :: String -> Maybe value, render :: value -> (value -> Effect Unit) -> JSX, toStr :: value -> String, value :: value }

Instances

• Newtype (CustomControl value) _

newtype Color

Constructors

• Color String

Instances

• Newtype Color _

class EnumOptions a  where

Members

• enumOptions :: Proxy a -> Array String

Instances

• (Generic a rep, GenericEnumOptions rep) => EnumOptions a

class GenericEnumOptions rep  where

Members

• genericEnumOptions :: Proxy rep -> Array String

Instances

• GenericEnumOptions NoArguments
• (IsSymbol name) => GenericEnumOptions (Constructor name NoArguments)
• (GenericEnumOptions a, GenericEnumOptions b) => GenericEnumOptions (Sum a b)

slider :: { max :: Number, min :: Number, step :: Number, value :: Number } -> Slider

select :: forall a. a -> Array a -> Select a

enum :: forall a. EnumOptions a => a -> Enum a

customControl :: forall value. { fromStr :: String -> Maybe value, render :: value -> (value -> Effect Unit) -> JSX, toStr :: value -> String } -> value -> CustomControl value

color :: String -> Color