& useDIC,
LOGICAL useDIC, useCFC, useDARWIN
IF ( useDIC ) THEN
IF ( useDIC .AND. useCFC ) THEN
IF ( useDARWIN .AND. useDIC ) THEN
IF (.NOT.useDIC) STOP 'ABNORMAL END: S/R GCHEM_FORCING_SEP (2)'
IF ( .NOT.useDIC ) STOP 'ABNORMAL END: S/R GCHEM_FORCING_SEP (3)'
IF ( .NOT.useDIC ) STOP 'ABNORMAL END: S/R GCHEM_FORCING_SEP (1)'
IF ( .NOT.useDIC ) STOP 'ABNORMAL END: S/R GCHEM_INIT_VARI'
useDIC = .FALSE.