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 3398 for branches/2012/dev_r3379_CMCC6_topbfm/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcsms_my_trc.F90 – NEMO

Ignore:
Timestamp:
2012-05-22T09:37:43+02:00 (12 years ago)
Author:
vichi
Message:

NEMOBFM update to last revision ( r5b59a317) in CMCC

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2012/dev_r3379_CMCC6_topbfm/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcsms_my_trc.F90

    r3294 r3398  
    6262      END WHERE 
    6363 
    64       WHERE( ((glamt <= -165) .OR. (glamt >= 160)) .AND. (gphit <= -76) .AND. (gphit >=-80)) 
    65         trn(:,:,1,jpmyt2) = 1._wp 
    66         trb(:,:,1,jpmyt2) = 1._wp 
    67         tra(:,:,1,jpmyt2) = 0._wp 
    68       END WHERE 
    69  
    7064      IF( l_trdtrc ) THEN      ! Save the trends in the ixed layer 
    7165          DO jn = jp_myt0, jp_myt1 
Note: See TracChangeset for help on using the changeset viewer.