Ignore:
Timestamp:
Apr 25, 2024, 3:58:31 PM (8 months ago)
Author:
jbclement
Message:

Mars PCM:
Reversion of r3305 and r3307.
JBC

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.COMMON/libf/dyn3dpar/gcm.F

    r3305 r3316  
    487487! Physics
    488488#ifdef CPP_PHYS
    489          CALL iniphysiq('startfi.nc',iim,jjm,llm,
     489         CALL iniphysiq(iim,jjm,llm,
    490490     &                distrib_phys(mpi_rank),comm_lmdz,
    491491     &                daysec,day_ini,dtphys/nsplit_phys,
    492      &                rlatu,rlatv,rlonu,rlonv,aire,cu,cv,rad,g,r,cpp,
    493      &                iflag_phys)
     492     &                rlatu,rlatv,rlonu,rlonv,aire,cu,cv,
     493     &                rad,g,r,cpp,iflag_phys)
    494494#endif
    495495!         call_iniphys=.false.
Note: See TracChangeset for help on using the changeset viewer.