Introduction
The usctdz function allows one to define parameters for cooling towers.
Example
The following code block shows an example of definition of a cooling tower.
imzech = ippmod(iaeros)
idimze = 2
ntypze = 2
neleze = 20
deltat = 10.0d0
teaueze = 36d0
qeaueze = 33737.d0
xap = 0.2d0
xnp = 0.5d0
surface = 5183.6d0
dgout = 0.005d0
(idimze, '2 or 3', imzech, ntypze, neleze, &
deltat, teaueze, qeaueze, xap, xnp, surface, dgout)