Changeset 565 for trunk/NEMO/TOP_SRC
- Timestamp:
- 2006-11-13T14:38:07+01:00 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/TOP_SRC/SMS/trcctl.cfc.h90
r350 r565 31 31 IF ( ctrcnm(jp11) /= 'CFC11') THEN 32 32 ctrcnm(jp11)='CFC11' 33 ctrcnl(jp11)='C arbonate 11 concentration'33 ctrcnl(jp11)='Chlorofuorocarbone 11 concentration' 34 34 ENDIF 35 35 ENDIF … … 37 37 IF ( ctrcnm(jp12) /= 'CFC12') THEN 38 38 ctrcnm(jp12)='CFC12' 39 ctrcnl(jp12)='C arbonate 12 concentration'39 ctrcnl(jp12)='Chlorofuorocarbone 12 concentration' 40 40 ENDIF 41 41 ENDIF … … 45 45 IF ( ctrcnm(jp11) /= 'CFC11' .OR. ctrcnm(jp12) /= 'CFC12' ) THEN 46 46 ctrcnm(jp11)='CFC11' 47 ctrcnl(jp11)='C arbonate 11 concentration'47 ctrcnl(jp11)='Chlorofuorocarbone 11 concentration' 48 48 ctrcnm(jp12)='CFC12' 49 ctrcnl(jp12)='C arbonate 12 concentration'49 ctrcnl(jp12)='Chlorofuorocarbone 12 concentration' 50 50 ENDIF 51 51 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.