246 |
CALL WRITE_0D_R8( salt_EvPrRn, INDEX_NONE, |
CALL WRITE_0D_R8( salt_EvPrRn, INDEX_NONE, |
247 |
&'salt_EvPrRn =', |
&'salt_EvPrRn =', |
248 |
&' /* Salin. of Evap/Prec/R (UNSET=use local S)(ppt)*/') |
&' /* Salin. of Evap/Prec/R (UNSET=use local S)(ppt)*/') |
|
CALL WRITE_0D_R8( trac_EvPrRn, INDEX_NONE, |
|
|
&'trac_EvPrRn =', |
|
|
&' /* Tracer in Evap/Prec/R (UNSET=use local Tr)*/') |
|
249 |
ELSE |
ELSE |
250 |
CALL WRITE_0D_R8( convertFW2Salt, INDEX_NONE, |
CALL WRITE_0D_R8( convertFW2Salt, INDEX_NONE, |
251 |
&'convertFW2Salt =', |
&'convertFW2Salt =', |