New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 565 for trunk/NEMO/TOP_SRC – NEMO

Changeset 565 for trunk/NEMO/TOP_SRC


Ignore:
Timestamp:
2006-11-13T14:38:07+01:00 (17 years ago)
Author:
opalod
Message:

nemo_v1_update_083:CE:change the long name of CFC's

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/TOP_SRC/SMS/trcctl.cfc.h90

    r350 r565  
    3131            IF ( ctrcnm(jp11) /= 'CFC11') THEN 
    3232               ctrcnm(jp11)='CFC11' 
    33                ctrcnl(jp11)='Carbonate 11 concentration' 
     33               ctrcnl(jp11)='Chlorofuorocarbone 11 concentration' 
    3434            ENDIF 
    3535         ENDIF 
     
    3737            IF ( ctrcnm(jp12) /= 'CFC12') THEN 
    3838               ctrcnm(jp12)='CFC12' 
    39                ctrcnl(jp12)='Carbonate 12 concentration' 
     39               ctrcnl(jp12)='Chlorofuorocarbone 12 concentration' 
    4040            ENDIF 
    4141         ENDIF 
     
    4545         IF ( ctrcnm(jp11) /= 'CFC11' .OR. ctrcnm(jp12) /= 'CFC12' ) THEN  
    4646            ctrcnm(jp11)='CFC11' 
    47             ctrcnl(jp11)='Carbonate 11 concentration' 
     47            ctrcnl(jp11)='Chlorofuorocarbone 11 concentration' 
    4848            ctrcnm(jp12)='CFC12' 
    49             ctrcnl(jp12)='Carbonate 12 concentration'  
     49            ctrcnl(jp12)='Chlorofuorocarbone 12 concentration'  
    5050         ENDIF 
    5151      ENDIF 
Note: See TracChangeset for help on using the changeset viewer.