| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
103 |
DO_FIZHI |
_RL p(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
106 |
DO_FIZHI |
_RL pl(sNx,sNy,Nrphys,Nsx,Nsy),pkl(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
107 |
DO_FIZHI |
_RL ple(sNx,sNy,Nrphys+1,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
108 |
DO_FIZHI |
_RL pkle(sNx,sNy,Nrphys+1,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
109 |
DO_FIZHI |
_RL dpres(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
110 |
DO_FIZHI |
_RL lwdt(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
111 |
DO_FIZHI |
_RL lwdtclr(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
112 |
DO_FIZHI |
_RL swdt(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
113 |
DO_FIZHI |
_RL swdtclr(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
114 |
DO_FIZHI |
_RL turbu(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
115 |
DO_FIZHI |
_RL turbv(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
116 |
DO_FIZHI |
_RL turbt(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
117 |
DO_FIZHI |
_RL turbq(sNx,sNy,Nrphys,ntracer,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
118 |
DO_FIZHI |
_RL moistu(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
119 |
DO_FIZHI |
_RL moistv(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
120 |
DO_FIZHI |
_RL moistt(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
121 |
DO_FIZHI |
_RL moistq(sNx,sNy,Nrphys,ntracer,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
122 |
DO_FIZHI |
_RL radswt(sNx,sNy,Nsx,Nsy),radswg(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
123 |
DO_FIZHI |
_RL swgclr(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
124 |
DO_FIZHI |
_RL fdirpar(sNx,sNy,Nsx,Nsy),fdifpar(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
125 |
DO_FIZHI |
_RL osr(sNx,sNy,Nsx,Nsy),osrclr(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
126 |
DO_FIZHI |
_RL tg0(sNx,sNy,Nsx,Nsy),radlwg(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
127 |
DO_FIZHI |
_RL lwgclr(sNx,sNy,Nsx,Nsy),st4(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
128 |
DO_FIZHI |
_RL dst4(sNx,sNy,Nsx,Nsy),dlwdtg(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
129 |
DO_FIZHI |
_RL qq(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
314 |
DO_FIZHI |
. im1,im2,jm1,jm2,Nrphys,Nsx,Nsy,bi,bj,ntracer) |
|
./pkg/fizhi/fizhi_SHP.h |
13 |
NO PROCEDURE |
_RL ubef(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_SHP.h |
14 |
NO PROCEDURE |
_RL vbef(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_SHP.h |
15 |
NO PROCEDURE |
_RL thbef(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_SHP.h |
16 |
NO PROCEDURE |
_RL sbef(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_SHP.h |
17 |
NO PROCEDURE |
_RL udynbef(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_SHP.h |
18 |
NO PROCEDURE |
_RL vdynbef(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_SHP.h |
19 |
NO PROCEDURE |
_RL thdynbef(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_SHP.h |
20 |
NO PROCEDURE |
_RL sdynbef(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_chemistry_coms.h |
32 |
NO PROCEDURE |
_RL o3(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_chemistry_coms.h |
33 |
NO PROCEDURE |
_RL qstr(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
13 |
NO PROCEDURE |
_RL uphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
14 |
NO PROCEDURE |
_RL vphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
15 |
NO PROCEDURE |
_RL thphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
16 |
NO PROCEDURE |
_RL sphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
17 |
NO PROCEDURE |
_RL ctmt(nchp,Nsx,Nsy), xxmt(nchp,Nsx,Nsy), yymt(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
18 |
NO PROCEDURE |
_RL zetamt(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
19 |
NO PROCEDURE |
_RL xlmt(nchp,Nrphys,Nsx,Nsy), khmt(nchp,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
20 |
NO PROCEDURE |
_RL tke(nchp,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
26 |
NO PROCEDURE |
_RL duphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
27 |
NO PROCEDURE |
_RL dvphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
28 |
NO PROCEDURE |
_RL dthphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
29 |
NO PROCEDURE |
_RL dsphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
35 |
NO PROCEDURE |
_RL guphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
36 |
NO PROCEDURE |
_RL gvphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
37 |
NO PROCEDURE |
_RL gthphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
38 |
NO PROCEDURE |
_RL gsphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
49 |
NO PROCEDURE |
_RL cldtot_lw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
50 |
NO PROCEDURE |
_RL cldras_lw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
51 |
NO PROCEDURE |
_RL cldlsp_lw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
52 |
NO PROCEDURE |
_RL lwlz(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
53 |
NO PROCEDURE |
_RL cldtot_sw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
54 |
NO PROCEDURE |
_RL cldras_sw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
55 |
NO PROCEDURE |
_RL cldlsp_sw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
56 |
NO PROCEDURE |
_RL swlz(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
57 |
NO PROCEDURE |
_RL qliqavesw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
58 |
NO PROCEDURE |
_RL qliqavelw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
59 |
NO PROCEDURE |
_RL fccavesw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
60 |
NO PROCEDURE |
_RL fccavelw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
61 |
NO PROCEDURE |
_RL raincon(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
62 |
NO PROCEDURE |
_RL rainlsp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
63 |
NO PROCEDURE |
_RL snowfall(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
64 |
NO PROCEDURE |
integer iras(Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
65 |
NO PROCEDURE |
integer nlwcld(Nsx,Nsy),nlwlz(Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
66 |
NO PROCEDURE |
integer nswcld(Nsx,Nsy),nswlz(Nsx,Nsy) |
|
./pkg/fizhi/fizhi_coms.h |
67 |
NO PROCEDURE |
integer imstturbsw(Nsx,Nsy),imstturblw(Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
17 |
NO PROCEDURE |
_RL chfr(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
18 |
NO PROCEDURE |
_RL alai(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
19 |
NO PROCEDURE |
_RL agrn(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
20 |
NO PROCEDURE |
_RL albvisdr(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
21 |
NO PROCEDURE |
_RL albvisdf(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
22 |
NO PROCEDURE |
_RL albnirdr(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
23 |
NO PROCEDURE |
_RL albnirdf(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
24 |
NO PROCEDURE |
_RL emiss(sNx,sNy,10,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
25 |
NO PROCEDURE |
_RL tgz(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
26 |
NO PROCEDURE |
integer landtype(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
27 |
NO PROCEDURE |
integer nchptot(Nsx,Nsy),nchpland(Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
28 |
NO PROCEDURE |
integer ityp(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
7 |
NO PROCEDURE |
_RL phis_var(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
8 |
NO PROCEDURE |
_RL tilefrac(sNx,sNy,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
9 |
NO PROCEDURE |
integer surftype(sNx,sNy,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_fillnegs.F |
27 |
QCHECK |
integer Nsx,Nsy,bi,bj |
|
./pkg/fizhi/fizhi_fillnegs.F |
28 |
QCHECK |
_RL qz(idim1:idim2,jdim1:jdim2,ldim,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_fillnegs.F |
29 |
QCHECK |
_RL dp(idim1:idim2,jdim1:jdim2,ldim,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_fillnegs.F |
5 |
QCHECK |
SUBROUTINE QCHECK ( idim1,idim2,jdim1,jdim2,ldim,Nsx,Nsy,im1,im2, |
|
./pkg/fizhi/fizhi_init_fixed.F |
104 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_VEG ( mythid, vegdata,im2,jm2,Nsx,Nsy, |
|
./pkg/fizhi/fizhi_init_fixed.F |
111 |
FIZHI_INIT_FIXED |
call GET_LANDFRAC(im2,jm2,Nsx,Nsy,bi,bj,maxtyp, |
|
./pkg/fizhi/fizhi_init_fixed.F |
50 |
FIZHI_INIT_FIXED |
_RL lats(sNx,sNy,Nsx,Nsy), lons(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_fixed.F |
51 |
FIZHI_INIT_FIXED |
_RL fracland(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_fixed.F |
52 |
FIZHI_INIT_FIXED |
_RL tempoverlap(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_vars.F |
156 |
FIZHI_INIT_VARS |
. Nsx,Nsy,1,sNx,1,sNy,udyntemp,vdyntemp) |
|
./pkg/fizhi/fizhi_init_vars.F |
162 |
FIZHI_INIT_VARS |
call DYN2PHYS(udyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./pkg/fizhi/fizhi_init_vars.F |
173 |
FIZHI_INIT_VARS |
call DYN2PHYS(vdyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./pkg/fizhi/fizhi_init_vars.F |
182 |
FIZHI_INIT_VARS |
call DYN2PHYS(theta,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./pkg/fizhi/fizhi_init_vars.F |
191 |
FIZHI_INIT_VARS |
call DYN2PHYS(salt,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./pkg/fizhi/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
integer mythid,im,jm,maxtyp,nchp,Nsx,Nsy,Nxg,Nyg |
|
./pkg/fizhi/fizhi_init_veg.F |
58 |
FIZHI_INIT_VEG |
integer nchptot(Nsx,Nsy), nchpland(Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_veg.F |
59 |
FIZHI_INIT_VEG |
integer surftype(im,jm,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_veg.F |
60 |
FIZHI_INIT_VEG |
integer igrd(nchp,Nsx,Nsy),ityp(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_veg.F |
61 |
FIZHI_INIT_VEG |
_RL tilefrac(im,jm,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_veg.F |
63 |
FIZHI_INIT_VEG |
_RL chfr(nchp,Nsx,Nsy),chlt(nchp,Nsx,Nsy),chlon(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_veg.F |
6 |
FIZHI_INIT_VEG |
subroutine FIZHI_INIT_VEG(mythid,vegdata,im,jm,Nsx,Nsy,Nxg,Nyg, |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
52 |
FIZHI_INIT_VEGSURFTILES |
_RL fracland(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
94 |
FIZHI_INIT_VEGSURFTILES |
call GET_LANDFRAC(sNx,sNy,Nsx,Nsy,bi,bj,maxtyp, |
|
./pkg/fizhi/fizhi_land_coms.h |
10 |
NO PROCEDURE |
_RL ecanopy(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
11 |
NO PROCEDURE |
_RL swetshal(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
12 |
NO PROCEDURE |
_RL swetroot(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
13 |
NO PROCEDURE |
_RL swetdeep(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
14 |
NO PROCEDURE |
_RL snodep(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
15 |
NO PROCEDURE |
_RL capac(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
20 |
NO PROCEDURE |
_RL chlt(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
21 |
NO PROCEDURE |
_RL chlon(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
22 |
NO PROCEDURE |
integer igrd(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
8 |
NO PROCEDURE |
_RL tcanopy(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_land_coms.h |
9 |
NO PROCEDURE |
_RL tdeep(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_ocean_coms.h |
13 |
NO PROCEDURE |
_RL sst(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_ocean_coms.h |
14 |
NO PROCEDURE |
_RL sice(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_read_pickup.F |
44 |
FIZHI_READ_PICKUP |
_RL temp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_wrapper.F |
229 |
FIZHI_WRAPPER |
call GET_LANDFRAC(im2,jm2,Nsx,Nsy,bi,bj,maxtyp, |
|
./pkg/fizhi/fizhi_wrapper.F |
262 |
FIZHI_WRAPPER |
. idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2,jm1,jm2,bi,bj, |
|
./pkg/fizhi/fizhi_wrapper.F |
294 |
FIZHI_WRAPPER |
. Nsx,Nsy,im1,im2,jm1,jm2,bi,bj,pedyn,ksurfC,Nr,nlperdyn,guphy) |
|
./pkg/fizhi/fizhi_wrapper.F |
303 |
FIZHI_WRAPPER |
. Nsx,Nsy,im1,im2,jm1,jm2,bi,bj,pedyn,ksurfC,Nr,nlperdyn,gvphy) |
|
./pkg/fizhi/fizhi_wrapper.F |
312 |
FIZHI_WRAPPER |
. Nsx,Nsy,im1,im2,jm1,jm2,bi,bj,pedyn,ksurfC,Nr,nlperdyn,gthphy) |
|
./pkg/fizhi/fizhi_wrapper.F |
321 |
FIZHI_WRAPPER |
. Nsx,Nsy,im1,im2,jm1,jm2,bi,bj,pedyn,ksurfC,Nr,nlperdyn,gsphy) |
|
./pkg/fizhi/fizhi_wrapper.F |
331 |
FIZHI_WRAPPER |
. Nsx,Nsy,im1,im2,jm1,jm2,guphy,gvphy) |
|
./pkg/fizhi/fizhi_wrapper.F |
47 |
FIZHI_WRAPPER |
_RL fracland(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_write_pickup.F |
48 |
FIZHI_WRITE_PICKUP |
_RL temp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_fizhi_corr.F |
146 |
STEP_FIZHI_CORR |
call PHYS2DYN(tempphy,pephy,im1,im2,jm1,jm2,Nrphys,Nsx,Nsy, |
|
./pkg/fizhi/step_fizhi_corr.F |
155 |
STEP_FIZHI_CORR |
call PHYS2DYN(tempphy,pephy,im1,im2,jm1,jm2,Nrphys,Nsx,Nsy, |
|
./pkg/fizhi/step_fizhi_corr.F |
164 |
STEP_FIZHI_CORR |
call PHYS2DYN(tempphy,pephy,im1,im2,jm1,jm2,Nrphys,Nsx,Nsy, |
|
./pkg/fizhi/step_fizhi_corr.F |
173 |
STEP_FIZHI_CORR |
call PHYS2DYN(tempphy,pephy,im1,im2,jm1,jm2,Nrphys,Nsx,Nsy, |
|
./pkg/fizhi/step_fizhi_corr.F |
184 |
STEP_FIZHI_CORR |
. Nsx,Nsy,1,sNx,1,sNy,udyntemp,vdyntemp) |
|
./pkg/fizhi/step_fizhi_corr.F |
208 |
STEP_FIZHI_CORR |
. Nr,Nsx,Nsy,1,sNx,1,sNy,udyntemp,vdyntemp) |
|
./pkg/fizhi/step_fizhi_corr.F |
216 |
STEP_FIZHI_CORR |
call DYN2PHYS(udyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy,1,sNx, |
|
./pkg/fizhi/step_fizhi_corr.F |
226 |
STEP_FIZHI_CORR |
call DYN2PHYS(vdyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy,1,sNx, |
|
./pkg/fizhi/step_fizhi_corr.F |
235 |
STEP_FIZHI_CORR |
call DYN2PHYS(thdyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy,1,sNx, |
|
./pkg/fizhi/step_fizhi_corr.F |
244 |
STEP_FIZHI_CORR |
call DYN2PHYS(sdyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy,1,sNx, |
|
./pkg/fizhi/step_fizhi_corr.F |
261 |
STEP_FIZHI_CORR |
. Nrphys,Nsx,Nsy,1,sNx,1,sNy,bi,bj, |
|
./pkg/fizhi/step_fizhi_corr.F |
264 |
STEP_FIZHI_CORR |
call QCHECK (im1,im2,jm1,jm2,Nrphys,Nsx,Nsy,idim1,idim2, |
|
./pkg/fizhi/step_fizhi_corr.F |
359 |
STEP_FIZHI_CORR |
. Nr,Nsx,Nsy,1,sNx,1,sNy,udyntemp,vdyntemp) |
|
./pkg/fizhi/step_fizhi_corr.F |
372 |
STEP_FIZHI_CORR |
call DYN2PHYS(udyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy,1,sNx, |
|
./pkg/fizhi/step_fizhi_corr.F |
383 |
STEP_FIZHI_CORR |
call DYN2PHYS(vdyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy,1,sNx, |
|
./pkg/fizhi/step_fizhi_corr.F |
436 |
STEP_FIZHI_CORR |
call DYN2PHYS(thdyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy,1,sNx, |
|
./pkg/fizhi/step_fizhi_corr.F |
482 |
STEP_FIZHI_CORR |
call DYN2PHYS(sdyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy,1,sNx, |
|
./pkg/fizhi/step_fizhi_fg.F |
49 |
STEP_FIZHI_FG |
. Nrphys,Nsx,Nsy,1,sNx,1,sNy,bi,bj,duphy,dvphy,dthphy,dsphy) |
|
./pkg/fizhi/step_fizhi_fg.F |
87 |
STEP_FIZHI_FG |
call QCHECK (idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2, |
|
./pkg/fizhi/step_physics.F |
14 |
STEP_PHYSICS |
integer Nrphys,Nsx,Nsy,bi,bj |
|
./pkg/fizhi/step_physics.F |
15 |
STEP_PHYSICS |
_RL uphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_physics.F |
16 |
STEP_PHYSICS |
_RL vphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_physics.F |
17 |
STEP_PHYSICS |
_RL thphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_physics.F |
18 |
STEP_PHYSICS |
_RL sphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_physics.F |
19 |
STEP_PHYSICS |
_RL duphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_physics.F |
20 |
STEP_PHYSICS |
_RL dvphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_physics.F |
21 |
STEP_PHYSICS |
_RL dthphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_physics.F |
22 |
STEP_PHYSICS |
_RL dsphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/step_physics.F |
6 |
STEP_PHYSICS |
. idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2,jm1,jm2,bi,bj, |
|
./pkg/gridalt/dyn2phys.F |
46 |
DYN2PHYS |
integer im1, im2, jm1, jm2, lmdyn, lmphy, Nsx, Nsy, flg |
|
./pkg/gridalt/dyn2phys.F |
48 |
DYN2PHYS |
_RL qdyn(im1:im2,jm1:jm2,lmdyn,Nsx,Nsy) |
|
./pkg/gridalt/dyn2phys.F |
49 |
DYN2PHYS |
_RL pedyn(im1:im2,jm1:jm2,lmdyn+1,Nsx,Nsy) |
|
./pkg/gridalt/dyn2phys.F |
4 |
DYN2PHYS |
subroutine DYN2PHYS(qdyn,pedyn,im1,im2,jm1,jm2,lmdyn,Nsx,Nsy, |
|
./pkg/gridalt/dyn2phys.F |
50 |
DYN2PHYS |
_RL pephy(im1:im2,jm1:jm2,lmphy+1,Nsx,Nsy) |
|
./pkg/gridalt/dyn2phys.F |
51 |
DYN2PHYS |
_RL windphy(im1:im2,jm1:jm2,lmphy,Nsx,Nsy) |
|
./pkg/gridalt/dyn2phys.F |
52 |
DYN2PHYS |
integer nlperdyn(im1:im2,jm1:jm2,lmdyn,Nsx,Nsy) |
|
./pkg/gridalt/dyn2phys.F |
53 |
DYN2PHYS |
_RL qphy(im1:im2,jm1:jm2,lmphy,Nsx,Nsy) |
|
./pkg/gridalt/dyn2phys.F |
54 |
DYN2PHYS |
integer Lbot(im1:im2,jm1:jm2,Nsx,Nsy) |
|
./pkg/gridalt/gridalt_initialise.F |
47 |
GRIDALT_INITIALISE |
call MAKE_PHYS_GRID(drF,hfacC,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./pkg/gridalt/gridalt_mapping.h |
7 |
NO PROCEDURE |
integer nlperdyn(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,Nsy) |
|
./pkg/gridalt/make_phys_grid.F |
46 |
MAKE_PHYS_GRID |
integer im1,im2,jm1,jm2,Nr,Nsx,Nsy,Nrphys |
|
./pkg/gridalt/make_phys_grid.F |
49 |
MAKE_PHYS_GRID |
_RS hfacC(im1:im2,jm1:jm2,Nr,Nsx,Nsy) |
|
./pkg/gridalt/make_phys_grid.F |
50 |
MAKE_PHYS_GRID |
_RL dpphys(im1:im2,jm1:jm2,Nrphys,Nsx,Nsy) |
|
./pkg/gridalt/make_phys_grid.F |
52 |
MAKE_PHYS_GRID |
integer Lbot(im1:im2,jm1:jm2,Nsx,Nsy) |
|
./pkg/gridalt/make_phys_grid.F |
53 |
MAKE_PHYS_GRID |
integer nlperdyn(im1:im2,jm1:jm2,Nr,Nsx,Nsy) |
|
./pkg/gridalt/make_phys_grid.F |
5 |
MAKE_PHYS_GRID |
. Nsx,Nsy,i1,i2,j1,j2,bi,bj,Nrphys,Lbot,dpphys,numlevphys,nlperdyn) |
|
./pkg/gridalt/phys2dyn.F |
42 |
PHYS2DYN |
integer im1, im2, jm1, jm2, lmdyn, lmphy, Nsx, Nsy |
|
./pkg/gridalt/phys2dyn.F |
44 |
PHYS2DYN |
_RL qphy(im1:im2,jm1:jm2,lmphy,Nsx,Nsy) |
|
./pkg/gridalt/phys2dyn.F |
45 |
PHYS2DYN |
_RL pedyn(im1:im2,jm1:jm2,lmdyn+1,Nsx,Nsy) |
|
./pkg/gridalt/phys2dyn.F |
46 |
PHYS2DYN |
_RL pephy(im1:im2,jm1:jm2,lmphy+1,Nsx,Nsy) |
|
./pkg/gridalt/phys2dyn.F |
47 |
PHYS2DYN |
integer nlperdyn(im1:im2,jm1:jm2,lmdyn,Nsx,Nsy) |
|
./pkg/gridalt/phys2dyn.F |
48 |
PHYS2DYN |
_RL qdyn(im1:im2,jm1:jm2,lmdyn,Nsx,Nsy) |
|
./pkg/gridalt/phys2dyn.F |
49 |
PHYS2DYN |
integer Lbot(im1:im2,jm1:jm2,Nsx,Nsy) |
|
./pkg/gridalt/phys2dyn.F |
4 |
PHYS2DYN |
subroutine PHYS2DYN(qphy,pephy,im1,im2,jm1,jm2,lmphy,Nsx,Nsy, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
46 |
FIZHI_INIT_FIXED |
_RL lats(sNx,sNy,Nsx,Nsy), lons(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
47 |
FIZHI_INIT_FIXED |
_RL fracland(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
83 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_VEG ( mythid, vegdata,im2,jm2,Nsx,Nsy, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
90 |
FIZHI_INIT_FIXED |
call GET_LANDFRAC(im2,jm2,Nsx,Nsy,bi,bj,maxtyp, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
integer mythid,im,jm,maxtyp,nchp,Nsx,Nsy,Nxg,Nyg |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
58 |
FIZHI_INIT_VEG |
integer nchptot(Nsx,Nsy),nchpland(Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
59 |
FIZHI_INIT_VEG |
integer surftype(im,jm,maxtyp,Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
60 |
FIZHI_INIT_VEG |
integer igrd(nchp,Nsx,Nsy),ityp(nchp,Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
61 |
FIZHI_INIT_VEG |
_RL tilefrac(im,jm,maxtyp,Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
63 |
FIZHI_INIT_VEG |
_RL chfr(nchp,Nsx,Nsy),chlt(nchp,Nsx,Nsy),chlon(nchp,Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
6 |
FIZHI_INIT_VEG |
subroutine FIZHI_INIT_VEG(mythid,vegdata,im,jm,Nsx,Nsy,Nxg,Nyg, |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
103 |
DO_FIZHI |
_RL p(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
106 |
DO_FIZHI |
_RL pl(sNx,sNy,Nrphys,Nsx,Nsy),pkl(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
107 |
DO_FIZHI |
_RL ple(sNx,sNy,Nrphys+1,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
108 |
DO_FIZHI |
_RL pkle(sNx,sNy,Nrphys+1,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
109 |
DO_FIZHI |
_RL dpres(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
110 |
DO_FIZHI |
_RL lwdt(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
111 |
DO_FIZHI |
_RL lwdtclr(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
112 |
DO_FIZHI |
_RL swdt(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
113 |
DO_FIZHI |
_RL swdtclr(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
114 |
DO_FIZHI |
_RL turbu(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
115 |
DO_FIZHI |
_RL turbv(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
116 |
DO_FIZHI |
_RL turbt(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
117 |
DO_FIZHI |
_RL turbq(sNx,sNy,Nrphys,ntracer,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
118 |
DO_FIZHI |
_RL moistu(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
119 |
DO_FIZHI |
_RL moistv(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
120 |
DO_FIZHI |
_RL moistt(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
121 |
DO_FIZHI |
_RL moistq(sNx,sNy,Nrphys,ntracer,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
122 |
DO_FIZHI |
_RL radswt(sNx,sNy,Nsx,Nsy),radswg(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
123 |
DO_FIZHI |
_RL swgclr(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
124 |
DO_FIZHI |
_RL fdirpar(sNx,sNy,Nsx,Nsy),fdifpar(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
125 |
DO_FIZHI |
_RL osr(sNx,sNy,Nsx,Nsy),osrclr(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
126 |
DO_FIZHI |
_RL tg0(sNx,sNy,Nsx,Nsy),radlwg(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
127 |
DO_FIZHI |
_RL lwgclr(sNx,sNy,Nsx,Nsy),st4(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
128 |
DO_FIZHI |
_RL dst4(sNx,sNy,Nsx,Nsy),dlwdtg(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
129 |
DO_FIZHI |
_RL qq(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
46 |
FIZHI_INIT_FIXED |
_RL lats(sNx,sNy,Nsx,Nsy), lons(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
47 |
FIZHI_INIT_FIXED |
_RL fracland(sNx,sNy,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
77 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_VEG ( mythid, vegdata,im2,jm2,Nsx,Nsy, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
84 |
FIZHI_INIT_FIXED |
call GET_LANDFRAC(im2,jm2,Nsx,Nsy,bi,bj,maxtyp, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
136 |
FIZHI_INIT_VARS |
. Nsx,Nsy,1,sNx,1,sNy,udyntemp,vdyntemp) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
142 |
FIZHI_INIT_VARS |
call DYN2PHYS(udyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
153 |
FIZHI_INIT_VARS |
call DYN2PHYS(vdyntemp,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
162 |
FIZHI_INIT_VARS |
call DYN2PHYS(theta,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
172 |
FIZHI_INIT_VARS |
call DYN2PHYS(salt,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
integer mythid,im,jm,maxtyp,nchp,Nsx,Nsy,Nxg,Nyg |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
58 |
FIZHI_INIT_VEG |
integer nchptot(Nsx,Nsy),nchpland(Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
59 |
FIZHI_INIT_VEG |
integer surftype(im,jm,maxtyp,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
60 |
FIZHI_INIT_VEG |
integer igrd(nchp,Nsx,Nsy),ityp(nchp,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
61 |
FIZHI_INIT_VEG |
_RL tilefrac(im,jm,maxtyp,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
63 |
FIZHI_INIT_VEG |
_RL chfr(nchp,Nsx,Nsy),chlt(nchp,Nsx,Nsy),chlon(nchp,Nsx,Nsy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
6 |
FIZHI_INIT_VEG |
subroutine FIZHI_INIT_VEG(mythid,vegdata,im,jm,Nsx,Nsy,Nxg,Nyg, |
|
./pkg/fizhi/AtoC.F |
32 |
ATOC |
integer Nsx, Nsy |
|
./pkg/fizhi/AtoC.F |
34 |
ATOC |
_RS mask(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/AtoC.F |
35 |
ATOC |
_RL fieldin1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/AtoC.F |
36 |
ATOC |
_RL fieldin2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/AtoC.F |
37 |
ATOC |
_RL fieldout1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/AtoC.F |
38 |
ATOC |
_RL fieldout2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/AtoC.F |
6 |
ATOC |
. jdim1,jdim2,numlevs,Nsx,Nsy,im1,im2,jm1,jm2,fieldout1,fieldout2) |
|
./pkg/fizhi/CtoA.F |
34 |
CTOA |
integer Nsx, Nsy |
|
./pkg/fizhi/CtoA.F |
35 |
CTOA |
_RS mask1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/CtoA.F |
36 |
CTOA |
_RS mask2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/CtoA.F |
37 |
CTOA |
_RL fieldin1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/CtoA.F |
38 |
CTOA |
_RL fieldin2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/CtoA.F |
39 |
CTOA |
_RL fieldout1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/CtoA.F |
40 |
CTOA |
_RL fieldout2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy) |
|
./pkg/fizhi/CtoA.F |
6 |
CTOA |
. jdim1,jdim2,numlevs,Nsx,Nsy,im1,im2,jm1,jm2,fieldout1,fieldout2) |