ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/GPUTextureDescriptor.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from webgpu (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.GPUTextureDescriptor
       (js_newGPUTextureDescriptor, js_setSize, js_getSize, js_setMipLevelCount, js_getMipLevelCount, js_setSampleCount, js_getSampleCount, js_setDimension, js_getDimension, js_setFormat, js_getFormat, js_setUsage, js_getUsage, js_setViewFormats, js_getViewFormats, js_setTextureBindingViewDimension, js_getTextureBindingViewDimension, newGPUTextureDescriptor, setSize, getSize, setMipLevelCount, getMipLevelCount, getMipLevelCountUnsafe, getMipLevelCountUnchecked, setSampleCount, getSampleCount, getSampleCountUnsafe, getSampleCountUnchecked, setDimension, getDimension, getDimensionUnsafe, getDimensionUnchecked, setFormat, getFormat, setUsage, getUsage, setViewFormats, getViewFormats, getViewFormatsUnsafe, getViewFormatsUnchecked, setTextureBindingViewDimension, getTextureBindingViewDimension, getTextureBindingViewDimensionUnsafe, getTextureBindingViewDimensionUnchecked, GPUTextureDescriptor(..), gTypeGPUTextureDescriptor)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript safe "(($1, $2, $3) => { return ({\"size\": $1, \"format\": $2, \"usage\": $3}); })"
        js_newGPUTextureDescriptor :: GPUExtent3D -> JSVal -> Word -> IO GPUTextureDescriptor
-- | <https://gpuweb.github.io/gpuweb/#gputexturedescriptor GPUTextureDescriptor specification>
newGPUTextureDescriptor :: (MonadDOM m, IsGPUExtent3D size) => size -> GPUTextureFormat -> Word -> m GPUTextureDescriptor
newGPUTextureDescriptor size format usage = liftDOM (((toJSVal format) >>= \a2' -> js_newGPUTextureDescriptor (Types.toGPUExtent3D size) a2' (usage)))

foreign import javascript safe "(($1, $2) => { $1[\"size\"] = $2; })"
        js_setSize :: GPUTextureDescriptor -> GPUExtent3D -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-size GPUTextureDescriptor.size specification>
setSize :: (MonadDOM m, IsGPUExtent3D val) => GPUTextureDescriptor -> val -> m ()
setSize self val = liftDOM (void ((js_setSize (self) (Types.toGPUExtent3D val))))

foreign import javascript unsafe "(($1) => { return $1[\"size\"]; })"
        js_getSize :: GPUTextureDescriptor -> IO GPUExtent3D
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-size GPUTextureDescriptor.size specification>
getSize :: (MonadDOM m) => GPUTextureDescriptor -> m GPUExtent3D
getSize self = liftDOM ((js_getSize (self)))

foreign import javascript safe "(($1, $2) => { $1[\"mipLevelCount\"] = $2; })"
        js_setMipLevelCount :: GPUTextureDescriptor -> Word -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-miplevelcount GPUTextureDescriptor.mipLevelCount specification>
setMipLevelCount :: (MonadDOM m) => GPUTextureDescriptor -> Word -> m ()
setMipLevelCount self val = liftDOM (void ((js_setMipLevelCount (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"mipLevelCount\"]; })"
        js_getMipLevelCount :: GPUTextureDescriptor -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-miplevelcount GPUTextureDescriptor.mipLevelCount specification>
getMipLevelCount :: (MonadDOM m) => GPUTextureDescriptor -> m (Maybe Word)
getMipLevelCount self = liftDOM (((js_getMipLevelCount (self)) >>= fromJSValUnchecked))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-miplevelcount GPUTextureDescriptor.mipLevelCount specification>
getMipLevelCountUnsafe :: (MonadDOM m, HasCallStack) => GPUTextureDescriptor -> m Word
getMipLevelCountUnsafe self = liftDOM ((((js_getMipLevelCount (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-miplevelcount GPUTextureDescriptor.mipLevelCount specification>
getMipLevelCountUnchecked :: (MonadDOM m) => GPUTextureDescriptor -> m Word
getMipLevelCountUnchecked self = liftDOM ((pFromJSVal <$> (js_getMipLevelCount (self))))

foreign import javascript safe "(($1, $2) => { $1[\"sampleCount\"] = $2; })"
        js_setSampleCount :: GPUTextureDescriptor -> Word -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-samplecount GPUTextureDescriptor.sampleCount specification>
setSampleCount :: (MonadDOM m) => GPUTextureDescriptor -> Word -> m ()
setSampleCount self val = liftDOM (void ((js_setSampleCount (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"sampleCount\"]; })"
        js_getSampleCount :: GPUTextureDescriptor -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-samplecount GPUTextureDescriptor.sampleCount specification>
getSampleCount :: (MonadDOM m) => GPUTextureDescriptor -> m (Maybe Word)
getSampleCount self = liftDOM (((js_getSampleCount (self)) >>= fromJSValUnchecked))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-samplecount GPUTextureDescriptor.sampleCount specification>
getSampleCountUnsafe :: (MonadDOM m, HasCallStack) => GPUTextureDescriptor -> m Word
getSampleCountUnsafe self = liftDOM ((((js_getSampleCount (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-samplecount GPUTextureDescriptor.sampleCount specification>
getSampleCountUnchecked :: (MonadDOM m) => GPUTextureDescriptor -> m Word
getSampleCountUnchecked self = liftDOM ((pFromJSVal <$> (js_getSampleCount (self))))

foreign import javascript safe "(($1, $2) => { $1[\"dimension\"] = $2; })"
        js_setDimension :: GPUTextureDescriptor -> JSVal -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-dimension GPUTextureDescriptor.dimension specification>
setDimension :: (MonadDOM m) => GPUTextureDescriptor -> GPUTextureDimension -> m ()
setDimension self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setDimension (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"dimension\"]; })"
        js_getDimension :: GPUTextureDescriptor -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-dimension GPUTextureDescriptor.dimension specification>
getDimension :: (MonadDOM m) => GPUTextureDescriptor -> m (Maybe GPUTextureDimension)
getDimension self = liftDOM (((js_getDimension (self)) >>= fromJSValUnchecked))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-dimension GPUTextureDescriptor.dimension specification>
getDimensionUnsafe :: (MonadDOM m, HasCallStack) => GPUTextureDescriptor -> m GPUTextureDimension
getDimensionUnsafe self = liftDOM ((((js_getDimension (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-dimension GPUTextureDescriptor.dimension specification>
getDimensionUnchecked :: (MonadDOM m) => GPUTextureDescriptor -> m GPUTextureDimension
getDimensionUnchecked self = liftDOM ((pFromJSVal <$> (js_getDimension (self))))

foreign import javascript safe "(($1, $2) => { $1[\"format\"] = $2; })"
        js_setFormat :: GPUTextureDescriptor -> JSVal -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-format GPUTextureDescriptor.format specification>
setFormat :: (MonadDOM m) => GPUTextureDescriptor -> GPUTextureFormat -> m ()
setFormat self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setFormat (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"format\"]; })"
        js_getFormat :: GPUTextureDescriptor -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-format GPUTextureDescriptor.format specification>
getFormat :: (MonadDOM m) => GPUTextureDescriptor -> m GPUTextureFormat
getFormat self = liftDOM (((js_getFormat (self)) >>= fromJSValUnchecked))

foreign import javascript safe "(($1, $2) => { $1[\"usage\"] = $2; })"
        js_setUsage :: GPUTextureDescriptor -> Word -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-usage GPUTextureDescriptor.usage specification>
setUsage :: (MonadDOM m) => GPUTextureDescriptor -> Word -> m ()
setUsage self val = liftDOM (void ((js_setUsage (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"usage\"]; })"
        js_getUsage :: GPUTextureDescriptor -> IO Word
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-usage GPUTextureDescriptor.usage specification>
getUsage :: (MonadDOM m) => GPUTextureDescriptor -> m Word
getUsage self = liftDOM ((js_getUsage (self)))

foreign import javascript safe "(($1, $2) => { $1[\"viewFormats\"] = $2; })"
        js_setViewFormats :: GPUTextureDescriptor -> JSVal -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-viewformats GPUTextureDescriptor.viewFormats specification>
setViewFormats :: (MonadDOM m) => GPUTextureDescriptor -> [GPUTextureFormat] -> m ()
setViewFormats self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setViewFormats (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"viewFormats\"]; })"
        js_getViewFormats :: GPUTextureDescriptor -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-viewformats GPUTextureDescriptor.viewFormats specification>
getViewFormats :: (MonadDOM m) => GPUTextureDescriptor -> m (Maybe [GPUTextureFormat])
getViewFormats self = liftDOM (((js_getViewFormats (self)) >>= fromJSValUnchecked))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-viewformats GPUTextureDescriptor.viewFormats specification>
getViewFormatsUnsafe :: (MonadDOM m, HasCallStack) => GPUTextureDescriptor -> m [GPUTextureFormat]
getViewFormatsUnsafe self = liftDOM ((((js_getViewFormats (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-viewformats GPUTextureDescriptor.viewFormats specification>
getViewFormatsUnchecked :: (MonadDOM m) => GPUTextureDescriptor -> m [GPUTextureFormat]
getViewFormatsUnchecked self = liftDOM (((js_getViewFormats (self)) >>= fromJSValUnchecked))

foreign import javascript safe "(($1, $2) => { $1[\"textureBindingViewDimension\"] = $2; })"
        js_setTextureBindingViewDimension :: GPUTextureDescriptor -> JSVal -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-texturebindingviewdimension GPUTextureDescriptor.textureBindingViewDimension specification>
setTextureBindingViewDimension :: (MonadDOM m) => GPUTextureDescriptor -> GPUTextureViewDimension -> m ()
setTextureBindingViewDimension self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setTextureBindingViewDimension (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"textureBindingViewDimension\"]; })"
        js_getTextureBindingViewDimension :: GPUTextureDescriptor -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-texturebindingviewdimension GPUTextureDescriptor.textureBindingViewDimension specification>
getTextureBindingViewDimension :: (MonadDOM m) => GPUTextureDescriptor -> m (Maybe GPUTextureViewDimension)
getTextureBindingViewDimension self = liftDOM (((js_getTextureBindingViewDimension (self)) >>= fromJSValUnchecked))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-texturebindingviewdimension GPUTextureDescriptor.textureBindingViewDimension specification>
getTextureBindingViewDimensionUnsafe :: (MonadDOM m, HasCallStack) => GPUTextureDescriptor -> m GPUTextureViewDimension
getTextureBindingViewDimensionUnsafe self = liftDOM ((((js_getTextureBindingViewDimension (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://gpuweb.github.io/gpuweb/#dom-gputexturedescriptor-texturebindingviewdimension GPUTextureDescriptor.textureBindingViewDimension specification>
getTextureBindingViewDimensionUnchecked :: (MonadDOM m) => GPUTextureDescriptor -> m GPUTextureViewDimension
getTextureBindingViewDimensionUnchecked self = liftDOM ((pFromJSVal <$> (js_getTextureBindingViewDimension (self))))