| 1 | * Mise à niveau (de la dynamique) par rapport à la version 1447 de LMDZ5 |
|---|
| 2 | * ---------------------------------------------------------------------- |
|---|
| 3 | |
|---|
| 4 | * Pour l'instant, on n'a pas touché à dyn3dpar, donc pour l'instant on ne |
|---|
| 5 | fait que recopier les fichiers de la version 1447 |
|---|
| 6 | |
|---|
| 7 | * Mise à jour de routines (dans dyn3d) qui n'ont changé que côté LMDZ5: |
|---|
| 8 | - ener.h |
|---|
| 9 | - grid_noro.F |
|---|
| 10 | - iniacademic.F |
|---|
| 11 | - integrd.F |
|---|
| 12 | - limit_netcdf.F90 |
|---|
| 13 | |
|---|
| 14 | * Mise à jour des routines qui ont changé des deux côtés: |
|---|
| 15 | - addfi.F |
|---|
| 16 | * ajout d'un "USE control_mod, ONLY : planet_type" |
|---|
| 17 | * mise en forme du if (planet_type=="earth") à l'identique de la revision 1447 (pour être peinard vis-à-vis de futures diff). |
|---|
| 18 | - caladvtrac.F |
|---|
| 19 | * ajout d'un "USE control_mod, ONLY : iapp_tracvl,planet_type" |
|---|
| 20 | * 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...) |
|---|
| 21 | * 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). |
|---|
| 22 | * 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. |
|---|
| 23 | - gcm.F |
|---|
| 24 | * Mise d'un #ifdef CPP_PHYS autoure de Init_Phys_lmdz et InitComgeomphy , au lieu du (bancal) #ifdef CPP_EARTH |
|---|
| 25 | * De même il faut bel et bien un #ifdef CPP_PHYS autour de iniphysiq & co. |
|---|
| 26 | - infotrac.F90 |
|---|
| 27 | * Ajout des modifs de forme et correction sur l'utilisation de trim() et taille des tableaux str1(23),str2(23) |
|---|
| 28 | * 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?). |
|---|
| 29 | - leapfrog.F |
|---|
| 30 | * Ajout des modifs/améliorations pour le cas académique sans physique |
|---|
| 31 | mais en utilisant dutop(),dvtop(), etc. pour le sponge layer |
|---|
| 32 | |
|---|
