My Project
|
#include "YOMCST.h"
Go to the source code of this file.
Functions/Subroutines | |
subroutine | get_uvd (itap, dtime, file_forctl, file_fordat,:ht, hq, hw, hu, hv, hthturb, hqturb,:Ts, imp_fcg, ts_fcg, Tp_fcg, Turb_fcg) c implicit none cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc c cette routine permet d obtenir u_convg |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL | play (100)!pression en Pa au milieu de chaque couche GCM INTEGER JM(100)!pression en Pa au milieu de chaque couche GCM REAL coef1(100)!coefficient d interpolation REAL coef2(100)!coefficient d interpolation INTEGER nblvlm!nombre de niveau de pression du mesoNH REAL playm(100)!pression en Pa au milieu de chaque couche Meso-NH REAL hplaym(100)!pression en hPa milieux des couches Meso-NH integer i |
Variables | |
subroutine | v_convg |
subroutine | ht |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL | j |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL | k |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL | ii |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL | ll |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL | tsol |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER * | file_forctl |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss | klev |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss | play |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss | JM |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss | coef1 |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss | nblvlm |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss | playm |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss hplaym | c |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss hplaym on y c a acces a tout pas detemps grace a la routine rdgrads qui c est une boucle lisant dans ces fichiers c Puis on interpole ces donnes sur les niveaux du gcm et c et sur les pas de temps de ce meme gcm c c | input |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss hplaym on y c a acces a tout pas detemps grace a la routine rdgrads qui c est une boucle lisant dans ces fichiers c Puis on interpole ces donnes sur les niveaux du gcm et c et sur les pas de temps de ce meme gcm c c dt save | pasmax |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss hplaym on y c a acces a tout pas detemps grace a la routine rdgrads qui c est une boucle lisant dans ces fichiers c Puis on interpole ces donnes sur les niveaux du gcm et c et sur les pas de temps de ce meme gcm c c dt save dt c c | arguments |
subroutine get_uvd | ( | itap | , |
dtime | , | ||
file_forctl | , | ||
file_fordat | , | ||
:ht | , | ||
hq | , | ||
hw | , | ||
hu | , | ||
hv | , | ||
hthturb | , | ||
hqturb | , | ||
:Ts | , | ||
imp_fcg | , | ||
ts_fcg | , | ||
Tp_fcg | , | ||
Turb_fcg | |||
) |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL play | ( | 100 | ) |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss hplaym on y c a acces a tout pas detemps grace a la routine rdgrads qui c est une boucle lisant dans ces fichiers c Puis on interpole ces donnes sur les niveaux du gcm et c et sur les pas de temps de ce meme gcm c c dt save dt c c arguments |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss hplaym on y c a acces a tout pas detemps grace a la routine rdgrads qui c est une boucle lisant dans ces fichiers c Puis on interpole ces donnes sur les niveaux du gcm et c et sur les pas de temps de ce meme gcm c c input |
subroutine hq et ainsi de c pouvoir calculer la convergence et le cisaillement dans la physiq ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc INTEGER klev REAL in REAL qsol CHARACTER file_fordat COMMON com1_phys_gcss coef2 COMMON com2_phys_gcss hplaym on y c a acces a tout pas detemps grace a la routine rdgrads qui c est une boucle lisant dans ces fichiers c Puis on interpole ces donnes sur les niveaux du gcm et c et sur les pas de temps de ce meme gcm c c dt save pasmax |