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