 @_new_description = ( S ) ->
   R =
     '~isa':     'MKTS/TABLE/description'
-    # grid:       { width: 4, height: 4, }
-    # ### default unit for width, height: ###
-    # u:
-    #   width:    '10mm'
-    #   height:   '10mm'
-    cells:              []
+    cellquads:          {}
+    cellborders:        {}
     quadwidths:         null
     quadheights:        null
     joint_coordinates:  null
-    cellgrid:           false
+    quadgrid:           false
+    #.......................................................................................................
+    styles:
+      sThin:              'thin'
+      sThick:             'thick'
+      sDotted:            'dotted'
+      sDashed:            'dashed'
+      sRed:               'red'
+      sBlack:             'black'
+      sQuadgrid:          'sRed,sDotted,sThin'
+    #.......................................................................................................
     default:
       gridwidth:  4
       gridheight: 4

    for row_nr_1 from @_walk_row_numbers me, 'short'
      row_nr_2  = row_nr_1 + 1
      quad = "#{col_letter_1}#{row_nr_1}"
      yield [ 'tex', "\\draw[ red, line width = 0.2mm ] (quad #{quad} top    left)  -- (quad #{quad} top    right); % Quad a1 top\n",    ]
      yield [ 'tex', "\\draw[ red, line width = 0.2mm ] (quad #{quad} top    left)  -- (quad #{quad} bottom left);  % Quad a1 left\n",   ]
      yield [ 'tex', "\\draw[ red, line width = 0.2mm ] (quad #{quad} bottom left)  -- (quad #{quad} bottom right); % Quad a1 bottom\n", ]
      yield [ 'tex', "\\draw[ red, line width = 0.2mm ] (quad #{quad} top    right) -- (quad #{quad} bottom right); % Quad a1 right\n",  ]
  #.........................................................................................................
  return null

#-----------------------------------------------------------------------------------------------------------
@_walk_debugging_events = ( me ) ->

  for [ col_letter, col_nr, ] from @_walk_column_letters_and_numbers me, 'long'
    for row_nr from @_walk_row_numbers me, 'long'
      joint = "#{col_letter}#{row_nr}"
      yield [ 'tex', "\\node[ color = gray ] at ($(joint_#{joint})+(2mm,2mm)$) {{\\mktsStyleCode{}#{joint}}}; ", ]
      yield [ 'tex', "\\node[ color = gray, shape = circle, draw ] at (joint_#{joint}) {};%\n", ]
  #.........................................................................................................
  yield return


#===========================================================================================================
