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