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 13084 – NEMO

Changeset 13084


Ignore:
Timestamp:
2020-06-10T10:22:34+02:00 (2 years ago)
Author:
smasson
Message:

trunk: correct another typo introduced in [13069]...

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/TRD/trdtra.F90

    r13083 r13084  
    9292      ENDIF 
    9393      ! 
    94       i01 = COUNT( (/ PRESENT(pun) .OR. ( ktrd /= jptra_xad .AND. ktrd /= jptra_yad .AND. ktrd /= jptra_zad ) /) ) 
     94      i01 = COUNT( (/ PRESENT(pu) .OR. ( ktrd /= jptra_xad .AND. ktrd /= jptra_yad .AND. ktrd /= jptra_zad ) /) ) 
    9595      ! 
    9696      IF( ctype == 'TRA' .AND. ktra == jp_tem ) THEN   !==  Temperature trend  ==! 
Note: See TracChangeset for help on using the changeset viewer.