Home
last modified time | relevance | path

Searched refs:coef_xy (Results 1 – 25 of 45) sorted by relevance

12

/dports/science/cp2k-data/cp2k-7.1.0/src/grid/
H A Dcollocate_fast_5.f90141 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
142 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
217 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
218 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
219 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
220 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
221 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
222 coef_xy(2, 3) = coef_xy(2, 3) + coef_xyz(3)*pol_z(2, 0, kg)
223 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(4)*pol_z(1, 1, kg)
224 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(4)*pol_z(2, 1, kg)
[all …]
H A Dcollocate_fast_6.f90230 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
231 coef_xy(:, 2) = coef_xy(:, 2) + coef_xyz(2)*pol_z(:, 0, kg)
232 coef_xy(:, 3) = coef_xy(:, 3) + coef_xyz(3)*pol_z(:, 0, kg)
233 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(4)*pol_z(:, 1, kg)
491 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
492 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
493 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
494 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
495 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
496 coef_xy(2, 3) = coef_xy(2, 3) + coef_xyz(3)*pol_z(2, 0, kg)
[all …]
H A Dcollocate_fast_1.f90436 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
437 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
438 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
439 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
440 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
441 coef_xy(2, 3) = coef_xy(2, 3) + coef_xyz(3)*pol_z(2, 0, kg)
442 coef_xy(1, 4) = coef_xy(1, 4) + coef_xyz(4)*pol_z(1, 0, kg)
443 coef_xy(2, 4) = coef_xy(2, 4) + coef_xyz(4)*pol_z(2, 0, kg)
444 coef_xy(1, 5) = coef_xy(1, 5) + coef_xyz(5)*pol_z(1, 0, kg)
445 coef_xy(2, 5) = coef_xy(2, 5) + coef_xyz(5)*pol_z(2, 0, kg)
[all …]
H A Dcollocate_fast_3.f90141 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
142 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
313 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
314 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
315 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
316 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
317 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
318 coef_xy(2, 3) = coef_xy(2, 3) + coef_xyz(3)*pol_z(2, 0, kg)
319 coef_xy(1, 4) = coef_xy(1, 4) + coef_xyz(4)*pol_z(1, 0, kg)
320 coef_xy(2, 4) = coef_xy(2, 4) + coef_xyz(4)*pol_z(2, 0, kg)
[all …]
H A Dcollocate_fast_2.f90314 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
315 coef_xy(:, 2) = coef_xy(:, 2) + coef_xyz(2)*pol_z(:, 0, kg)
316 coef_xy(:, 3) = coef_xy(:, 3) + coef_xyz(3)*pol_z(:, 0, kg)
317 coef_xy(:, 4) = coef_xy(:, 4) + coef_xyz(4)*pol_z(:, 0, kg)
318 coef_xy(:, 5) = coef_xy(:, 5) + coef_xyz(5)*pol_z(:, 0, kg)
319 coef_xy(:, 6) = coef_xy(:, 6) + coef_xyz(6)*pol_z(:, 0, kg)
320 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(7)*pol_z(:, 1, kg)
321 coef_xy(:, 2) = coef_xy(:, 2) + coef_xyz(8)*pol_z(:, 1, kg)
322 coef_xy(:, 4) = coef_xy(:, 4) + coef_xyz(9)*pol_z(:, 1, kg)
412 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
[all …]
H A Dcollocate_fast_4.f90141 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
222 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
223 coef_xy(:, 2) = coef_xy(:, 2) + coef_xyz(2)*pol_z(:, 0, kg)
224 coef_xy(:, 3) = coef_xy(:, 3) + coef_xyz(3)*pol_z(:, 0, kg)
225 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(4)*pol_z(:, 1, kg)
302 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
303 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
304 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
305 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
306 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
[all …]
H A Dintegrate_fast_6.f9046 coef_xy = 0.0_dp
173 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
174 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
175 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
176 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
262 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
263 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
264 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(1:2, 1)*pol_y(1, 0, jg)
265 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(3:4, 1)*pol_y(2, 0, jg)
266 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(1:2, 0)*pol_y(1, 1, jg)
[all …]
H A Dintegrate_fast_4.f9046 coef_xy = 0.0_dp
170 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
171 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
254 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
255 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
256 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(1:2, 1)*pol_y(1, 0, jg)
257 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(3:4, 1)*pol_y(2, 0, jg)
258 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(1:2, 0)*pol_y(1, 1, jg)
259 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(3:4, 0)*pol_y(2, 1, jg)
579 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
[all …]
H A Dintegrate_fast_1.f90171 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
172 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
173 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
174 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
262 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
263 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
264 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
265 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
266 coef_xy(1, 2) = coef_xy(1, 2) + coef_x(1, 1)*pol_y(1, 0, jg)
267 coef_xy(2, 2) = coef_xy(2, 2) + coef_x(2, 1)*pol_y(1, 0, jg)
[all …]
H A Dintegrate_fast_3.f9046 coef_xy = 0.0_dp
171 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
172 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
352 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
353 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
354 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(1:2, 1)*pol_y(1, 0, jg)
355 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(3:4, 1)*pol_y(2, 0, jg)
356 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(1:2, 2)*pol_y(1, 0, jg)
357 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(3:4, 2)*pol_y(2, 0, jg)
358 coef_xy(:, 4) = coef_xy(:, 4) + coef_x(1:2, 0)*pol_y(1, 1, jg)
[all …]
H A Dintegrate_fast_2.f90170 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
171 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
172 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
173 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
251 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
252 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
253 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
254 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
255 coef_xy(1, 2) = coef_xy(1, 2) + coef_x(1, 1)*pol_y(1, 0, jg)
256 coef_xy(2, 2) = coef_xy(2, 2) + coef_x(2, 1)*pol_y(1, 0, jg)
[all …]
H A Dintegrate_fast_5.f9046 coef_xy = 0.0_dp
172 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
173 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
433 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
434 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
435 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(1:2, 1)*pol_y(1, 0, jg)
436 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(3:4, 1)*pol_y(2, 0, jg)
437 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(1:2, 2)*pol_y(1, 0, jg)
438 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(3:4, 2)*pol_y(2, 0, jg)
439 coef_xy(:, 4) = coef_xy(:, 4) + coef_x(1:2, 3)*pol_y(1, 0, jg)
[all …]
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/grid/
H A Dcollocate_fast_5.f90141 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
142 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
217 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
218 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
219 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
220 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
221 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
222 coef_xy(2, 3) = coef_xy(2, 3) + coef_xyz(3)*pol_z(2, 0, kg)
223 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(4)*pol_z(1, 1, kg)
224 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(4)*pol_z(2, 1, kg)
[all …]
H A Dcollocate_fast_6.f90230 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
231 coef_xy(:, 2) = coef_xy(:, 2) + coef_xyz(2)*pol_z(:, 0, kg)
232 coef_xy(:, 3) = coef_xy(:, 3) + coef_xyz(3)*pol_z(:, 0, kg)
233 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(4)*pol_z(:, 1, kg)
491 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
492 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
493 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
494 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
495 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
496 coef_xy(2, 3) = coef_xy(2, 3) + coef_xyz(3)*pol_z(2, 0, kg)
[all …]
H A Dcollocate_fast_1.f90436 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
437 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
438 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
439 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
440 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
441 coef_xy(2, 3) = coef_xy(2, 3) + coef_xyz(3)*pol_z(2, 0, kg)
442 coef_xy(1, 4) = coef_xy(1, 4) + coef_xyz(4)*pol_z(1, 0, kg)
443 coef_xy(2, 4) = coef_xy(2, 4) + coef_xyz(4)*pol_z(2, 0, kg)
444 coef_xy(1, 5) = coef_xy(1, 5) + coef_xyz(5)*pol_z(1, 0, kg)
445 coef_xy(2, 5) = coef_xy(2, 5) + coef_xyz(5)*pol_z(2, 0, kg)
[all …]
H A Dcollocate_fast_3.f90141 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
142 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
313 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
314 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
315 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
316 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
317 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
318 coef_xy(2, 3) = coef_xy(2, 3) + coef_xyz(3)*pol_z(2, 0, kg)
319 coef_xy(1, 4) = coef_xy(1, 4) + coef_xyz(4)*pol_z(1, 0, kg)
320 coef_xy(2, 4) = coef_xy(2, 4) + coef_xyz(4)*pol_z(2, 0, kg)
[all …]
H A Dcollocate_fast_2.f90314 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
315 coef_xy(:, 2) = coef_xy(:, 2) + coef_xyz(2)*pol_z(:, 0, kg)
316 coef_xy(:, 3) = coef_xy(:, 3) + coef_xyz(3)*pol_z(:, 0, kg)
317 coef_xy(:, 4) = coef_xy(:, 4) + coef_xyz(4)*pol_z(:, 0, kg)
318 coef_xy(:, 5) = coef_xy(:, 5) + coef_xyz(5)*pol_z(:, 0, kg)
319 coef_xy(:, 6) = coef_xy(:, 6) + coef_xyz(6)*pol_z(:, 0, kg)
320 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(7)*pol_z(:, 1, kg)
321 coef_xy(:, 2) = coef_xy(:, 2) + coef_xyz(8)*pol_z(:, 1, kg)
322 coef_xy(:, 4) = coef_xy(:, 4) + coef_xyz(9)*pol_z(:, 1, kg)
412 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
[all …]
H A Dcollocate_fast_4.f90141 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
222 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(1)*pol_z(:, 0, kg)
223 coef_xy(:, 2) = coef_xy(:, 2) + coef_xyz(2)*pol_z(:, 0, kg)
224 coef_xy(:, 3) = coef_xy(:, 3) + coef_xyz(3)*pol_z(:, 0, kg)
225 coef_xy(:, 1) = coef_xy(:, 1) + coef_xyz(4)*pol_z(:, 1, kg)
302 coef_xy(1, 1) = coef_xy(1, 1) + coef_xyz(1)*pol_z(1, 0, kg)
303 coef_xy(2, 1) = coef_xy(2, 1) + coef_xyz(1)*pol_z(2, 0, kg)
304 coef_xy(1, 2) = coef_xy(1, 2) + coef_xyz(2)*pol_z(1, 0, kg)
305 coef_xy(2, 2) = coef_xy(2, 2) + coef_xyz(2)*pol_z(2, 0, kg)
306 coef_xy(1, 3) = coef_xy(1, 3) + coef_xyz(3)*pol_z(1, 0, kg)
[all …]
H A Dintegrate_fast_6.f9046 coef_xy = 0.0_dp
173 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
174 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
175 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
176 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
262 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
263 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
264 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(1:2, 1)*pol_y(1, 0, jg)
265 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(3:4, 1)*pol_y(2, 0, jg)
266 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(1:2, 0)*pol_y(1, 1, jg)
[all …]
H A Dintegrate_fast_4.f9046 coef_xy = 0.0_dp
170 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
171 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
254 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
255 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
256 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(1:2, 1)*pol_y(1, 0, jg)
257 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(3:4, 1)*pol_y(2, 0, jg)
258 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(1:2, 0)*pol_y(1, 1, jg)
259 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(3:4, 0)*pol_y(2, 1, jg)
579 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
[all …]
H A Dintegrate_fast_1.f90171 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
172 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
173 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
174 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
262 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
263 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
264 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
265 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
266 coef_xy(1, 2) = coef_xy(1, 2) + coef_x(1, 1)*pol_y(1, 0, jg)
267 coef_xy(2, 2) = coef_xy(2, 2) + coef_x(2, 1)*pol_y(1, 0, jg)
[all …]
H A Dintegrate_fast_3.f9046 coef_xy = 0.0_dp
171 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
172 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
352 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
353 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
354 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(1:2, 1)*pol_y(1, 0, jg)
355 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(3:4, 1)*pol_y(2, 0, jg)
356 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(1:2, 2)*pol_y(1, 0, jg)
357 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(3:4, 2)*pol_y(2, 0, jg)
358 coef_xy(:, 4) = coef_xy(:, 4) + coef_x(1:2, 0)*pol_y(1, 1, jg)
[all …]
H A Dintegrate_fast_2.f90170 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
171 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
172 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
173 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
251 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(1, 0)*pol_y(1, 0, jg)
252 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(2, 0)*pol_y(1, 0, jg)
253 coef_xy(1, 1) = coef_xy(1, 1) + coef_x(3, 0)*pol_y(2, 0, jg)
254 coef_xy(2, 1) = coef_xy(2, 1) + coef_x(4, 0)*pol_y(2, 0, jg)
255 coef_xy(1, 2) = coef_xy(1, 2) + coef_x(1, 1)*pol_y(1, 0, jg)
256 coef_xy(2, 2) = coef_xy(2, 2) + coef_x(2, 1)*pol_y(1, 0, jg)
[all …]
H A Dintegrate_fast_5.f9046 coef_xy = 0.0_dp
172 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
173 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
433 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(1:2, 0)*pol_y(1, 0, jg)
434 coef_xy(:, 1) = coef_xy(:, 1) + coef_x(3:4, 0)*pol_y(2, 0, jg)
435 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(1:2, 1)*pol_y(1, 0, jg)
436 coef_xy(:, 2) = coef_xy(:, 2) + coef_x(3:4, 1)*pol_y(2, 0, jg)
437 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(1:2, 2)*pol_y(1, 0, jg)
438 coef_xy(:, 3) = coef_xy(:, 3) + coef_x(3:4, 2)*pol_y(2, 0, jg)
439 coef_xy(:, 4) = coef_xy(:, 4) + coef_x(1:2, 3)*pol_y(1, 0, jg)
[all …]
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/testsuite/gfortran.dg/graphite/
H A Dpr68550-1.f9022 coef_xy(2,((lp+1)*(lp+2))/2), & local
32 coef_xy(:,3)=coef_xy(:,3)+coef_x(3:4,0)*pol_y(2,1,jg)
34 coef_xyz(3)=coef_xyz(3)+coef_xy(1,3)*pol_z(1,0,kg)

12