{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
module THREE.LineLoop
(
LineLoop (..)
, THREE.LineLoop.new
) where
import Miso
import qualified THREE.Internal as THREE
newtype LineLoop
= LineLoop
{ LineLoop -> JSVal
unLineLoopCamera :: JSVal
} deriving (LineLoop -> IO Object
(LineLoop -> IO Object) -> ToObject LineLoop
forall a. (a -> IO Object) -> ToObject a
$ctoObject :: LineLoop -> IO Object
toObject :: LineLoop -> IO Object
ToObject)
new :: THREE.Three LineLoop
new :: Three LineLoop
new = (JSVal -> LineLoop) -> MisoString -> [MisoString] -> Three LineLoop
forall args con.
ToArgs args =>
(JSVal -> con) -> MisoString -> args -> Three con
THREE.new JSVal -> LineLoop
LineLoop MisoString
"LineLoop" ([] :: [MisoString])