module Data.DOM.DocumentStyle (get'styleSheets, getm'styleSheets)
       where
import Data.DOM.Stylesheets
import Control.Monad
import BrownPLT.JavaScript
import Data.DOM.WBTypes
import Data.DOM.Dom
import Data.DOM.Document (createElement)
 
get'styleSheets ::
                (Monad mn, CDocumentStyle this, CStyleSheetList zz) =>
                  Expression this -> mn (Expression zz)
get'styleSheets thisp
  = do let et = undefined :: zz
       let r = DotRef et (thisp /\ et) (Id et "styleSheets")
       return r
 
getm'styleSheets ::
                 (Monad mn, CDocumentStyle this) =>
                   Expression this -> mn (Expression TStyleSheetList)
getm'styleSheets = get'styleSheets