Ignore:
Timestamp:
Apr 6, 2017, 4:15:56 PM (8 years ago)
Author:
slebonnois
Message:

SL: bugs corrections outputs/clouds_AStol/upper_atmosphere/start2archive

Location:
trunk/LMDZ.COMMON/libf/dynphy_lonlat/phyvenus
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.COMMON/libf/dynphy_lonlat/phyvenus/readstartphy.F

    r1530 r1687  
    44c
    55c
    6       SUBROUTINE readstartphy(fichnom,
     6      SUBROUTINE readstartphy(fichnom,klon_glo,
    77     .            rlat,rlon, tsol,tsoil,
    88     .           albe, solsw, sollw,
    … …  
    1515c======================================================================
    1616      use dimphy
    17       USE mod_grid_phy_lmdz, only: klon_glo
    1817      IMPLICIT none
    1918#include "netcdf.inc"
    … …  
    2221
    2322      CHARACTER*(*) fichnom
     23      integer klon_glo
    2424      REAL rlat(klon_glo), rlon(klon_glo)
    2525      REAL tsol(klon_glo)

  • trunk/LMDZ.COMMON/libf/dynphy_lonlat/phyvenus/start2archive.F

    r1443 r1687  
    133133
    134134      fichnom = 'startphy.nc'
    135       CALL readstartphy(fichnom,
     135      CALL readstartphy(fichnom,ngridmx,
    136136     .       rlat,rlon,tsurf,tsoil,
    137137     .       albe, solsw, sollw,
Note: See TracChangeset for help on using the changeset viewer.