Lines Matching refs:start3

307   PetscInt start3, len3
308 …PetscScalar, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1, start3:start3 + l…
319   PetscInt start3, len3
320 …PetscReal, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1, start3:start3 + len…
331   PetscInt start3, len3
332 …PetscInt, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1, start3:start3 + len3…
343   PetscInt start3, len3
344 …Addr, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1, start3:start3 + len3 - 1)
356   PetscInt start1, start2, start3
360   start3 = lbound(ptr, 3)
361   call F90Array3dGetAddrScalar(ptr(start1, start2, start3), address)
369   PetscInt start1, start2, start3
373   start3 = lbound(ptr, 3)
374   call F90Array3dGetAddrReal(ptr(start1, start2, start3), address)
382   PetscInt start1, start2, start3
386   start3 = lbound(ptr, 3)
387   call F90Array3dGetAddrInt(ptr(start1, start2, start3), address)
395   PetscInt start1, start2, start3
399   start3 = lbound(ptr, 3)
400   call F90Array3dGetAddrFortranAddr(ptr(start1, start2, start3), address)
442   PetscInt start3, len3
444 …PetscScalar, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1, start3:start3 + l…
455   PetscInt start3, len3
457 …PetscReal, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1, start3:start3 + len…
468   PetscInt start3, len3
470 …PetscInt, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1, start3:start3 + len3…
481   PetscInt start3, len3
483 …, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1, start3:start3 + len3 - 1, st…
494   PetscInt start1, start2, start3, start4
498   start3 = lbound(ptr, 3)
500   call F90Array4dGetAddrScalar(ptr(start1, start2, start3, start4), address)
508   PetscInt start1, start2, start3, start4
512   start3 = lbound(ptr, 3)
514   call F90Array4dGetAddrReal(ptr(start1, start2, start3, start4), address)
522   PetscInt start1, start2, start3, start4
526   start3 = lbound(ptr, 3)
528   call F90Array4dGetAddrInt(ptr(start1, start2, start3, start4), address)
536   PetscFortranAddr start1, start2, start3, start4
540   start3 = lbound(ptr, 3)
542   call F90Array4dGetAddrFortranAddr(ptr(start1, start2, start3, start4), address)