Searched refs:particles_z (Results 1 – 4 of 4) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | cp_realspace_grid_cube.F | 52 INTEGER, ALLOCATABLE, DIMENSION(:) :: particles_z local
60 ALLOCATE (particles_z(n))
63 CALL get_atomic_kind(my_particles%els(i)%atomic_kind, z=particles_z(i))
68 particles_z=particles_z, particles_r=particles_r, &
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | cp_realspace_grid_cube.F | 52 INTEGER, ALLOCATABLE, DIMENSION(:) :: particles_z local
60 ALLOCATE (particles_z(n))
63 CALL get_atomic_kind(my_particles%els(i)%atomic_kind, z=particles_z(i))
68 particles_z=particles_z, particles_r=particles_r, &
|
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/pw/ |
| H A D | realspace_grid_cube.F | 53 INTEGER, DIMENSION(:), INTENT(IN), OPTIONAL :: particles_z local
99 CPASSERT(PRESENT(particles_z) .EQV. PRESENT(particles_r))
101 IF (PRESENT(particles_z)) THEN
102 CPASSERT(SIZE(particles_z) == SIZE(particles_r, dim=2))
105 np = MIN(99999, SIZE(particles_z))
120 IF (PRESENT(particles_z)) THEN
701 CPASSERT(PRESENT(particles_z) .EQV. PRESENT(particles_r))
703 IF (PRESENT(particles_z)) THEN
704 CPASSERT(SIZE(particles_z) == SIZE(particles_r, dim=2))
707 np = MIN(99999, SIZE(particles_z))
[all …]
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/pw/ |
| H A D | realspace_grid_cube.F | 53 INTEGER, DIMENSION(:), INTENT(IN), OPTIONAL :: particles_z local
99 CPASSERT(PRESENT(particles_z) .EQV. PRESENT(particles_r))
101 IF (PRESENT(particles_z)) THEN
102 CPASSERT(SIZE(particles_z) == SIZE(particles_r, dim=2))
105 np = MIN(99999, SIZE(particles_z))
120 IF (PRESENT(particles_z)) THEN
701 CPASSERT(PRESENT(particles_z) .EQV. PRESENT(particles_r))
703 IF (PRESENT(particles_z)) THEN
704 CPASSERT(SIZE(particles_z) == SIZE(particles_r, dim=2))
707 np = MIN(99999, SIZE(particles_z))
[all …]
|