Home
last modified time | relevance | path

Searched refs:kgen_bound (Results 1 – 25 of 63) sorted by relevance

123

/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PSRAD_lrtm_Bangalore/src/
H A Dmo_lrtm_kgs.f9048 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
120 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
187 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
244 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
262 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
314 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
390 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
563 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
734 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
1010 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
[all …]
H A Dmo_psrad_interface.f90363 integer, dimension(2,2) :: kgen_bound local
368 READ(UNIT = kgen_unit) kgen_bound(1, 1)
369 READ(UNIT = kgen_unit) kgen_bound(2, 1)
370 READ(UNIT = kgen_unit) kgen_bound(1, 2)
372 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
379 integer, dimension(2,1) :: kgen_bound local
386 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
393 integer, dimension(2,3) :: kgen_bound local
404 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
411 integer, dimension(2,2) :: kgen_bound local
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PSRAD_lrtm/src/
H A Dmo_lrtm_kgs.f9048 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
120 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
187 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
244 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
262 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
314 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
390 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
563 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
734 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
1010 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
[all …]
H A Dmo_psrad_interface.f90363 integer, dimension(2,2) :: kgen_bound local
368 READ(UNIT = kgen_unit) kgen_bound(1, 1)
369 READ(UNIT = kgen_unit) kgen_bound(2, 1)
370 READ(UNIT = kgen_unit) kgen_bound(1, 2)
372 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
379 integer, dimension(2,1) :: kgen_bound local
386 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
393 integer, dimension(2,3) :: kgen_bound local
404 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
411 integer, dimension(2,2) :: kgen_bound local
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PSRAD_lrtm_codereview/src/
H A Dmo_lrtm_kgs.f9048 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
120 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
187 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
244 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
262 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
314 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
390 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
563 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
734 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
1010 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
[all …]
H A Dmo_psrad_interface.f90363 integer, dimension(2,2) :: kgen_bound local
368 READ(UNIT = kgen_unit) kgen_bound(1, 1)
369 READ(UNIT = kgen_unit) kgen_bound(2, 1)
370 READ(UNIT = kgen_unit) kgen_bound(1, 2)
372 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
379 integer, dimension(2,1) :: kgen_bound local
386 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
393 integer, dimension(2,3) :: kgen_bound local
404 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
411 integer, dimension(2,2) :: kgen_bound local
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_inatm/src/
H A Dkernel_inatm.F90805 …ALLOCATE(taucmcl(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1,…
818 … ALLOCATE(emis(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
824 … ALLOCATE(tlay(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
853 … ALLOCATE(o3vmr(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
865 … ALLOCATE(plev(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
871 … ALLOCATE(play(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
879 …ALLOCATE(tauaer(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, …
887 …ALLOCATE(clwpmcl(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1,…
918 … ALLOCATE(tlev(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
933 …ALLOCATE(ciwpmcl(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1,…
[all …]
H A Dkernel_inatm.F90_orig757 …ALLOCATE(taucmcl(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1,…
770 … ALLOCATE(emis(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
776 … ALLOCATE(tlay(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
805 … ALLOCATE(o3vmr(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
817 … ALLOCATE(plev(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
823 … ALLOCATE(play(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
831 …ALLOCATE(tauaer(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, …
839 …ALLOCATE(clwpmcl(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1,…
870 … ALLOCATE(tlev(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
885 …ALLOCATE(ciwpmcl(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1,…
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/HOMME_remap_q_ppm/src/
H A Dkernel_driver.f9074 integer, dimension(2,4) :: kgen_bound local
79 READ(UNIT = kgen_unit) kgen_bound(1, 1)
80 READ(UNIT = kgen_unit) kgen_bound(2, 1)
81 READ(UNIT = kgen_unit) kgen_bound(1, 2)
82 READ(UNIT = kgen_unit) kgen_bound(2, 2)
83 READ(UNIT = kgen_unit) kgen_bound(1, 3)
84 READ(UNIT = kgen_unit) kgen_bound(2, 3)
85 READ(UNIT = kgen_unit) kgen_bound(1, 4)
87 …kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kgen_bound(2, 3)…
94 integer, dimension(2,3) :: kgen_bound local
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_binterp/src/
H A Dkernel_binterp.F9027 INTEGER, DIMENSION(2,10) :: kgen_bound variable
59 INTEGER, DIMENSION(2,10) :: kgen_bound local
101 READ(UNIT = kgen_unit) kgen_bound(1, 1)
102 READ(UNIT = kgen_unit) kgen_bound(2, 1)
103 READ(UNIT = kgen_unit) kgen_bound(1, 2)
105 …ALLOCATE(refitabsw(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + …
111 …ALLOCATE(refrtabsw(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + …
125 …kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kgen_bound(2, 3)…
141 …ALLOCATE(outstate_refitabsw(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound…
147 …ALLOCATE(outstate_refrtabsw(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound…
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_binterp/src_orig/
H A Dkernel_binterp.F9027 INTEGER, DIMENSION(2,10) :: kgen_bound variable
59 INTEGER, DIMENSION(2,10) :: kgen_bound local
98 READ(UNIT = kgen_unit) kgen_bound(1, 1)
99 READ(UNIT = kgen_unit) kgen_bound(2, 1)
100 READ(UNIT = kgen_unit) kgen_bound(1, 2)
102 …ALLOCATE(refitabsw(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + …
108 …ALLOCATE(refrtabsw(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + …
122 …kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kgen_bound(2, 3)…
138 …ALLOCATE(outstate_refitabsw(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound…
144 …ALLOCATE(outstate_refrtabsw(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound…
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/HOMME_vlaplace_sphere_wk/src/
H A Dkernel_driver.f9081 INTEGER, DIMENSION(2,1) :: kgen_bound local
86 READ(UNIT = kgen_unit) kgen_bound(1, 1)
87 READ(UNIT = kgen_unit) kgen_bound(2, 1)
88 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
89 DO idx1=kgen_bound(1,1), kgen_bound(2, 1)
105 INTEGER, DIMENSION(2,5) :: kgen_bound local
110 READ(UNIT = kgen_unit) kgen_bound(1, 1)
111 READ(UNIT = kgen_unit) kgen_bound(2, 1)
112 READ(UNIT = kgen_unit) kgen_bound(1, 2)
113 READ(UNIT = kgen_unit) kgen_bound(2, 2)
[all …]
H A Dedge_mod.F90158 INTEGER, DIMENSION(2,3) :: kgen_bound local
169 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
183 INTEGER, DIMENSION(2,1) :: kgen_bound local
190 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
204 INTEGER, DIMENSION(2,1) :: kgen_bound local
211 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
234 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
235 DO idx1=kgen_bound(1,1), kgen_bound(2, 1)
236 DO idx2=kgen_bound(1,2), kgen_bound(2, 2)
260 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
[all …]
H A Dviscosity_mod.F90111 INTEGER, DIMENSION(2,5) :: kgen_bound local
116 READ(UNIT = kgen_unit) kgen_bound(1, 1)
117 READ(UNIT = kgen_unit) kgen_bound(2, 1)
118 READ(UNIT = kgen_unit) kgen_bound(1, 2)
119 READ(UNIT = kgen_unit) kgen_bound(2, 2)
120 READ(UNIT = kgen_unit) kgen_bound(1, 3)
121 READ(UNIT = kgen_unit) kgen_bound(2, 3)
122 READ(UNIT = kgen_unit) kgen_bound(1, 4)
123 READ(UNIT = kgen_unit) kgen_bound(2, 4)
124 READ(UNIT = kgen_unit) kgen_bound(1, 5)
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_lw_inatm/src/
H A Dkernel_driver.f90121 INTEGER, DIMENSION(2,2) :: kgen_bound local
126 READ(UNIT = kgen_unit) kgen_bound(1, 1)
127 READ(UNIT = kgen_unit) kgen_bound(2, 1)
128 READ(UNIT = kgen_unit) kgen_bound(1, 2)
129 READ(UNIT = kgen_unit) kgen_bound(2, 2)
130 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
144 INTEGER, DIMENSION(2,1) :: kgen_bound local
149 READ(UNIT = kgen_unit) kgen_bound(1, 1)
151 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
165 INTEGER, DIMENSION(2,3) :: kgen_bound local
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_sw_inatm/src/
H A Dkernel_driver.f90126 INTEGER, DIMENSION(2,2) :: kgen_bound local
131 READ(UNIT = kgen_unit) kgen_bound(1, 1)
132 READ(UNIT = kgen_unit) kgen_bound(2, 1)
133 READ(UNIT = kgen_unit) kgen_bound(1, 2)
134 READ(UNIT = kgen_unit) kgen_bound(2, 2)
135 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
149 INTEGER, DIMENSION(2,1) :: kgen_bound local
154 READ(UNIT = kgen_unit) kgen_bound(1, 1)
156 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
170 INTEGER, DIMENSION(2,3) :: kgen_bound local
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_sw_taumols/src/
H A Dkernel_driver.f90135 INTEGER, DIMENSION(2,1) :: kgen_bound local
140 READ(UNIT = kgen_unit) kgen_bound(1, 1)
141 READ(UNIT = kgen_unit) kgen_bound(2, 1)
142 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
156 INTEGER, DIMENSION(2,2) :: kgen_bound local
161 READ(UNIT = kgen_unit) kgen_bound(1, 1)
162 READ(UNIT = kgen_unit) kgen_bound(2, 1)
163 READ(UNIT = kgen_unit) kgen_bound(1, 2)
165 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
179 INTEGER, DIMENSION(2,2) :: kgen_bound local
[all …]
H A Drrtmg_sw_spcvmc.f90232 INTEGER, DIMENSION(2,3) :: kgen_bound local
237 READ(UNIT = kgen_unit) kgen_bound(1, 1)
238 READ(UNIT = kgen_unit) kgen_bound(2, 1)
239 READ(UNIT = kgen_unit) kgen_bound(1, 2)
240 READ(UNIT = kgen_unit) kgen_bound(2, 2)
241 READ(UNIT = kgen_unit) kgen_bound(1, 3)
242 READ(UNIT = kgen_unit) kgen_bound(2, 3)
243 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
257 INTEGER, DIMENSION(2,2) :: kgen_bound local
262 READ(UNIT = kgen_unit) kgen_bound(1, 1)
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/HOMME_preq_hydrostatic/src/
H A Dedge_mod.F90158 INTEGER, DIMENSION(2,3) :: kgen_bound local
169 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
183 INTEGER, DIMENSION(2,1) :: kgen_bound local
190 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
204 INTEGER, DIMENSION(2,1) :: kgen_bound local
211 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
234 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
235 DO idx1=kgen_bound(1,1), kgen_bound(2, 1)
236 DO idx2=kgen_bound(1,2), kgen_bound(2, 2)
260 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_sw_cldprmc/src/
H A Drrtmg_sw_rad.f90523 INTEGER, DIMENSION(2,3) :: kgen_bound
528 READ(UNIT = kgen_unit) kgen_bound(1, 1)
529 READ(UNIT = kgen_unit) kgen_bound(2, 1)
530 READ(UNIT = kgen_unit) kgen_bound(1, 2)
531 READ(UNIT = kgen_unit) kgen_bound(2, 2)
532 READ(UNIT = kgen_unit) kgen_bound(1, 3)
533 READ(UNIT = kgen_unit) kgen_bound(2, 3)
534 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
548 INTEGER, DIMENSION(2,2) :: kgen_bound local
553 READ(UNIT = kgen_unit) kgen_bound(1, 1)
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/WACCM_imp_sol/src/
H A Dmo_gas_phase_chemdr.F90317 INTEGER, DIMENSION(2,3) :: kgen_bound local
322 READ(UNIT = kgen_unit) kgen_bound(1, 1)
323 READ(UNIT = kgen_unit) kgen_bound(2, 1)
324 READ(UNIT = kgen_unit) kgen_bound(1, 2)
325 READ(UNIT = kgen_unit) kgen_bound(2, 2)
326 READ(UNIT = kgen_unit) kgen_bound(1, 3)
327 READ(UNIT = kgen_unit) kgen_bound(2, 3)
328 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
342 INTEGER, DIMENSION(2,2) :: kgen_bound local
347 READ(UNIT = kgen_unit) kgen_bound(1, 1)
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_sw_vrtqdr/src/
H A Drrtmg_sw_spcvmc.f90233 INTEGER, DIMENSION(2,2) :: kgen_bound local
238 READ(UNIT = kgen_unit) kgen_bound(1, 1)
239 READ(UNIT = kgen_unit) kgen_bound(2, 1)
240 READ(UNIT = kgen_unit) kgen_bound(1, 2)
241 READ(UNIT = kgen_unit) kgen_bound(2, 2)
242 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
256 INTEGER, DIMENSION(2,3) :: kgen_bound local
261 READ(UNIT = kgen_unit) kgen_bound(1, 1)
262 READ(UNIT = kgen_unit) kgen_bound(2, 1)
263 READ(UNIT = kgen_unit) kgen_bound(1, 2)
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_lw_cldprmc/src/
H A Drrtmg_lw_rad.f90417 INTEGER, DIMENSION(2,1) :: kgen_bound local
422 READ(UNIT = kgen_unit) kgen_bound(1, 1)
423 READ(UNIT = kgen_unit) kgen_bound(2, 1)
424 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
438 INTEGER, DIMENSION(2,3) :: kgen_bound local
443 READ(UNIT = kgen_unit) kgen_bound(1, 1)
444 READ(UNIT = kgen_unit) kgen_bound(2, 1)
445 READ(UNIT = kgen_unit) kgen_bound(1, 2)
446 READ(UNIT = kgen_unit) kgen_bound(2, 2)
447 READ(UNIT = kgen_unit) kgen_bound(1, 3)
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/HOMME_limiter_optim_iter_full/src/
H A Dprim_advection_mod.F9068 integer, dimension(2,3) :: kgen_bound local
73 READ(UNIT = kgen_unit) kgen_bound(1, 1)
74 READ(UNIT = kgen_unit) kgen_bound(2, 1)
75 READ(UNIT = kgen_unit) kgen_bound(1, 2)
76 READ(UNIT = kgen_unit) kgen_bound(2, 2)
77 READ(UNIT = kgen_unit) kgen_bound(1, 3)
79 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
284 integer, dimension(2,3) :: kgen_bound local
295 …ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1, kge…
302 integer, dimension(2,2) :: kgen_bound local
[all …]
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_sw_rad/src/
H A Dradiation.F90416 INTEGER, DIMENSION(2,1) :: kgen_bound local
421 READ(UNIT = kgen_unit) kgen_bound(1, 1)
422 READ(UNIT = kgen_unit) kgen_bound(2, 1)
423 ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1))
437 INTEGER, DIMENSION(2,2) :: kgen_bound local
442 READ(UNIT = kgen_unit) kgen_bound(1, 1)
446 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
460 INTEGER, DIMENSION(2,2) :: kgen_bound local
469 … ALLOCATE(var(kgen_bound(2, 1) - kgen_bound(1, 1) + 1, kgen_bound(2, 2) - kgen_bound(1, 2) + 1))
483 INTEGER, DIMENSION(2,3) :: kgen_bound local
[all …]

123