(sheet) get-element-by-id (sheet) var (table) create-element (table) var (tr) create-element (tr) var (td) create-element (td) var td tr append-child 0 10 1 range (j) ( (td) create-element (td) var j td set-inner-html td tr append-child ) for tr table append-child 0 50 1 range (i) ( (tr) create-element (tr) var (td) create-element (td) var i td set-inner-html td tr append-child 0 10 1 range (j) ( (td) create-element (td) var (input) create-element (cell) var [i j] (-) join cell set-id cell td append-child td tr append-child ) for tr table append-child ) for table sheet append-child