Changeset 118 for trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2
- Timestamp:
- May 12, 2011, 9:27:42 PM (14 years ago)
- Location:
- trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2
- Files:
-
- 146 added
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F
r117 r118 1116 1116 1117 1117 1118 !!!!!!! 1119 !!!!!!! SPECIAL POUR AJOUTER UNE TACHE DE POUSSIERE (sparadrap) 1120 !!!!!!! ps: induit une erreur benigne sur la partie de pdq qui n'est pas zdqnorm 1121 !!!!!!! ps: la raison est que dt n'est pas passe dans meso_physiq 1122 !!!!!!! 1123 !IF (firstcall .EQV. .true.) THEN 1124 ! pdq(:,:,:) = pdq(:,:,:) / dt 1125 !ENDIF 1118 !!!!!! PATCH SPECIAL STORM 1119 #ifdef NEWPHYS 1120 #ifdef storm 1121 #include "../mars_lmd/storm.inc" 1122 #endif 1123 #endif 1124 !!!!!! PATCH SPECIAL STORM 1126 1125 1127 1126
Note: See TracChangeset
for help on using the changeset viewer.