            :Target target}})
 
 (defn word-rels-document-xml-rels
-  "Creates xml data for word/_rels/document.xml.rels file in DOCX package.\n
-  Parameters:
-  - resources: <vector of {:id <number>, :type <string>, :target <string>}>}\n
+  "Creates xml data for word/_rels/document.xml.rels file in DOCX package.
+
+  Parameters:
+  - resources: <vector of {:id <number>, :type <string>, :target <string>}>}
+
   Note that resources should be created by make-resources."
   [resources]
   {:tag :Relationships
    :attrs word-rels-document-xml-rels-xmlns
    :content (map rels resources)})
 
+(defn table
+  "Creates xml data of table.
+
+  Parameters:
+  - style: <string> style of table
+  - h-align: <string or keyword> horizontal alignment option in each cell.
+  - widths: <vector of numbers> widths of cells
+  - & body: content of the table
+
+  Examples:
+  (table \"table-style1\" :center [964 964 8072] ...)"
+  [style h-align widths & body]
+  {:tag :w:tbl
+   :content
+   (remove-nil
+     (into
+       [{:tag :w:tblPr
+         :content
+         [{:tag :w:tblStyle
+           :attrs {:w:val style}}
+          {:tag :w:tblW
+           :attrs {:w:w (reduce + widths)
+                   :w:type "dxa"}}
+          {:tag :w:jc
+           :attrs {:w:val (name h-align)}}]}
+        {:tag :w:tblGrid
+         :content
+         (for [w widths]
+           {:tag :w:gridCol
+            :attrs {:w:gridCol w}})}]
+       body))})
+

(defn paragraph-style
  "Creates a w:style tag of paragraph. Returns w:style tag for paragraph style with
  w:style tag for the font, as a vector containing both of them.
  Needed for word-styles-xml.\n
  Parameters:
  - name: <string> What others call this style. Also used as style-id. Must be unique.
  - & options: option, value, ...\n
  Examples:
  - (paragraph-style \"paragraph1\")
  - (paragraph-style \"paragraph2\" :font \"Arial\" :font-color \"0000AA\" :align \"both\")\n
  See More: "
  [name
   & {:as options  

                   [:properties:Application :properties:AppVersion]))})

(defn doc-props-core-xml
  "Creates xml data for docProps/core.xml file in DOCX pakcage.

  Parameters:
  - & properties: option, value, ...

  Examples:
  - (doc-props-core-xml :creator \"Bak Yeon O\" :last-modified-by \"Bak Yeon O\")"
  [& {:as properties
