Searched refs:ikShift2 (Results 1 – 4 of 4) sorted by relevance
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/grid/ |
H A D | colloc_int_kloop.fypp | 60 ikShift2=shiftPos(2)+kstart2-l_bounds(1,2) 61 IF (ikShift2<0) ikShift2=ikShift2-ndim(2)+1 62 ikShift2=(ikShift2/ndim(2))*ndim(2)-shiftPos(2) 63 !ikShift2=FLOOR(REAL(shiftPos(2)+kstart2-l_bounds(1,2))/REAL(ndim(2)))*ndim(2)-shiftPos(2) 64 kstart2=MIN(ikShift2+l_bounds(2,2),kstart2) 65 kend2=MAX(ikShift2+l_bounds(1,2),kmin) 66 ikstart2=kstart2-ikShift2-l_bounds(1,2)+l_shift(2)
|
H A D | gauss_colloc.F | 187 ijShift, iJump, ik, ikShift, ikShift2, ikstart, ikstart2, iend, iend2, & local
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | colloc_int_kloop.fypp | 60 ikShift2=shiftPos(2)+kstart2-l_bounds(1,2) 61 IF (ikShift2<0) ikShift2=ikShift2-ndim(2)+1 62 ikShift2=(ikShift2/ndim(2))*ndim(2)-shiftPos(2) 63 !ikShift2=FLOOR(REAL(shiftPos(2)+kstart2-l_bounds(1,2))/REAL(ndim(2)))*ndim(2)-shiftPos(2) 64 kstart2=MIN(ikShift2+l_bounds(2,2),kstart2) 65 kend2=MAX(ikShift2+l_bounds(1,2),kmin) 66 ikstart2=kstart2-ikShift2-l_bounds(1,2)+l_shift(2)
|
H A D | gauss_colloc.F | 194 ijShift, iJump, ik, ikShift, ikShift2, ikstart, ikstart2, iend, iend2, & local
|