Changeset 5281 for LMDZ6/trunk/libf/dyn3dmem/enercin_loc.f90
- Timestamp:
- Oct 28, 2024, 11:17:48 AM (7 weeks ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/dyn3dmem/enercin_loc.f90
r5272 r5281 5 5 !------------------------------------------------------------------------------- 6 6 ! Purpose: Compute kinetic energy at sigma levels. 7 USE comgeom_mod_h 7 8 USE parallel_lmdz 8 9 USE dimensions_mod, ONLY: iim, jjm, llm, ndm … … 12 13 13 14 14 include "comgeom.h"15 15 !=============================================================================== 16 16 ! Arguments:
Note: See TracChangeset
for help on using the changeset viewer.