Ignore:
Timestamp:
Nov 23, 2022, 3:20:19 PM (2 years ago)
Author:
romain.vande
Message:

Mars PCM:
Cleaning of phyredem0. Argument passed to the subroutines were unused.
RV

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

    r2826 r2829  
    714714     &                   nsoilmx,ngrid,nlayer,nq,
    715715     &                   ptimestep,pday,0.,cell_area,
    716      &                   albedodat,inertiedat,zmea,zstd,zsig,zgam,zthe,
    717      &                   hmons,summit,base)
     716     &                   albedodat,inertiedat)
    718717          else
    719718             call physdem0("restartfi.nc",longitude,latitude,
    720719     &                   nsoilmx,ngrid,nlayer,nq,
    721720     &                   ptimestep,float(day_end),0.,cell_area,
    722      &                   albedodat,inertiedat,zmea,zstd,zsig,zgam,zthe,
    723      &                   hmons,summit,base)
     721     &                   albedodat,inertiedat)
    724722          endif
    725723         endif
Note: See TracChangeset for help on using the changeset viewer.