dictionary {
* file shower4.dct
* - Shower water temperature regulation - 2 - WITH VARIABLE INFORMATION DELAY
* - Delay time as funct. of total flux (F) and pipe volume (Vo).
* - Cold water flux constant - regulation of warm water flux
*   to obtain Topt temperature.
        str80  _model
}
"* -- state variables --                                       "
"S  Wc=Wc+dt*VAc                 Cold water flux (l/s)         "
"S  Ww=Ww+dt*VAw                 Warm water flux (l/s)         "
"*  Note: in this case fluxes are levels, not rates.           "

"R  VAc=0                        Variat. rate cold flux (l/s/s)"
"R  VAw=IDL[K*(Topt-T),dly]      Variat. rate warm flux (l/s/s)"

"A  T=(Tc*Wc+Tw*Ww)/(Wc+Ww)      Shower water temperature      "
"A  F=Wc+Ww                      Total water flux (l/s)        "
"A  dly=Vo/F                     Delay time (s)                "

"I  Wc=0.2                                                     " 
"I  Ww=0                                                       "

"P  Topt=35                      Optimal temperature (C)       " 
"P  Tc=10                        Cold water temperature (C)    "
"P  Tw=50                        Warm water temperature (C)    "
"P  K=0.03                       Adjusting speed               "
"P  Vo=0.6                       Water pipe volume (l)         "