module Data.DOM.HTMLMapElement
       (get'areas, getm'areas, set'name, get'name, getm'name) where
import Data.DOM.Html2
import Control.Monad
import BrownPLT.JavaScript
import Data.DOM.WBTypes
import Data.DOM.Dom
import Data.DOM.Document (createElement)
 
get'areas ::
          (Monad mn, CHTMLMapElement this, CHTMLCollection zz) =>
            Expression this -> mn (Expression zz)
get'areas thisp
  = do let et = undefined :: zz
       let r = DotRef et (thisp /\ et) (Id et "areas")
       return r
 
getm'areas ::
           (Monad mn, CHTMLMapElement this) =>
             Expression this -> mn (Expression THTMLCollection)
getm'areas = get'areas
 
set'name ::
         (Monad mn, CHTMLMapElement zz) =>
           Expression String -> Expression zz -> mn (Expression zz)
set'name = setjsProperty "name"
 
get'name ::
         (Monad mn, CHTMLMapElement this) =>
           Expression this -> mn (Expression String)
get'name thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "name")
       return r
 
getm'name ::
          (Monad mn, CHTMLMapElement this) =>
            Expression this -> mn (Expression String)
getm'name = get'name