Skip to content
Snippets Groups Projects
Commit ab467a3a authored by RODIER Quentin's avatar RODIER Quentin
Browse files

Quentin 18/12/2023 minors, remove prints and update mesonh filesToSupress (no need of ini_phyex)

parent d2f94191
No related branches found
No related tags found
No related merge requests found
#This file contains the source codes that must not be included #This file contains the source codes that must not be included
#for the model compilation. These codes already exist in the Meso-NH model #for the model compilation. These codes already exist in the Meso-NH model
#and are used outside of the physics #and are used outside of the physics, or are not useful for Meso-NH (i.e. for testsprogs only)
# must be written with lower case .f90 (because prep_code already transformed it) # must be written with lower case .f90 (because prep_code already transformed it)
aux/mode_msg.f90 aux/mode_msg.f90
...@@ -20,6 +20,8 @@ aux/modi_gradient_u.f90 ...@@ -20,6 +20,8 @@ aux/modi_gradient_u.f90
aux/modi_gradient_v.f90 aux/modi_gradient_v.f90
aux/modi_gradient_w.f90 aux/modi_gradient_w.f90
aux/mode_io_field_write.f90 aux/mode_io_field_write.f90
aux/modi_ini_phyex.f90
aux/ini_phyex.f90
#old version of rain_ice #old version of rain_ice
micro/mode_rain_ice_old_fast_rg.f90 micro/mode_rain_ice_old_fast_rg.f90
......
...@@ -206,9 +206,6 @@ JBLK2 = (NGPBLKS * (ITID+1)) / NTID ...@@ -206,9 +206,6 @@ JBLK2 = (NGPBLKS * (ITID+1)) / NTID
YLSTACK%L = 0 YLSTACK%L = 0
YLSTACK%U = 0 YLSTACK%U = 0
#endif #endif
print*,"PHYEX%MISC%OELEC = ",PHYEX%MISC%OELEC
print*,"PHYEX%MISC%OSEDIM_BEARD = ",PHYEX%MISC%OSEDIM_BEARD
print*,"ZTHVREFZIKB = ",ZTHVREFZIKB
CALL RAIN_ICE (D, PHYEX%CST, PHYEX%PARAM_ICEN, PHYEX%RAIN_ICE_PARAMN, & CALL RAIN_ICE (D, PHYEX%CST, PHYEX%PARAM_ICEN, PHYEX%RAIN_ICE_PARAMN, &
& PHYEX%RAIN_ICE_DESCRN, PHYEX%ELEC_PARAM, PHYEX%ELEC_DESCR, & & PHYEX%RAIN_ICE_DESCRN, PHYEX%ELEC_PARAM, PHYEX%ELEC_DESCR, &
& PHYEX%MISC%TBUCONF, OELEC=PHYEX%MISC%OELEC, OSEDIM_BEARD=PHYEX%MISC%OSEDIM_BEARD, & & PHYEX%MISC%TBUCONF, OELEC=PHYEX%MISC%OELEC, OSEDIM_BEARD=PHYEX%MISC%OSEDIM_BEARD, &
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment