Ignore:
Timestamp:
Jan 7, 2020, 7:14:30 PM (5 years ago)
Author:
dubos
Message:

simple_physics : removed unused files

File:
1 edited

Legend:

Unmodified
Added
Removed

  • dynamico_lmdz/simple_physics/phyparam/param/phyparam.F90

    r4215 r4219  
    361361       gmtime, zdtime, zday, pplev, pplay, pt, &
    362362       pdt, zdtlw, zfluxlw, zdtsw, zfluxsw, mu0)
    363     USE comsaison
    364363    USE planet
    365364    USE phys_const,   ONLY : planet_rad, unjours
    … …  
    377376         zdtsw(ngrid,nlayer), zfluxsw(ngrid), mu0(ngrid)
    378377    REAL, DIMENSION(ngrid) :: fract
    379     REAL :: zls, zinsol, tsurf2, ztim1,ztim2,ztim3
     378    REAL :: zls, zinsol, tsurf2, ztim1,ztim2,ztim3, dist_sol, declin
    380379    REAL :: zplanck(ngrid)
    381380    INTEGER :: ig, l
Note: See TracChangeset for help on using the changeset viewer.