Changeset 5066 for LMDZ6/trunk/libf/dyn3dmem
- Timestamp:
- Jul 18, 2024, 9:28:57 AM (7 months ago)
- Location:
- LMDZ6/trunk/libf/dyn3dmem
- Files:
-
- 2 edited
- 1 moved
Legend:
- Unmodified
- Added
- Removed
-
TabularUnified LMDZ6/trunk/libf/dyn3dmem/leapfrog_loc.F ¶
r4619 r5066 28 28 USE allocate_field_mod 29 29 USE call_dissip_mod, ONLY : call_dissip 30 USE call_calfis_mod, ONLY : call_calfis30 USE lmdz_call_calfis, ONLY : call_calfis 31 31 USE leapfrog_mod, ONLY : ucov,vcov,teta,ps,masse,phis,q,dq 32 32 & ,ucovm1,vcovm1,tetam1,massem1,psm1,p,pks,pk,pkf,flxw -
TabularUnified LMDZ6/trunk/libf/dyn3dmem/leapfrog_mod.F90 ¶
r2021 r5066 44 44 USE integrd_mod,ONLY : integrd_allocate 45 45 USE caladvtrac_mod,ONLY : caladvtrac_allocate 46 USE call_calfis_mod,ONLY : call_calfis_allocate46 USE lmdz_call_calfis,ONLY : call_calfis_allocate 47 47 USE call_dissip_mod, ONLY : call_dissip_allocate 48 48 IMPLICIT NONE -
TabularUnified LMDZ6/trunk/libf/dyn3dmem/lmdz_call_calfis.F90 ¶
r5065 r5066 1 1 !#define DEBUG_IO 2 MODULE call_calfis_mod2 MODULE lmdz_call_calfis 3 3 4 4 REAL,POINTER,SAVE :: ucov(:,:) … … 88 88 USE comvert_mod, ONLY: ap, bp, pressure_exner 89 89 USE temps_mod, ONLY: day_ini, day_ref, jd_ref, jh_ref, start_time 90 90 #ifdef CPP_PHYS 91 USE lmdz_calfis_loc 92 #endif 93 91 94 IMPLICIT NONE 92 95 INCLUDE "iniprint.h" … … 414 417 END SUBROUTINE call_calfis 415 418 416 END MODULE call_calfis_mod419 END MODULE lmdz_call_calfis
Note: See TracChangeset
for help on using the changeset viewer.