Ignore:
Timestamp:
2013-11-22T13:12:59+01:00 (7 years ago)
Author:
cetlod
Message:

dev_MERGE_2013 : fix on argument call of eos

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90

    r4247 r4313  
    130130                             CALL tra_nxt    ( kstp )        ! tracer fields at next time step 
    131131      IF( ln_zdfnpc      )   CALL tra_npc    ( kstp )        ! applied non penetrative convective adjustment on (t,s) 
    132                              CALL eos( tsb, rhd, rhop )      ! now (swap=before) in situ density for dynhpg module 
     132                             CALL eos( tsb, rhd, rhop, gdept_0(:,:,:) )      ! now (swap=before) in situ density for dynhpg module 
    133133 
    134134      !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
Note: See TracChangeset for help on using the changeset viewer.