-----------------------------------------------------------------------------
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
-----------------------------------------------------------------------------
module THREE.Curve
  ( -- * Types
    Curve (..)
    -- * Methods
  , THREE.Curve.new
    -- * Properties
  ) where
-----------------------------------------------------------------------------
import           Miso
-----------------------------------------------------------------------------
import qualified THREE.Internal as THREE
-----------------------------------------------------------------------------
-- | https://threejs.org/docs/#api/en/scenes/Curve
newtype Curve
  = Curve
  { Curve -> JSVal
unCurveCamera :: JSVal
  } deriving (Curve -> IO Object
(Curve -> IO Object) -> ToObject Curve
forall a. (a -> IO Object) -> ToObject a
$ctoObject :: Curve -> IO Object
toObject :: Curve -> IO Object
ToObject)
-----------------------------------------------------------------------------
-- | https://threejs.org/docs/#api/en/cameras/Curve
new :: THREE.Three Curve
new :: Three Curve
new = (JSVal -> Curve) -> MisoString -> [MisoString] -> Three Curve
forall args con.
ToArgs args =>
(JSVal -> con) -> MisoString -> args -> Three con
THREE.new JSVal -> Curve
Curve MisoString
"Curve" ([] :: [MisoString])
-----------------------------------------------------------------------------