module Data.DOM.HTMLTableCellElement
       (get'cellIndex, getm'cellIndex, set'abbr, get'abbr, getm'abbr,
        set'align, get'align, getm'align, set'axis, get'axis, getm'axis,
        set'bgColor, get'bgColor, getm'bgColor, set'ch, get'ch, getm'ch,
        set'chOff, get'chOff, getm'chOff, set'colSpan, get'colSpan,
        getm'colSpan, set'headers, get'headers, getm'headers, set'height,
        get'height, getm'height, set'noWrap, get'noWrap, getm'noWrap,
        set'rowSpan, get'rowSpan, getm'rowSpan, set'scope, get'scope,
        getm'scope, set'vAlign, get'vAlign, getm'vAlign, set'width,
        get'width, getm'width, mkTd)
       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'cellIndex ::
              (Monad mn, CHTMLTableCellElement this) =>
                Expression this -> mn (Expression Double)
get'cellIndex thisp
  = do let et = undefined :: Double
       let r = DotRef et (thisp /\ et) (Id et "cellIndex")
       return r
 
getm'cellIndex ::
               (Monad mn, CHTMLTableCellElement this) =>
                 Expression this -> mn (Expression Double)
getm'cellIndex = get'cellIndex
 
set'abbr ::
         (Monad mn, CHTMLTableCellElement zz) =>
           Expression String -> Expression zz -> mn (Expression zz)
set'abbr = setjsProperty "abbr"
 
get'abbr ::
         (Monad mn, CHTMLTableCellElement this) =>
           Expression this -> mn (Expression String)
get'abbr thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "abbr")
       return r
 
getm'abbr ::
          (Monad mn, CHTMLTableCellElement this) =>
            Expression this -> mn (Expression String)
getm'abbr = get'abbr
 
set'align ::
          (Monad mn, CHTMLTableCellElement zz) =>
            Expression String -> Expression zz -> mn (Expression zz)
set'align = setjsProperty "align"
 
get'align ::
          (Monad mn, CHTMLTableCellElement this) =>
            Expression this -> mn (Expression String)
get'align thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "align")
       return r
 
getm'align ::
           (Monad mn, CHTMLTableCellElement this) =>
             Expression this -> mn (Expression String)
getm'align = get'align
 
set'axis ::
         (Monad mn, CHTMLTableCellElement zz) =>
           Expression String -> Expression zz -> mn (Expression zz)
set'axis = setjsProperty "axis"
 
get'axis ::
         (Monad mn, CHTMLTableCellElement this) =>
           Expression this -> mn (Expression String)
get'axis thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "axis")
       return r
 
getm'axis ::
          (Monad mn, CHTMLTableCellElement this) =>
            Expression this -> mn (Expression String)
getm'axis = get'axis
 
set'bgColor ::
            (Monad mn, CHTMLTableCellElement zz) =>
              Expression String -> Expression zz -> mn (Expression zz)
set'bgColor = setjsProperty "bgColor"
 
get'bgColor ::
            (Monad mn, CHTMLTableCellElement this) =>
              Expression this -> mn (Expression String)
get'bgColor thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "bgColor")
       return r
 
getm'bgColor ::
             (Monad mn, CHTMLTableCellElement this) =>
               Expression this -> mn (Expression String)
getm'bgColor = get'bgColor
 
set'ch ::
       (Monad mn, CHTMLTableCellElement zz) =>
         Expression String -> Expression zz -> mn (Expression zz)
set'ch = setjsProperty "ch"
 
get'ch ::
       (Monad mn, CHTMLTableCellElement this) =>
         Expression this -> mn (Expression String)
get'ch thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "ch")
       return r
 
getm'ch ::
        (Monad mn, CHTMLTableCellElement this) =>
          Expression this -> mn (Expression String)
getm'ch = get'ch
 
set'chOff ::
          (Monad mn, CHTMLTableCellElement zz) =>
            Expression String -> Expression zz -> mn (Expression zz)
set'chOff = setjsProperty "chOff"
 
get'chOff ::
          (Monad mn, CHTMLTableCellElement this) =>
            Expression this -> mn (Expression String)
get'chOff thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "chOff")
       return r
 
getm'chOff ::
           (Monad mn, CHTMLTableCellElement this) =>
             Expression this -> mn (Expression String)
getm'chOff = get'chOff
 
set'colSpan ::
            (Monad mn, CHTMLTableCellElement zz) =>
              Expression Double -> Expression zz -> mn (Expression zz)
set'colSpan = setjsProperty "colSpan"
 
get'colSpan ::
            (Monad mn, CHTMLTableCellElement this) =>
              Expression this -> mn (Expression Double)
get'colSpan thisp
  = do let et = undefined :: Double
       let r = DotRef et (thisp /\ et) (Id et "colSpan")
       return r
 
getm'colSpan ::
             (Monad mn, CHTMLTableCellElement this) =>
               Expression this -> mn (Expression Double)
getm'colSpan = get'colSpan
 
set'headers ::
            (Monad mn, CHTMLTableCellElement zz) =>
              Expression String -> Expression zz -> mn (Expression zz)
set'headers = setjsProperty "headers"
 
get'headers ::
            (Monad mn, CHTMLTableCellElement this) =>
              Expression this -> mn (Expression String)
get'headers thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "headers")
       return r
 
getm'headers ::
             (Monad mn, CHTMLTableCellElement this) =>
               Expression this -> mn (Expression String)
getm'headers = get'headers
 
set'height ::
           (Monad mn, CHTMLTableCellElement zz) =>
             Expression String -> Expression zz -> mn (Expression zz)
set'height = setjsProperty "height"
 
get'height ::
           (Monad mn, CHTMLTableCellElement this) =>
             Expression this -> mn (Expression String)
get'height thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "height")
       return r
 
getm'height ::
            (Monad mn, CHTMLTableCellElement this) =>
              Expression this -> mn (Expression String)
getm'height = get'height
 
set'noWrap ::
           (Monad mn, CHTMLTableCellElement zz) =>
             Expression Bool -> Expression zz -> mn (Expression zz)
set'noWrap = setjsProperty "noWrap"
 
get'noWrap ::
           (Monad mn, CHTMLTableCellElement this) =>
             Expression this -> mn (Expression Bool)
get'noWrap thisp
  = do let et = undefined :: Bool
       let r = DotRef et (thisp /\ et) (Id et "noWrap")
       return r
 
getm'noWrap ::
            (Monad mn, CHTMLTableCellElement this) =>
              Expression this -> mn (Expression Bool)
getm'noWrap = get'noWrap
 
set'rowSpan ::
            (Monad mn, CHTMLTableCellElement zz) =>
              Expression Double -> Expression zz -> mn (Expression zz)
set'rowSpan = setjsProperty "rowSpan"
 
get'rowSpan ::
            (Monad mn, CHTMLTableCellElement this) =>
              Expression this -> mn (Expression Double)
get'rowSpan thisp
  = do let et = undefined :: Double
       let r = DotRef et (thisp /\ et) (Id et "rowSpan")
       return r
 
getm'rowSpan ::
             (Monad mn, CHTMLTableCellElement this) =>
               Expression this -> mn (Expression Double)
getm'rowSpan = get'rowSpan
 
set'scope ::
          (Monad mn, CHTMLTableCellElement zz) =>
            Expression String -> Expression zz -> mn (Expression zz)
set'scope = setjsProperty "scope"
 
get'scope ::
          (Monad mn, CHTMLTableCellElement this) =>
            Expression this -> mn (Expression String)
get'scope thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "scope")
       return r
 
getm'scope ::
           (Monad mn, CHTMLTableCellElement this) =>
             Expression this -> mn (Expression String)
getm'scope = get'scope
 
set'vAlign ::
           (Monad mn, CHTMLTableCellElement zz) =>
             Expression String -> Expression zz -> mn (Expression zz)
set'vAlign = setjsProperty "vAlign"
 
get'vAlign ::
           (Monad mn, CHTMLTableCellElement this) =>
             Expression this -> mn (Expression String)
get'vAlign thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "vAlign")
       return r
 
getm'vAlign ::
            (Monad mn, CHTMLTableCellElement this) =>
              Expression this -> mn (Expression String)
getm'vAlign = get'vAlign
 
set'width ::
          (Monad mn, CHTMLTableCellElement zz) =>
            Expression String -> Expression zz -> mn (Expression zz)
set'width = setjsProperty "width"
 
get'width ::
          (Monad mn, CHTMLTableCellElement this) =>
            Expression this -> mn (Expression String)
get'width thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "width")
       return r
 
getm'width ::
           (Monad mn, CHTMLTableCellElement this) =>
             Expression this -> mn (Expression String)
getm'width = get'width
 
mkTd ::
     (Monad mn, CHTMLDocument a) =>
       Expression a -> mn (Expression THTMLTableCellElement)
mkTd = createElement (StringLit "td" "td")