      (node :w:insideH (table-border-attrs inside-h))
      (node :w:insideV (table-border-attrs inside-v)))))
 
+(defn- table-properties
+  "Creates w:tblPr tag node. Called by table-style.
+
+  Options: See 'Options' of table-style"
+  [{:as options
+    :keys [table-align
+           cell-margin-top cell-margin-left cell-margin-bottom cell-margin-right]}]
+  ;; Table Properties
+  (node :w:tblPr {}
+        ;; Number of Rows in Row Band
+        (node :w:tblStyleRowBandSize {:w:val 1})
+        ;; Table Alignment
+        (node :w:jc {:w:val table-align})
+        ;; Table Indent from Leading Margin
+        (node :w:tblInd {:w:val 0 :w:type "dxa"})
+        ;; Table Borders
+        (table-borders ["single" "auto" 4 0])
+        ;; Table Cell Margin
+        (node :w:tblCellMar {}
+              (node :w:top {:w:w cell-margin-top :w:type "dxa"})
+              (node :w:left {:w:w cell-margin-left :w:type "dxa"})
+              (node :w:bottom {:w:w cell-margin-bottom :w:type "dxa"})
+              (node :w:right {:w:w cell-margin-right :w:type "dxa"}))))
+
+(defn- table-row-properties
+  "Creates w:trPr tag node. Called by table-style."
+  [{:as options
+    :keys [cell-margins]
+    :or default-table-style-options}]
+  ;; Table Row Properties
+  (node :w:trPr {}
+        ;; Table Row Alignment
+        (node :w:jc {:w:val cell-h-align})))
+
+(defn- table-cell-properties
+  "Creates w:tcPr tag node. Called by table-style."
+  [{:as options
+    :keys [cell-margins]
+    :or default-table-style-options}]
+  ;; Table Cell Properties
+  (node :w:tcPr {}
+        ;; Table Cell Vertical Alignment
+        (node :w:vAlign {:w:val cell-v-align}))
+
 (defn table-style
   "Returns w:style tag for table style with w:style tag for the font,
   as a vector containing both of them.

  Parameters:
  - name: <string> Used as index. Must be unique.
  - & options: option, value, ...

  Examples:
  - (table-style \"table1\")

   :w:space space}) ; Border Spacing Measurement)

(defn- table-borders
  "Returns w:tblBorders tag. Called by table-properties.

  Parameters:
  Takes one or six parameters.
