Changeset 5159 for LMDZ6/branches/Amaury_dev/libf/dyn3dmem/pression_loc.f90
- Timestamp:
- Aug 2, 2024, 9:58:25 PM (7 weeks ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Amaury_dev/libf/dyn3dmem/pression_loc.f90
r5117 r5159 11 11 ! couches , avec p(ij,llm +1) = 0. et p(ij,1) = ps(ij) . 12 12 ! ************************************************************************ 13 ! 13 14 USE lmdz_dimensions, ONLY: iim, jjm, llm, ndm 15 USE lmdz_paramet 14 16 IMPLICIT NONE 15 17 ! 16 INCLUDE "dimensions.h" 17 INCLUDE "paramet.h" 18 ! 18 19 20 19 21 INTEGER,INTENT(IN) :: ngrid ! not used 20 22 INTEGER :: l,ij
Note: See TracChangeset
for help on using the changeset viewer.