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