Symbol | Description | Uses |
locNameTr | 8 |
File | Line number | Procedure | Code |
./pkg/seaice/seaice_diagnostics_init.F | 140 | SEAICE_DIAGNOSTICS_INIT |
WRITE(locNameTr,'(A,I4.4,A)') 'sea ice tracer no. ',iTr |
./pkg/seaice/seaice_diagnostics_init.F | 158 | SEAICE_DIAGNOSTICS_INIT |
ilnb = MIN(LEN(locNameTr),ilnb) |
./pkg/seaice/seaice_diagnostics_init.F | 159 | SEAICE_DIAGNOSTICS_INIT |
WRITE(locNameTr,'(A)') SItrNameLong(iTr)(1:ilnb) |
./pkg/seaice/seaice_diagnostics_init.F | 163 | SEAICE_DIAGNOSTICS_INIT |
ilnb = MIN(LEN(locNameTr),ilnb) |
./pkg/seaice/seaice_diagnostics_init.F | 164 | SEAICE_DIAGNOSTICS_INIT |
WRITE(locNameTr,'(2A)') SItrName(iTr)(1:ilnb),' tracer' |
./pkg/seaice/seaice_diagnostics_init.F | 167 | SEAICE_DIAGNOSTICS_INIT |
ilnb = MAX(ILNBLNK(locNameTr),1) |
./pkg/seaice/seaice_diagnostics_init.F | 170 | SEAICE_DIAGNOSTICS_INIT |
WRITE(diagTitle,'(4A)') locNameTr(1:ilnb), |
./pkg/seaice/seaice_diagnostics_init.F | 61 | SEAICE_DIAGNOSTICS_INIT |
CHARACTER*30 locNameTr |