* Mise à niveau (de la dynamique) par rapport à la version 1447 de LMDZ5 * ---------------------------------------------------------------------- * Pour l'instant, on n'a pas touché à dyn3dpar, donc pour l'instant on ne fait que recopier les fichiers de la version 1447 * Mise à jour de routines (dans dyn3d) qui n'ont changé que côté LMDZ5: - ener.h - grid_noro.F - iniacademic.F - integrd.F - limit_netcdf.F90 * Mise à jour des routines qui ont changé des deux côtés: - addfi.F * ajout d'un "USE control_mod, ONLY : planet_type" * mise en forme du if (planet_type=="earth") à l'identique de la revision 1447 (pour être peinard vis-à-vis de futures diff). - caladvtrac.F * ajout d'un "USE control_mod, ONLY : iapp_tracvl,planet_type" * mise en conformité de la taille du tableau dq(ip1jmp1,llm,nqtot) et non pas dq(ip1jmp1,llm,2) (qui oblige à avoir au moins 2 traceurs...) * mise entre if (planet_type=="earth") des calculs après advtrac (à nouveau, il faut avoir au moins 2 traceurs pour que ça ait un sens; et encore, ce morceau ne sert peut-être au final à rien). * A nouveau ces modifs étaient déjà en partie déjà faites; j'ai juste remis en forme comme dans la révision 1447 pour rester homogène avec le code terrestre. - gcm.F * Mise d'un #ifdef CPP_PHYS autoure de Init_Phys_lmdz et InitComgeomphy , au lieu du (bancal) #ifdef CPP_EARTH * De même il faut bel et bien un #ifdef CPP_PHYS autour de iniphysiq & co. - infotrac.F90 * Ajout des modifs de forme et correction sur l'utilisation de trim() et taille des tableaux str1(23),str2(23) * On garde un type_trac='plnt' pour les planètes (Attention, il faudra vérifier que ça ne casse rien par ailleurs et surtout n'est-ce finalement pas redoundant avec le planet_type?). - leapfrog.F * Ajout des modifs/améliorations pour le cas académique sans physique mais en utilisant dutop(),dvtop(), etc. pour le sponge layer