File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_diagnostics_init.F |
142 |
SEAICE_DIAGNOSTICS_INIT |
locUnitTr = '(kg/kg) ' |
./pkg/seaice/seaice_diagnostics_init.F |
146 |
SEAICE_DIAGNOSTICS_INIT |
locUnitTr = '(kg/m^2)' |
./pkg/seaice/seaice_diagnostics_init.F |
153 |
SEAICE_DIAGNOSTICS_INIT |
ilnb = LEN(locUnitTr) |
./pkg/seaice/seaice_diagnostics_init.F |
154 |
SEAICE_DIAGNOSTICS_INIT |
locUnitTr = SItrUnit(iTr)(1:ilnb) |
./pkg/seaice/seaice_diagnostics_init.F |
172 |
SEAICE_DIAGNOSTICS_INIT |
diagUnits = locUnitTr//' ' |
./pkg/seaice/seaice_diagnostics_init.F |
180 |
SEAICE_DIAGNOSTICS_INIT |
diagUnits = locUnitTr//' ' |
./pkg/seaice/seaice_diagnostics_init.F |
60 |
SEAICE_DIAGNOSTICS_INIT |
CHARACTER*8 locUnitTr |