Ignore:
Timestamp:
Aug 24, 2015, 9:26:48 AM (9 years ago)
Author:
Ehouarn Millour
Message:

Make iniphysiq a module.
Fix call to iniphysiq in lmdz1d (missing arguments and arrays of wrong sizes).
EM

File:
1 moved

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/dynlonlat_phylonlat/phydev/iniphysiq_mod.F90

    r2346 r2347  
    22! $Id: iniphysiq.F 1403 2010-07-01 09:02:53Z fairhead $
    33!
     4MODULE iniphysiq_mod
     5
     6CONTAINS
     7
    48SUBROUTINE iniphysiq(iim,jjm,nlayer,punjours, pdayref,ptimestep, &
    59                     rlatu,rlatv,rlonu,rlonv,aire,cu,cv, &
    … …  
    177181
    178182END SUBROUTINE iniphysiq
     183
     184END MODULE iniphysiq_mod
Note: See TracChangeset for help on using the changeset viewer.