From 19088a1e1ff97f3ba3d8d2515e37cef9c15767df Mon Sep 17 00:00:00 2001 From: Gaelle DELAUTIER <gaelle.delautier@meteo.fr> Date: Mon, 23 Apr 2018 14:36:32 +0200 Subject: [PATCH] Gaelle 23/04/2018 : bug ncl script corrections --- .../004_Reunion/006_ncl/plot_Reunion.ncl | 12 ++-- .../KTEST/007_16janvier/011_ncl/plot_16j.ncl | 12 ++-- .../007_16janvier/011_ncl/plot_16j_2.ncl | 12 ++-- .../KTEST/009_ICARTT/006_ncl/plot_ICARTT.ncl | 58 +++++++++---------- .../009_ICARTT/006_ncl/plot_ICARTT_budget.ncl | 19 +++--- .../011_KW78CHEM/005_ncl/plot_KW78_chem.ncl | 58 +++++++++---------- MY_RUN/KTEST/012_dust/007_ncl/plot_dust.ncl | 20 +++---- MY_RUN/KTEST/014_LIMA/003_ncl/plot_LIMA.ncl | 12 ++-- 8 files changed, 103 insertions(+), 100 deletions(-) diff --git a/MY_RUN/KTEST/004_Reunion/006_ncl/plot_Reunion.ncl b/MY_RUN/KTEST/004_Reunion/006_ncl/plot_Reunion.ncl index 747d0c3c4..3898b26b9 100644 --- a/MY_RUN/KTEST/004_Reunion/006_ncl/plot_Reunion.ncl +++ b/MY_RUN/KTEST/004_Reunion/006_ncl/plot_Reunion.ncl @@ -102,28 +102,28 @@ load "$NCARG_ROOT/lib/ncarg/nclscripts/wrf/WRFUserARW.ncl" zs@lat2d = lat2d zs@lon2d = lon2d - wt= fichier1->WT(1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT - vt= fichier1->VT(1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1); VT - ut= fichier1->UT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT + wt= fichier1->WT(0,1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT + vt= fichier1->VT(0,1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1); VT + ut= fichier1->UT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT tht= fichier1->THT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT tht@long_name="Potential Temperature" tht@units="K" tht@lat2d = lat2d tht@lon2d = lon2d - lsthm= fichier1->LSTHM(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ;LSTHM + lsthm= fichier1->LSTHM(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ;LSTHM lsthm@long_name="Large SCale Potential Temperature" lsthm@units="K" lsthm@lat2d = lat2d lsthm@lon2d = lon2d - lsvm= fichier1->LSVM(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; LSVM + lsvm= fichier1->LSVM(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; LSVM lsvm@long_name="Large SCale Merdian Wind" lsvm@units="m/s" lsvm@lat2d = lat2d lsvm@lon2d = lon2d - pabst= fichier1->PABST(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; PABST + pabst= fichier1->PABST(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; PABST pabst@long_name="Pressure" pabst@units="Pa" pabst@lat2d = lat2d diff --git a/MY_RUN/KTEST/007_16janvier/011_ncl/plot_16j.ncl b/MY_RUN/KTEST/007_16janvier/011_ncl/plot_16j.ncl index cd16dc4f3..961b4a278 100644 --- a/MY_RUN/KTEST/007_16janvier/011_ncl/plot_16j.ncl +++ b/MY_RUN/KTEST/007_16janvier/011_ncl/plot_16j.ncl @@ -110,11 +110,11 @@ zs@lat2d = lat2d zs@lon2d = lon2d -wt= fichier1->WT(1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT -vt= fichier1->VT(1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1) ; VT -ut= fichier1->UT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT +wt= fichier1->WT(0,1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT +vt= fichier1->VT(0,1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1) ; VT +ut= fichier1->UT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT -tht1= fichier1->THT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT +tht1= fichier1->THT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT tht1@long_name="Potential Temperature" tht1@units="K" tht1@lat2d = lat2d @@ -122,13 +122,13 @@ tht1@lon2d = lon2d -pabst1= fichier1->PABST(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; PABST +pabst1= fichier1->PABST(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; PABST pabst1@long_name="Pressure" pabst1@units="Pa" pabst1@lat2d = lat2d pabst1@lon2d = lon2d -rvt1= fichier1->RVT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RVT +rvt1= fichier1->RVT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RVT rvt1=rvt1*1000 rvt1@long_name="Vapor mixing ratio" rvt1@units="kg/kg" diff --git a/MY_RUN/KTEST/007_16janvier/011_ncl/plot_16j_2.ncl b/MY_RUN/KTEST/007_16janvier/011_ncl/plot_16j_2.ncl index 5de8a4a62..ffef5341c 100644 --- a/MY_RUN/KTEST/007_16janvier/011_ncl/plot_16j_2.ncl +++ b/MY_RUN/KTEST/007_16janvier/011_ncl/plot_16j_2.ncl @@ -109,11 +109,11 @@ zs@lat2d = lat2d zs@lon2d = lon2d -wt= fichier1->WT(1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT -vt= fichier1->VT(1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1) ; VT -ut= fichier1->UT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT +wt= fichier1->WT(0,1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT +vt= fichier1->VT(0,1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1) ; VT +ut= fichier1->UT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT -tht1= fichier1->THT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT +tht1= fichier1->THT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT tht1@long_name="Potential Temperature" tht1@units="K" tht1@lat2d = lat2d @@ -121,13 +121,13 @@ tht1@lon2d = lon2d -pabst1= fichier1->PABST(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; PABST +pabst1= fichier1->PABST(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; PABST pabst1@long_name="Pressure" pabst1@units="Pa" pabst1@lat2d = lat2d pabst1@lon2d = lon2d -rvt1= fichier1->RVT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RVT +rvt1= fichier1->RVT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RVT rvt1=rvt1*1000 rvt1@long_name="Vapor mixing ratio" rvt1@units="kg/kg" diff --git a/MY_RUN/KTEST/009_ICARTT/006_ncl/plot_ICARTT.ncl b/MY_RUN/KTEST/009_ICARTT/006_ncl/plot_ICARTT.ncl index 40e2405c6..0ae28c72e 100644 --- a/MY_RUN/KTEST/009_ICARTT/006_ncl/plot_ICARTT.ncl +++ b/MY_RUN/KTEST/009_ICARTT/006_ncl/plot_ICARTT.ncl @@ -38,7 +38,7 @@ zs@lon2d = lon2d printMinMax(zs,0) - rc_t1 = a->MRC(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + rc_t1 = a->MRC(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) rc_t1@long_name="Cloud mixing ratio" rc_t1@units="g/kg" rc_t1@lat2d=lat2d @@ -46,21 +46,21 @@ printMinMax(zs,0) printMinMax(rc_t1,0) ; - o3_t1 = a->O3T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + o3_t1 = a->O3T(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) o3_t1@long_name="Ozone" o3_t1@units="ppbv" o3_t1@lat2d=lat2d o3_t1@lon2d=lon2d ; - co_t1 = a->COT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + co_t1 = a->COT(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) co_t1@long_name="carbon monoxide" co_t1@units="ppbv" co_t1@lat2d=lat2d co_t1@lon2d=lon2d ; - o3p_t1=a->O3_PROD(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + o3p_t1=a->O3_PROD(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) o3p_t1 = o3p_t1*1e9*3600 o3p_t1@long_name="ozone production" o3p_t1@units="ppbv/h" @@ -68,7 +68,7 @@ printMinMax(rc_t1,0) o3p_t1@lon2d=lon2d ; - o3l_t1=a->O3_LOSS(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + o3l_t1=a->O3_LOSS(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) o3l_t1 = o3l_t1*1e9*3600 o3l_t1@long_name="ozone loss" o3l_t1@units="ppbv/h" @@ -76,7 +76,7 @@ printMinMax(rc_t1,0) o3l_t1@lon2d=lon2d ; - cop_t1=a->CO_PROD(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + cop_t1=a->CO_PROD(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) cop_t1 = cop_t1*1e9*3600 cop_t1@long_name="carbon monoxide production" cop_t1@units="ppbv/h" @@ -84,7 +84,7 @@ printMinMax(rc_t1,0) cop_t1@lon2d=lon2d ; - col_t1=a->CO_LOSS(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + col_t1=a->CO_LOSS(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) col_t1 = col_t1*1e9*3600 col_t1@long_name="carbon monoxide loss" col_t1@units="ppbv/h" @@ -94,28 +94,28 @@ printMinMax(rc_t1,0) ; ; - rc_t2 = a2->MRC(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + rc_t2 = a2->MRC(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) rc_t2@long_name="Cloud mixing ratio" rc_t2@units="g/kg" rc_t2@lat2d=lat2d rc_t2@lon2d=lon2d ; - o3_t2 = a2->O3T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + o3_t2 = a2->O3T(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) o3_t2@long_name="Ozone" o3_t2@units="ppbv" o3_t2@lat2d=lat2d o3_t2@lon2d=lon2d ; - co_t2 = a2->COT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + co_t2 = a2->COT(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) co_t2@long_name="carbon monoxide" co_t2@units="ppbv" co_t2@lat2d=lat2d co_t2@lon2d=lon2d ; - o3p_t2=a2->O3_PROD(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + o3p_t2=a2->O3_PROD(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) o3p_t2=o3p_t2*1e9*3600 o3p_t2@long_name="ozone production" o3p_t2@units="pptv/h" @@ -123,7 +123,7 @@ printMinMax(rc_t1,0) o3p_t2@lon2d=lon2d ; - o3l_t2=a2->O3_LOSS(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + o3l_t2=a2->O3_LOSS(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) o3l_t2=o3l_t2*1e9*3600 o3l_t2@long_name="ozone loss" o3l_t2@units="pptv/h" @@ -131,7 +131,7 @@ printMinMax(rc_t1,0) o3l_t2@lon2d=lon2d ; - cop_t2=a2->CO_PROD(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + cop_t2=a2->CO_PROD(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) cop_t2=cop_t2*1e9*3600 cop_t2@long_name="carbon monoxide production" cop_t2@units="pptv/h" @@ -139,7 +139,7 @@ printMinMax(rc_t1,0) cop_t2@lon2d=lon2d ; - col_t2=a2->CO_LOSS(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + col_t2=a2->CO_LOSS(:,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) col_t2=col_t2*1e9*3600 col_t2@long_name="carbon monoxide loss" col_t2@units="ppbv/h" @@ -167,7 +167,7 @@ zhat= a2->ZHAT(1:kmax+1) do i=0,imax-1 do j=0,jmax-1 - alt(:,j,i) = nzhat*zcoef(j,i)+zs(j,i) + alt(0,:,j,i) = nzhat*zcoef(j,i)+zs(j,i) end do end do @@ -250,23 +250,23 @@ alt@lon2d = lon2d ; PLOT ;=================================================; ; interpolation des champs a 1250 m -rc_t1_plane = wrf_user_intrp3d(rc_t1,alt,"h",1250,0.,False) +rc_t1_plane = wrf_user_intrp3d(rc_t1(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) printMinMax(rc_t1_plane,0) printMinMax(alt,0) -rc_t2_plane = wrf_user_intrp3d(rc_t2,alt,"h",1250,0.,False) -co_t1_plane = wrf_user_intrp3d(co_t1,alt,"h",1250,0.,False) -co_t2_plane = wrf_user_intrp3d(co_t2,alt,"h",1250,0.,False) -cop_t1_plane= wrf_user_intrp3d(cop_t1,alt,"h",1250,0.,False) -cop_t2_plane= wrf_user_intrp3d(cop_t2,alt,"h",1250,0.,False) -col_t1_plane= wrf_user_intrp3d(col_t1,alt,"h",1250,0.,False) -col_t2_plane= wrf_user_intrp3d(col_t2,alt,"h",1250,0.,False) -o3_t1_plane = wrf_user_intrp3d(o3_t1,alt,"h",1250,0.,False) -o3_t2_plane = wrf_user_intrp3d(o3_t2,alt,"h",1250,0.,False) -o3l_t1_plane= wrf_user_intrp3d(o3l_t1,alt,"h",1250,0.,False) -o3l_t2_plane= wrf_user_intrp3d(o3l_t2,alt,"h",1250,0.,False) -o3p_t1_plane= wrf_user_intrp3d(o3p_t1,alt,"h",1250,0.,False) -o3p_t2_plane= wrf_user_intrp3d(o3p_t2,alt,"h",1250,0.,False) +rc_t2_plane = wrf_user_intrp3d(rc_t2(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +co_t1_plane = wrf_user_intrp3d(co_t1(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +co_t2_plane = wrf_user_intrp3d(co_t2(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +cop_t1_plane= wrf_user_intrp3d(cop_t1(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +cop_t2_plane= wrf_user_intrp3d(cop_t2(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +col_t1_plane= wrf_user_intrp3d(col_t1(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +col_t2_plane= wrf_user_intrp3d(col_t2(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +o3_t1_plane = wrf_user_intrp3d(o3_t1(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +o3_t2_plane = wrf_user_intrp3d(o3_t2(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +o3l_t1_plane= wrf_user_intrp3d(o3l_t1(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +o3l_t2_plane= wrf_user_intrp3d(o3l_t2(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +o3p_t1_plane= wrf_user_intrp3d(o3p_t1(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) +o3p_t2_plane= wrf_user_intrp3d(o3p_t2(0,:,:,:),alt(0,:,:,:),"h",1250,0.,False) figname ="zsection_1250" diff --git a/MY_RUN/KTEST/009_ICARTT/006_ncl/plot_ICARTT_budget.ncl b/MY_RUN/KTEST/009_ICARTT/006_ncl/plot_ICARTT_budget.ncl index 4350a7ae8..b3c9aac40 100644 --- a/MY_RUN/KTEST/009_ICARTT/006_ncl/plot_ICARTT_budget.ncl +++ b/MY_RUN/KTEST/009_ICARTT/006_ncl/plot_ICARTT_budget.ncl @@ -27,41 +27,44 @@ begin ;-------------------------------------------------; ; Liste de toutes les réactions impliquant O3 - o3_list_t1=a->O3_CHREACLIST + o3_list_t1=a->O3_CHREACLIST(0,:) ; Tableau 4D (reac,Z,Y,X) regroupant les termes de prod. et destr. de O3 ; Niveau k=13 approx. 1250m - o3_budget_t1=a->O3_BUDGET(:,13,jphext:jmax+jphext-1,jphext:imax+jphext-1) + o3_budget_t1=a->O3_BUDGET(0,:,13,jphext:jmax+jphext-1,jphext:imax+jphext-1) + printVarSummary(o3_budget_t1) o3_bud_t1=dim_avg_n(o3_budget_t1,(/1,2/)) + printVarSummary(o3_bud_t1) + o3_bud_t1=o3_bud_t1*1e9*3600 o3_bud_t1@units="ppbv/h" ; Liste de toutes les réactions impliquant CO - co_list_t1=a->CO_CHREACLIST + co_list_t1=a->CO_CHREACLIST(0,:) ; Tableau 4D (reac,Z,Y,X) regroupant les termes de prod. et destr. de CO ; Niveau k=13 approx. 1250m - co_budget_t1=a->CO_BUDGET(:,13,jphext:jmax+jphext-1,jphext:imax+jphext-1) + co_budget_t1=a->CO_BUDGET(0,:,13,jphext:jmax+jphext-1,jphext:imax+jphext-1) co_bud_t1=dim_avg_n(co_budget_t1,(/1,2/)) co_bud_t1=co_bud_t1*1e9*3600 co_bud_t1@units="ppbv/h" ; Liste de toutes les réactions impliquant O3 - o3_list_t2=a2->O3_CHREACLIST + o3_list_t2=a2->O3_CHREACLIST(0,:) ; Tableau 4D (reac,Z,Y,X) regroupant les termes de prod. et destr. de O3 ; Niveau k=13 approx. 1250m - o3_budget_t2=a2->O3_BUDGET(:,13,jphext:jmax+jphext-1,jphext:imax+jphext-1) + o3_budget_t2=a2->O3_BUDGET(0,:,13,jphext:jmax+jphext-1,jphext:imax+jphext-1) o3_bud_t2=dim_avg_n(o3_budget_t2,(/1,2/)) o3_bud_t2=o3_bud_t2*1e9*3600 o3_bud_t2@units="ppbv/h" ; Liste de toutes les réactions impliquant CO - co_list_t2=a2->CO_CHREACLIST + co_list_t2=a2->CO_CHREACLIST(0,:) ; Tableau 4D (reac,Z,Y,X) regroupant les termes de prod. et destr. de CO ; Niveau k=13 approx. 1250m - co_budget_t2=a2->CO_BUDGET(:,13,jphext:jmax+jphext-1,jphext:imax+jphext-1) + co_budget_t2=a2->CO_BUDGET(0,:,13,jphext:jmax+jphext-1,jphext:imax+jphext-1) co_bud_t2=dim_avg_n(co_budget_t2,(/1,2/)) co_bud_t2=co_bud_t2*1e9*3600 co_bud_t2@units="ppbv/h" diff --git a/MY_RUN/KTEST/011_KW78CHEM/005_ncl/plot_KW78_chem.ncl b/MY_RUN/KTEST/011_KW78CHEM/005_ncl/plot_KW78_chem.ncl index 0b46e4c93..9c7bdef5b 100644 --- a/MY_RUN/KTEST/011_KW78CHEM/005_ncl/plot_KW78_chem.ncl +++ b/MY_RUN/KTEST/011_KW78CHEM/005_ncl/plot_KW78_chem.ncl @@ -33,94 +33,94 @@ zhat = fichier1->ZHAT(1:kmax+1) ; ZHAT yhat = fichier1->YHAT(1:jmax+jphext-1+1) ; YHAT xhat = fichier1->XHAT(1:imax+jphext-1+1) ; XHAT -wt= fichier1->WT(1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT -vt= fichier1->VT(1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1) ; VT -ut= fichier1->UT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT -tht1= fichier1->THT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT +wt= fichier1->WT(0,1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT +vt= fichier1->VT(0,1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1) ; VT +ut= fichier1->UT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT +tht1= fichier1->THT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT tht1@long_name="Potential Temperature" tht1@units="K" - lsthm1= fichier1->LSTHM(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) + lsthm1= fichier1->LSTHM(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) lsthm1@long_name="Large SCale Potential Temperature" lsthm1@units="K" -pabst1= fichier1->PABST(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; PABST +pabst1= fichier1->PABST(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; PABST pabst1@long_name="Pressure" pabst1@units="Pa" -rvt1= fichier1->RVT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RVT +rvt1= fichier1->RVT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RVT rvt1@long_name="Vapor mixing ratio" rvt1@units="kg/kg" -rct1= fichier1->RCT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RCT +rct1= fichier1->RCT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RCT rct1@long_name="Cloud mixing ratio" rct1@units="kg/kg" -rrt1= fichier1->RRT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RRT +rrt1= fichier1->RRT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RRT rrt1@long_name="Rain mixing ratio" rrt1@units="kg/kg" -rst1= fichier1->RST(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RRT +rst1= fichier1->RST(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RRT rst1@long_name="Snow mixing ratio" rst1@units="kg/kg" -rgt1= fichier1->RGT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RRT +rgt1= fichier1->RGT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; RRT rgt1@long_name="Graupel mixing ratio" rgt1@units="kg/kg" -inprr= fichier1->INPRR(jphext:jmax+jphext-1,jphext:imax+jphext-1) +inprr= fichier1->INPRR(0,jphext:jmax+jphext-1,jphext:imax+jphext-1) inprr@long_name="Instantaneous Precipitation Rain Rate" inprr@units="mm/h" -acprr= fichier1->ACPRR(jphext:jmax+jphext-1,jphext:imax+jphext-1) +acprr= fichier1->ACPRR(0,jphext:jmax+jphext-1,jphext:imax+jphext-1) acprr@long_name="Accumulated Precipitation Rain Rate" acprr@units="mm" -cot1= fichier1->COT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; COT +cot1= fichier1->COT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; COT cot1@long_name="carbon monoxide" cot1@units="ppp" -o3t1= fichier1->O3T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; O3T +o3t1= fichier1->O3T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; O3T o3t1@long_name="Ozone" o3t1@units="ppp" -hchot1= fichier1->HCHOT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; HCHOT +hchot1= fichier1->HCHOT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; HCHOT hchot1@long_name="HCHO" hchot1@units="ppp" -wc_hchot1= fichier1->WC_HCHOT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +wc_hchot1= fichier1->WC_HCHOT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) wc_hchot1@long_name="WC_HCHO" wc_hchot1@units="ppp" -wr_hchot1= fichier1->WR_HCHOT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +wr_hchot1= fichier1->WR_HCHOT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) wr_hchot1@long_name="WR_HCHO" wr_hchot1@units="ppp" -ic_hchot1= fichier1->IC_HCHOT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +ic_hchot1= fichier1->IC_HCHOT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ic_hchot1@long_name="IC_HCHO" ic_hchot1@units="ppp" -so2t1= fichier1->SO2T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; SO2T +so2t1= fichier1->SO2T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; SO2T so2t1@long_name="SO2" so2t1@units="ppp" -wc_so2t1= fichier1->WC_SO2T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +wc_so2t1= fichier1->WC_SO2T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) wc_so2t1@long_name="WC_SO2" wc_so2t1@units="ppp" -wr_so2t1= fichier1->WR_SO2T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +wr_so2t1= fichier1->WR_SO2T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) wr_so2t1@long_name="WR_SO2" wr_so2t1@units="ppp" -ic_so2t1= fichier1->IC_SO2T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +ic_so2t1= fichier1->IC_SO2T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ic_so2t1@long_name="IC_SO2" ic_so2t1@units="ppp" -hno3t1= fichier1->HNO3T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; HNO3T +hno3t1= fichier1->HNO3T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; HNO3T hno3t1@long_name="HNO3" hno3t1@units="ppp" -wc_hno3t1= fichier1->WC_HNO3T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +wc_hno3t1= fichier1->WC_HNO3T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) wc_hno3t1@long_name="WC_HNO3" wc_hno3t1@units="ppp" -wr_hno3t1= fichier1->WR_HNO3T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +wr_hno3t1= fichier1->WR_HNO3T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) wr_hno3t1@long_name="WR_HNO3" wr_hno3t1@units="ppp" -ic_hno3t1= fichier1->IC_HNO3T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +ic_hno3t1= fichier1->IC_HNO3T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ic_hno3t1@long_name="IC_HNO3" ic_hno3t1@units="ppp" -phc1= fichier1->PHC(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +phc1= fichier1->PHC(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) phc1@long_name="PHC" phc1@units=" " -phr1= fichier1->PHR(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +phr1= fichier1->PHR(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) phr1@long_name="PHR" phr1@units=" " diff --git a/MY_RUN/KTEST/012_dust/007_ncl/plot_dust.ncl b/MY_RUN/KTEST/012_dust/007_ncl/plot_dust.ncl index c3553f1dd..48570d40c 100644 --- a/MY_RUN/KTEST/012_dust/007_ncl/plot_dust.ncl +++ b/MY_RUN/KTEST/012_dust/007_ncl/plot_dust.ncl @@ -111,11 +111,11 @@ BETA = fichier1->BETA ;=================================================; ; lecture des différents champs ;=================================================; -wt= fichier1->WT(1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT -vt= fichier1->VT(1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1) ; VT -ut= fichier1->UT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT +wt= fichier1->WT(0,1:kmax+1,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; WT +vt= fichier1->VT(0,1:kmax,jphext:jmax+jphext-1+1,jphext:imax+jphext-1) ; VT +ut= fichier1->UT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1+1) ; UT -tht= fichier1->THT(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT +tht= fichier1->THT(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) ; THT tht@long_name="Potential Temperature" tht@units="K" tht@lat2d = lat2d @@ -123,37 +123,37 @@ tht@lon2d = lon2d -dstm03t= fichier1->DSTM03T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +dstm03t= fichier1->DSTM03T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) dstm03t@long_name="DSTM03T" dstm03t@units="ppp" dstm03t@lat2d = lat2d dstm03t@lon2d = lon2d -dstm33t= fichier1->DSTM33T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +dstm33t= fichier1->DSTM33T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) dstm33t@long_name="DSTM33T" dstm33t@units="ppp" dstm33t@lat2d = lat2d dstm33t@lon2d = lon2d -dstm02t= fichier1->DSTM02T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +dstm02t= fichier1->DSTM02T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) dstm02t@long_name="DSTM02T" dstm02t@units="ppp" dstm02t@lat2d = lat2d dstm02t@lon2d = lon2d -dstm32t= fichier1->DSTM32T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +dstm32t= fichier1->DSTM32T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) dstm32t@long_name="DSTM32T" dstm32t@units="ppp" dstm32t@lat2d = lat2d dstm32t@lon2d = lon2d -dstm01t= fichier1->DSTM01T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +dstm01t= fichier1->DSTM01T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) dstm01t@long_name="DSTM01T" dstm01t@units="ppp" dstm01t@lat2d = lat2d dstm01t@lon2d = lon2d -dstm31t= fichier1->DSTM31T(1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) +dstm31t= fichier1->DSTM31T(0,1:kmax,jphext:jmax+jphext-1,jphext:imax+jphext-1) dstm31t@long_name="DSTM31T" dstm31t@units="ppp" dstm31t@lat2d = lat2d diff --git a/MY_RUN/KTEST/014_LIMA/003_ncl/plot_LIMA.ncl b/MY_RUN/KTEST/014_LIMA/003_ncl/plot_LIMA.ncl index cf5400f7e..aca671e9a 100644 --- a/MY_RUN/KTEST/014_LIMA/003_ncl/plot_LIMA.ncl +++ b/MY_RUN/KTEST/014_LIMA/003_ncl/plot_LIMA.ncl @@ -16,32 +16,32 @@ begin ;=================================================; ; lecture des différents champs ;=================================================; -vname = "RI___0001--PROC3" +vname = "RI___0001___AVEF_BU_RRI" RI___0001_P3= fichier1->$vname$(0,0,:,0,:) RI___0001_P3@long_name="ice water content" RI___0001_P3@units="g/kg" -vname2 = "SV0050001--PROC3" +vname2 = "SV0050001___AVEF_BU_RSV" NI___0001_P3= fichier1->$vname2$(0,0,:,0,:) NI___0001_P3@long_name="ice concentration" NI___0001_P3@units="/kg" -vname3 = "RS___0001--PROC3" +vname3 = "RS___0001___AVEF_BU_RRS" RS___0001_P3= fichier1->$vname3$(0,0,:,0,:) RS___0001_P3@long_name="snow water content" RS___0001_P3@units="g/kg" -vname4 = "RG___0001--PROC3" +vname4 = "RG___0001___AVEF_BU_RRG" RG___0001_P3= fichier1->$vname4$(0,0,:,0,:) RG___0001_P3@long_name="graupel water content" RG___0001_P3@units="g/kg" -vname5 = "SV0060001--PROC3" +vname5 = "SV0060001___AVEF_BU_RSV" N_IFN_FREE_P3= fichier1->$vname5$(0,0,:,0,:) N_IFN_FREE_P3@long_name="concentration of free IFN" N_IFN_FREE_P3@units="/kg" -vname6 = "SV0070001--PROC3" +vname6 = "SV0070001___AVEF_BU_RSV" N_IFN_NUCL_P3= fichier1->$vname6$(0,0,:,0,:) N_IFN_NUCL_P3@long_name="concentration of nucleated IFN" N_IFN_NUCL_P3@units="/kg" -- GitLab