                    (text-control item state owner :efficiency "Efficiency")]))]
               [:p "No heating systems."]))])]))))
 
+(defn hot-water-systems-row [profiles owner]
+  (reify
+    om/IRenderState
+    (render-state [_ state]
+      (html
+       [:div.col-md-12
+        (for [profile profiles]
+          [:div {:class (profile-column-width)}
+           (bs/panel
+            "Hot Water Systems"
+            (if-let [hot-water-systems (seq (:hot-water-systems profile))]
+              [:div {:class (profile-column-width)}
+               (for [item hot-water-systems]
+                 (bs/panel
+                  "Hot Water System"
+                  [:div
+                   (text-control item state owner :dhw_type "DHW Type")
+                   (text-control item state owner :fuel "Fuel")
+                   (text-control item state owner :fuel_other "Fuel Other")
+                   (text-control item state owner :immersion "Immersion")
+                   (text-control item state owner :cylinder_capacity "Cylinder Capacity")
+                   (text-control item state owner :cylinder_capacity_other "Cylinder Capacity Other")
+                   (text-control item state owner :cylinder_insulation_type "Cylinder Insulation Type")
+                   (text-control item state owner :cylinder_insulation_type_other "Cylinder Insulation Type Other")
+                   (text-control item state owner :cylinder_insulation_thickness "Cylinder Insulation Thickness")
+                   (text-control item state owner :cylinder_insulation_thickness_other "Cylinder Insulation Thickness Other")
+                   (text-control item state owner :cylinder_thermostat "Cylinder Thermostat")
+                   (text-control item state owner :controls_same_for_all_zones "Controls Same For All Zones")]))]
+              [:p "No hot water systems."]))])]))))
+
 (defn profile-rows [profiles owner]
   (reify
     om/IRenderState

               (for [item heating-systems]
                 (bs/panel
                  "Heating System"
                  [(text-control item state owner :heating_type "Heating Type")
                   (text-control item state owner :heat_source "Heat Source")
                   (text-control item state owner :heat_transport "Heat Transport")
                   (text-control item state owner :heat_delivery "Heat Delivery")

               (for [item extensions]
                 (bs/panel
                  "Extension"
                  [:div
                   (text-control item state owner :age ":age")
                   (text-control item state owner :construction_date ":construction_date")]))]
              [:p "No extensions."]))])]))))

