Changeset 257 for LMDZ.3.3


Ignore:
Timestamp:
Jul 18, 2001, 12:54:31 PM (23 years ago)
Author:
lmdzadmin
Message:

cosmetique
LF

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ.3.3/branches/rel-LF/libf/dyn3d/calfis.F

    r232 r257  
     1C
     2C $Header$
     3C
    14      SUBROUTINE calfis(nq, lafin, rdayvrai,rday_ecri, heure,
    25     $            pucov,pvcov,pteta,pq,pmasse,pps,pp,ppk,pphis,pphi,
     
    433436
    434437
    435       CALL physiq (ngridmx,llm,nq,debut,lafin,
    436      ,   rdayvrai,rday_ecri,heure,dtphys,zplev,zplay,zphi,zphis,airefi,
    437      ,             presnivs,clesphy0,  zufi, zvfi,ztfi, zqfi, 
    438 ccc     ,             pcvgu, pcvgv, pcvgt, pcvgq,
    439      ,             pvervel, zcufi, zcvfi,
     438      CALL physiq (ngridmx, llm, nq,
     439     ,    debut, lafin, rdayvrai, rday_ecri, heure, dtphys,
     440     ,    zplev, zplay, zphi, zphis, airefi, presnivs, clesphy0,
     441     ,    zufi, zvfi, ztfi, zqfi,
     442     ,    pvervel, zcufi, zcvfi,
    440443C - sorties
    441      s             zdufi, zdvfi, zdtfi, zdqfi,zdpsrf              )
     444     s    zdufi, zdvfi, zdtfi, zdqfi,zdpsrf              )
    442445
    443446500   CONTINUE
Note: See TracChangeset for help on using the changeset viewer.