content: -- | Units related to the field of thermodynamics.
  module Data.Drasil.Units.Thermodynamics where
  
  import Language.Drasil (dccWDS, cnIES, cn, cn', cn'', dcc, Sentence(S),
    UnitDefn, (/:), (*:), (/$), newUnit, makeDerU)
  
  import Data.Drasil.SI_Units (centigrade, joule, kilogram, watt, m_2, m_3)
  
  heatCapacity :: UnitDefn
  heatCapacity = makeDerU (dccWDS "heatCapacity" (cnIES "heat capacity")
    (S "heat capacity (constant pressure)")) (joule /: centigrade)
  
  heatCapSpec :: UnitDefn --Specific heat capacity
  heatCapSpec = makeDerU (dccWDS "heatCapSpec" (cn' "specific heat")
    (S "heat capacity per unit mass")) (joule /$ (kilogram *: centigrade))
  
  thermalFlux :: UnitDefn
  thermalFlux = makeDerU (dccWDS "thermalFlux" (cn'' "heat flux")
    (S "the rate of heat energy transfer per unit area")) (watt /: m_2)
  
  heatTransferCoef :: UnitDefn
  heatTransferCoef = newUnit "heat transfer coefficient" (watt /$ (m_2 *: centigrade))
  
  volHtGenU :: UnitDefn
  volHtGenU = makeDerU (dcc "volHtGenU" (cn "volumetric heat generation")
    "the rate of heat energy generation per unit volume") (watt /: m_3)
  