Changeset 2335 for LMDZ5


Ignore:
Timestamp:
Jul 28, 2015, 4:01:58 PM (9 years ago)
Author:
lguez
Message:

Fixed regression from revision 2333. Add argument rot in call to
physiq from lmdz1d.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/trunk/libf/phylmd/dyn1d/lmdz1d.F90

    r2332 r2335  
    165165      real :: phi(llm)
    166166      real :: teta(llm),tetal(llm),temp(llm),u(llm),v(llm),w(llm)
     167      REAL rot(1, llm) ! relative vorticity, in s-1
    167168      real :: rlat_rad(1),rlon_rad(1)
    168169      real :: omega(llm+1),omega2(llm),rho(llm+1)
     
    871872!---------------------------------------------------------------------
    872873
    873         call physiq(ngrid,llm,                                              &
    874      &              firstcall,lastcall,                                     &
    875      &              day,time,timestep,                                      &
    876      &              plev,play,phi,phis,presnivs,                            &
    877      &              u,v,temp,q,omega2,                                      &
    878      &              du_phys,dv_phys,dt_phys,dq,dpsrf,                        &
    879      &              dudyn)
     874       call physiq(ngrid,llm, &
     875            firstcall,lastcall, day,time,timestep, &
     876            plev,play,phi,phis,presnivs, &
     877            u,v, rot, temp,q,omega2, &
     878            du_phys,dv_phys,dt_phys,dq,dpsrf, &
     879            dudyn)
    880880        firstcall=.false.
    881881
Note: See TracChangeset for help on using the changeset viewer.