| Symbol | Description | Uses |
| ACFCnRec | current number of records in Atmospheric CFC time series | 9 |
| File | Line number | Procedure | Code |
| ./pkg/cfc/CFC_ATMOS.h | 26 | NO PROCEDURE |
INTEGER ACFCnRec |
| ./pkg/cfc/CFC_ATMOS.h | 27 | NO PROCEDURE |
COMMON /CFC_ATMOS_I/ ACFCnRec |
| ./pkg/cfc/cfc11_forcing.F | 90 | CFC11_FORCING |
iRec0 = MAX( 1, MIN( ACFCnRec, intime0 ) ) |
| ./pkg/cfc/cfc11_forcing.F | 91 | CFC11_FORCING |
iRec1 = MAX( 1, MIN( ACFCnRec, intime1 ) ) |
| ./pkg/cfc/cfc12_forcing.F | 91 | CFC12_FORCING |
iRec0 = MAX( 1, MIN( ACFCnRec, intime0 ) ) |
| ./pkg/cfc/cfc12_forcing.F | 92 | CFC12_FORCING |
iRec1 = MAX( 1, MIN( ACFCnRec, intime1 ) ) |
| ./pkg/cfc/cfc_atmos.F | 100 | CFC_ATMOS |
ACFCnRec = it |
| ./pkg/cfc/cfc_atmos.F | 104 | CFC_ATMOS |
& 'CFC_ATMOS: read', ACFCnRec, ' (=ACFCnRec) time records :' |
| ./pkg/cfc/cfc_atmos.F | 111 | CFC_ATMOS |
DO it = 1,ACFCnRec |