File |
Line number |
Procedure |
Code |
./pkg/smooth/smooth2d.F |
24 |
SMOOTH2D |
integer smoothOpNb |
./pkg/smooth/smooth2d.F |
39 |
SMOOTH2D |
& 'smooth2Doperator',smoothOpNb |
./pkg/smooth/smooth2d.F |
48 |
SMOOTH2D |
nbt_in=smooth2Dnbt(smoothOpNb) |
./pkg/smooth/smooth2d.F |
7 |
SMOOTH2D |
U fld_in,mask_in,smoothOpNb,mythid) |
./pkg/smooth/smooth3d.F |
24 |
SMOOTH3D |
integer smoothOpNb |
./pkg/smooth/smooth3d.F |
40 |
SMOOTH3D |
& 'smooth3Doperator',smoothOpNb |
./pkg/smooth/smooth3d.F |
73 |
SMOOTH3D |
nbt_in=smooth3Dnbt(smoothOpNb) |
./pkg/smooth/smooth3d.F |
7 |
SMOOTH3D |
U fld_in,smoothOpNb,mythid) |
./pkg/smooth/smooth_correl2d.F |
25 |
SMOOTH_CORREL2D |
integer smoothOpNb |
./pkg/smooth/smooth_correl2d.F |
42 |
SMOOTH_CORREL2D |
& 'smooth2Doperator',smoothOpNb |
./pkg/smooth/smooth_correl2d.F |
52 |
SMOOTH_CORREL2D |
& 'smooth2Dnorm',smoothOpNb |
./pkg/smooth/smooth_correl2d.F |
71 |
SMOOTH_CORREL2D |
nbt_in=smooth2Dnbt(smoothOpNb)/2 |
./pkg/smooth/smooth_correl2d.F |
7 |
SMOOTH_CORREL2D |
U fld_in,mask_in,smoothOpNb,mythid) |
./pkg/smooth/smooth_correl3d.F |
25 |
SMOOTH_CORREL3D |
integer smoothOpNb |
./pkg/smooth/smooth_correl3d.F |
42 |
SMOOTH_CORREL3D |
& 'smooth3Doperator',smoothOpNb |
./pkg/smooth/smooth_correl3d.F |
76 |
SMOOTH_CORREL3D |
& 'smooth3Dnorm',smoothOpNb |
./pkg/smooth/smooth_correl3d.F |
7 |
SMOOTH_CORREL3D |
U fld_in,smoothOpNb,mythid) |
./pkg/smooth/smooth_correl3d.F |
97 |
SMOOTH_CORREL3D |
nbt_in=smooth3Dnbt(smoothOpNb)/2 |
./pkg/smooth/smooth_filtervar2d.F |
151 |
SMOOTH_FILTERVAR2D |
ELSEIF (smooth2Dfilter(smoothOpNb).EQ.1) then |
./pkg/smooth/smooth_filtervar2d.F |
231 |
SMOOTH_FILTERVAR2D |
& 'smooth2Dnorm',smoothOpNb |
./pkg/smooth/smooth_filtervar2d.F |
23 |
SMOOTH_FILTERVAR2D |
integer smoothOpNb, myThid |
./pkg/smooth/smooth_filtervar2d.F |
46 |
SMOOTH_FILTERVAR2D |
IF (smooth2Dfilter(smoothOpNb).NE.0) then |
./pkg/smooth/smooth_filtervar2d.F |
48 |
SMOOTH_FILTERVAR2D |
nbt_in=smooth2Dnbt(smoothOpNb)/2 |
./pkg/smooth/smooth_filtervar2d.F |
52 |
SMOOTH_FILTERVAR2D |
& 'smooth2Doperator',smoothOpNb |
./pkg/smooth/smooth_filtervar2d.F |
6 |
SMOOTH_FILTERVAR2D |
subroutine SMOOTH_FILTERVAR2D (smoothOpNb,mythid) |
./pkg/smooth/smooth_filtervar2d.F |
71 |
SMOOTH_FILTERVAR2D |
IF (smooth2Dfilter(smoothOpNb).EQ.2) then |
./pkg/smooth/smooth_filtervar3d.F |
188 |
SMOOTH_FILTERVAR3D |
ELSEIF (smooth3Dfilter(smoothOpNb).EQ.1) then |
./pkg/smooth/smooth_filtervar3d.F |
23 |
SMOOTH_FILTERVAR3D |
integer smoothOpNb, myThid |
./pkg/smooth/smooth_filtervar3d.F |
276 |
SMOOTH_FILTERVAR3D |
& 'smooth3Dnorm',smoothOpNb |
./pkg/smooth/smooth_filtervar3d.F |
46 |
SMOOTH_FILTERVAR3D |
IF (smooth3Dfilter(smoothOpNb).NE.0) then |
./pkg/smooth/smooth_filtervar3d.F |
48 |
SMOOTH_FILTERVAR3D |
nbt_in=smooth3Dnbt(smoothOpNb)/2 |
./pkg/smooth/smooth_filtervar3d.F |
52 |
SMOOTH_FILTERVAR3D |
& 'smooth3Doperator',smoothOpNb |
./pkg/smooth/smooth_filtervar3d.F |
6 |
SMOOTH_FILTERVAR3D |
subroutine SMOOTH_FILTERVAR3D (smoothOpNb,myThid) |
./pkg/smooth/smooth_filtervar3d.F |
97 |
SMOOTH_FILTERVAR3D |
IF (smooth3Dfilter(smoothOpNb).EQ.2) then |
./pkg/smooth/smooth_init2d.F |
28 |
SMOOTH_INIT2D |
integer smoothOpNb |
./pkg/smooth/smooth_init2d.F |
36 |
SMOOTH_INIT2D |
smooth2DtotTime=smooth2Dnbt(smoothOpNb)*smooth2DdelTime |
./pkg/smooth/smooth_init2d.F |
38 |
SMOOTH_INIT2D |
if ((smooth2Dtype(smoothOpNb).NE.0).AND. |
./pkg/smooth/smooth_init2d.F |
39 |
SMOOTH_INIT2D |
& (smooth2Dsize(smoothOpNb).EQ.2)) then |
./pkg/smooth/smooth_init2d.F |
41 |
SMOOTH_INIT2D |
& 'smooth2Dscales',smoothOpNb |
./pkg/smooth/smooth_init2d.F |
53 |
SMOOTH_INIT2D |
smooth2D_Lx(i,j,bi,bj)=smooth2D_Lx0(smoothOpNb) |
./pkg/smooth/smooth_init2d.F |
54 |
SMOOTH_INIT2D |
smooth2D_Ly(i,j,bi,bj)=smooth2D_Ly0(smoothOpNb) |
./pkg/smooth/smooth_init2d.F |
6 |
SMOOTH_INIT2D |
subroutine SMOOTH_INIT2D (smoothOpNb, mythid ) |
./pkg/smooth/smooth_init2d.F |
79 |
SMOOTH_INIT2D |
& 'smooth2Doperator',smoothOpNb |
./pkg/smooth/smooth_init3d.F |
105 |
SMOOTH_INIT3D |
if (smooth3DsizeH(smoothOpNb).EQ.3) then |
./pkg/smooth/smooth_init3d.F |
107 |
SMOOTH_INIT3D |
& 'smooth3DscalesH',smoothOpNb |
./pkg/smooth/smooth_init3d.F |
120 |
SMOOTH_INIT3D |
smooth3D_Lx(i,j,k,bi,bj)=smooth3D_Lx0(smoothOpNb) |
./pkg/smooth/smooth_init3d.F |
121 |
SMOOTH_INIT3D |
smooth3D_Ly(i,j,k,bi,bj)=smooth3D_Ly0(smoothOpNb) |
./pkg/smooth/smooth_init3d.F |
168 |
SMOOTH_INIT3D |
& 'smooth3Doperator',smoothOpNb |
./pkg/smooth/smooth_init3d.F |
36 |
SMOOTH_INIT3D |
integer smoothOpNb |
./pkg/smooth/smooth_init3d.F |
43 |
SMOOTH_INIT3D |
smooth3DtotTime=smooth3Dnbt(smoothOpNb)*smooth3DdelTime |
./pkg/smooth/smooth_init3d.F |
47 |
SMOOTH_INIT3D |
if (smooth3DsizeZ(smoothOpNb).EQ.3) then |
./pkg/smooth/smooth_init3d.F |
49 |
SMOOTH_INIT3D |
& 'smooth3DscalesZ',smoothOpNb |
./pkg/smooth/smooth_init3d.F |
59 |
SMOOTH_INIT3D |
smooth3D_Lz(i,j,k,bi,bj)=smooth3D_Lz0(smoothOpNb) |
./pkg/smooth/smooth_init3d.F |
6 |
SMOOTH_INIT3D |
subroutine SMOOTH_INIT3D (smoothOpNb,mythid) |
./pkg/smooth/smooth_init3d.F |
81 |
SMOOTH_INIT3D |
if (smooth3DsizeZ(smoothOpNb).NE.3) then |
./pkg/smooth/smooth_init_fixed.F |
22 |
SMOOTH_INIT_FIXED |
integer smoothOpNb |
./pkg/smooth/smooth_init_fixed.F |
47 |
SMOOTH_INIT_FIXED |
DO smoothOpNb=1,smoothOpNbMax |
./pkg/smooth/smooth_init_fixed.F |
48 |
SMOOTH_INIT_FIXED |
if (smooth2Dtype(smoothOpNb).NE.0) then |
./pkg/smooth/smooth_init_fixed.F |
49 |
SMOOTH_INIT_FIXED |
call SMOOTH_INIT2D(smoothOpNb,mythid) |
./pkg/smooth/smooth_init_fixed.F |
53 |
SMOOTH_INIT_FIXED |
DO smoothOpNb=1,smoothOpNbMax |
./pkg/smooth/smooth_init_fixed.F |
54 |
SMOOTH_INIT_FIXED |
if (smooth2Dtype(smoothOpNb).NE.0) then |
./pkg/smooth/smooth_init_fixed.F |
55 |
SMOOTH_INIT_FIXED |
call SMOOTH_FILTERVAR2D(smoothOpNb,mythid) |
./pkg/smooth/smooth_init_fixed.F |
59 |
SMOOTH_INIT_FIXED |
DO smoothOpNb=1,smoothOpNbMax |
./pkg/smooth/smooth_init_fixed.F |
60 |
SMOOTH_INIT_FIXED |
if ((smooth3DtypeZ(smoothOpNb).NE.0).OR. |
./pkg/smooth/smooth_init_fixed.F |
61 |
SMOOTH_INIT_FIXED |
& (smooth3DtypeH(smoothOpNb).NE.0)) then |
./pkg/smooth/smooth_init_fixed.F |
62 |
SMOOTH_INIT_FIXED |
call SMOOTH_INIT3D(smoothOpNb,mythid) |
./pkg/smooth/smooth_init_fixed.F |
66 |
SMOOTH_INIT_FIXED |
DO smoothOpNb=1,smoothOpNbMax |
./pkg/smooth/smooth_init_fixed.F |
67 |
SMOOTH_INIT_FIXED |
if ((smooth3DtypeZ(smoothOpNb).NE.0).OR. |
./pkg/smooth/smooth_init_fixed.F |
68 |
SMOOTH_INIT_FIXED |
& (smooth3DtypeH(smoothOpNb).NE.0)) then |
./pkg/smooth/smooth_init_fixed.F |
69 |
SMOOTH_INIT_FIXED |
call SMOOTH_FILTERVAR3D(smoothOpNb,mythid) |
./pkg/smooth/smooth_readparms.F |
125 |
SMOOTH_READPARMS |
DO smoothOpNb=1,smoothOpNbMax |
./pkg/smooth/smooth_readparms.F |
126 |
SMOOTH_READPARMS |
IF (smooth2Dtype(smoothOpNb).NE.0) THEN |
./pkg/smooth/smooth_readparms.F |
128 |
SMOOTH_READPARMS |
& smoothOpNb,smooth2Dnbt(smoothOpNb), |
./pkg/smooth/smooth_readparms.F |
129 |
SMOOTH_READPARMS |
& smooth2D_Lx0(smoothOpNb),smooth2D_Ly0(smoothOpNb) |
./pkg/smooth/smooth_readparms.F |
135 |
SMOOTH_READPARMS |
DO smoothOpNb=1,smoothOpNbMax |
./pkg/smooth/smooth_readparms.F |
136 |
SMOOTH_READPARMS |
IF ((smooth3DtypeZ(smoothOpNb).NE.0).OR. |
./pkg/smooth/smooth_readparms.F |
137 |
SMOOTH_READPARMS |
& (smooth3DtypeH(smoothOpNb).NE.0)) then |
./pkg/smooth/smooth_readparms.F |
139 |
SMOOTH_READPARMS |
& smoothOpNb,smooth3Dnbt(smoothOpNb), |
./pkg/smooth/smooth_readparms.F |
140 |
SMOOTH_READPARMS |
& smooth3D_Lx0(smoothOpNb),smooth3D_Ly0(smoothOpNb), |
./pkg/smooth/smooth_readparms.F |
141 |
SMOOTH_READPARMS |
& smooth3D_Lz0(smoothOpNb) |
./pkg/smooth/smooth_readparms.F |
33 |
SMOOTH_READPARMS |
integer smoothOpNb |
./pkg/smooth/smooth_readparms.F |
70 |
SMOOTH_READPARMS |
DO smoothOpNb=1,smoothOpNbMax |
./pkg/smooth/smooth_readparms.F |
71 |
SMOOTH_READPARMS |
smooth2Dnbt(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
72 |
SMOOTH_READPARMS |
smooth2D_Lx0(smoothOpNb)=0. _d 0 |
./pkg/smooth/smooth_readparms.F |
73 |
SMOOTH_READPARMS |
smooth2D_Ly0(smoothOpNb)=0. _d 0 |
./pkg/smooth/smooth_readparms.F |
74 |
SMOOTH_READPARMS |
smooth2Dtype(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
75 |
SMOOTH_READPARMS |
smooth2Dsize(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
76 |
SMOOTH_READPARMS |
smooth2Dfilter(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
78 |
SMOOTH_READPARMS |
smooth3Dnbt(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
79 |
SMOOTH_READPARMS |
smooth3D_Lx0(smoothOpNb)=0. _d 0 |
./pkg/smooth/smooth_readparms.F |
80 |
SMOOTH_READPARMS |
smooth3D_Ly0(smoothOpNb)=0. _d 0 |
./pkg/smooth/smooth_readparms.F |
81 |
SMOOTH_READPARMS |
smooth3D_Lz0(smoothOpNb)=0. _d 0 |
./pkg/smooth/smooth_readparms.F |
82 |
SMOOTH_READPARMS |
smooth3DtypeH(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
83 |
SMOOTH_READPARMS |
smooth3DsizeH(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
84 |
SMOOTH_READPARMS |
smooth3DtypeZ(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
85 |
SMOOTH_READPARMS |
smooth3DsizeZ(smoothOpNb)=0 |
./pkg/smooth/smooth_readparms.F |
86 |
SMOOTH_READPARMS |
smooth3Dfilter(smoothOpNb)=0 |
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
103 |
CTRL_MAP_INI_GENTIM2D |
smoothOpNb=1 |
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
107 |
CTRL_MAP_INI_GENTIM2D |
& smoothOpNb=xx_gentim2d_preproc_i(k2,iarr) |
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
145 |
CTRL_MAP_INI_GENTIM2D |
call SMOOTH_CORREL2D(xx_gen,maskC,smoothOpNb,mythid) |
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
52 |
CTRL_MAP_INI_GENTIM2D |
integer smoothOpNb |