/[lmdze]/trunk/dyn3d/gcm.f
ViewVC logotype

Diff of /trunk/dyn3d/gcm.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 191 by guez, Mon May 9 19:56:28 2016 UTC revision 208 by guez, Wed Dec 7 16:44:53 2016 UTC
# Line 81  PROGRAM gcm Line 81  PROGRAM gcm
81    call init_dyn_phy    call init_dyn_phy
82    
83    ! Initialisation de la physique :    ! Initialisation de la physique :
84    IF (iflag_phys == 1) THEN    IF (iflag_phys) THEN
85       airephy = pack(aire_2d, dyn_phy)       airephy = pack(aire_2d, dyn_phy)
86       CALL suphec       CALL suphec
87       call yoethf       call yoethf
Legend:
Removed from v.191  
changed lines
  Added in v.208
  ViewVC Help
Powered by ViewVC 1.1.21