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