module Data.DOM.HTMLFieldSetElement (get'form, getm'form) 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'form ::
(Monad mn, CHTMLFieldSetElement this, CHTMLFormElement zz) =>
Expression this -> mn (Expression zz)
get'form thisp
= do let et = undefined :: zz
let r = DotRef et (thisp /\ et) (Id et "form")
return r
getm'form ::
(Monad mn, CHTMLFieldSetElement this) =>
Expression this -> mn (Expression THTMLFormElement)
getm'form = get'form