Changeset 5272 for LMDZ6/trunk/libf/dyn3d/dudv1.F90
- Timestamp:
- Oct 24, 2024, 5:53:15 PM (31 hours ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/dyn3d/dudv1.F90
r5271 r5272 4 4 SUBROUTINE dudv1 ( vorpot, pbaru, pbarv, du, dv ) 5 5 USE dimensions_mod, ONLY: iim, jjm, llm, ndm 6 USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, & 7 ip1jmi1, ijp1llm, ijmllm, mvar, jcfil, jcfllm 6 8 IMPLICIT NONE 7 9 ! … … 21 23 22 24 23 INCLUDE "paramet.h" 25 24 26 25 27 REAL :: vorpot( ip1jm,llm ) ,pbaru( ip1jmp1,llm ) , &
Note: See TracChangeset
for help on using the changeset viewer.