mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-16 19:02:09 +00:00
[UPDATE] Refactor after template update for RMA routines
This commit is contained in:
@@ -1,50 +0,0 @@
|
||||
#!/usr/bin/env bash
|
||||
#SBATCH --job-name=psb_spmv_overlap
|
||||
#SBATCH --partition=boost_usr_prod
|
||||
#SBATCH --time=01:00:00
|
||||
#SBATCH --nodes=2
|
||||
#SBATCH --ntasks=64
|
||||
#SBATCH --ntasks-per-node=32
|
||||
#SBATCH --cpus-per-task=1
|
||||
#SBATCH --threads-per-core=1
|
||||
#SBATCH --gpus-per-node=4
|
||||
#SBATCH --export=ALL
|
||||
#SBATCH -A CNHPC_1736213
|
||||
#SBATCH --output=psb_spmv_overlap_%j.out
|
||||
#SBATCH --error=psb_spmv_overlap_%j.err
|
||||
|
||||
set -euo pipefail
|
||||
|
||||
# Environment tuned like the existing comm test script.
|
||||
export UCX_VFS_ENABLE=n
|
||||
export UCX_VFS_USE_FUSE=n
|
||||
export UCX_STATS_DEST=none
|
||||
export UCX_LOG_LEVEL=error
|
||||
export UCX_TLS=dc,sm,self
|
||||
export UCX_NET_DEVICES=mlx5_0:1
|
||||
export OMPI_MCA_coll=^hcoll,han
|
||||
export OMPI_MCA_coll_hcoll_enable=0
|
||||
export UCX_MEMTYPE_CACHE=n
|
||||
export UCX_CLOSE_TIMEOUT=10s
|
||||
|
||||
EXEC=./test/comm/spmv/runs/spmv_overlap
|
||||
IDIM_LIST=${IDIM_LIST:-"20 40 60 80 100 140 180 220 260 300"}
|
||||
TIMES=${TIMES:-100}
|
||||
BUILD_IF_MISSING=${BUILD_IF_MISSING:-1}
|
||||
|
||||
if [[ ! -x "$EXEC" ]]; then
|
||||
echo "Executable not found: $EXEC" >&2
|
||||
exit 1
|
||||
fi
|
||||
|
||||
echo "Running SpMV overlap comm test"
|
||||
echo " EXEC=$EXEC"
|
||||
echo " IDIM_LIST=$IDIM_LIST"
|
||||
echo " TIMES=$TIMES"
|
||||
echo " BUILD_IF_MISSING=$BUILD_IF_MISSING"
|
||||
|
||||
for IDIM in $IDIM_LIST; do
|
||||
echo ""
|
||||
echo "=== Running IDIM=$IDIM TIMES=$TIMES ==="
|
||||
IDIM="$IDIM" TIMES="$TIMES" srun --exclusive -N2 -n64 "$EXEC"
|
||||
done
|
||||
@@ -5,12 +5,6 @@ module psb_spmv_overlap_test
|
||||
|
||||
use psb_base_mod
|
||||
use psb_util_mod
|
||||
use psb_comm_schemes_mod, only: psb_comm_isend_irecv_, psb_comm_ineighbor_alltoallv_, &
|
||||
& psb_comm_persistent_ineighbor_alltoallv_, psb_comm_rma_pull_, psb_comm_rma_push_, &
|
||||
& psb_comm_handle_type
|
||||
use psb_comm_baseline_mod, only: psb_comm_baseline_handle
|
||||
use psb_comm_neighbor_impl_mod, only: psb_comm_neighbor_handle
|
||||
use psb_comm_rma_mod, only: psb_comm_rma_handle
|
||||
#ifdef PSB_HAVE_CUDA
|
||||
use psb_cuda_mod
|
||||
#endif
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
! documentation and/or other materials provided with the distribution.
|
||||
! 3. The name of the PSBLAS group or the names of its contributors may
|
||||
! not be used to endorse or promote products derived from this
|
||||
! software without specific written permission.
|
||||
! software without specific prior written permission.
|
||||
!
|
||||
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
! ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
! documentation and/or other materials provided with the distribution.
|
||||
! 3. The name of the PSBLAS group or the names of its contributors may
|
||||
! not be used to endorse or promote products derived from this
|
||||
! software without specific written permission.
|
||||
! software without specific prior written permission.
|
||||
!
|
||||
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
! ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
! documentation and/or other materials provided with the distribution.
|
||||
! 3. The name of the PSBLAS group or the names of its contributors may
|
||||
! not be used to endorse or promote products derived from this
|
||||
! software without specific written permission.
|
||||
! software without specific prior written permission.
|
||||
!
|
||||
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
! ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
! documentation and/or other materials provided with the distribution.
|
||||
! 3. The name of the PSBLAS group or the names of its contributors may
|
||||
! not be used to endorse or promote products derived from this
|
||||
! software without specific written permission.
|
||||
! software without specific prior written permission.
|
||||
!
|
||||
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
! ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
! documentation and/or other materials provided with the distribution.
|
||||
! 3. The name of the PSBLAS group or the names of its contributors may
|
||||
! not be used to endorse or promote products derived from this
|
||||
! software without specific written permission.
|
||||
! software without specific prior written permission.
|
||||
!
|
||||
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
! ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
@@ -467,8 +467,8 @@ contains
|
||||
! compute gridpoint coordinates
|
||||
call idx2ijk(ix,iy,glob_row,idim,idim)
|
||||
! x, y coordinates
|
||||
x = (ix-1)*deltah
|
||||
y = (iy-1)*deltah
|
||||
x = (ix)*deltah
|
||||
y = (iy)*deltah
|
||||
|
||||
zt(k) = f_(x,y)
|
||||
! internal point: build discretization
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
! documentation and/or other materials provided with the distribution.
|
||||
! 3. The name of the PSBLAS group or the names of its contributors may
|
||||
! not be used to endorse or promote products derived from this
|
||||
! software without specific written permission.
|
||||
! software without specific prior written permission.
|
||||
!
|
||||
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
! ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
@@ -496,9 +496,9 @@ contains
|
||||
! compute gridpoint coordinates
|
||||
call idx2ijk(ix,iy,iz,glob_row,idim,idim,idim)
|
||||
! x, y, z coordinates
|
||||
x = (ix-1)*deltah
|
||||
y = (iy-1)*deltah
|
||||
z = (iz-1)*deltah
|
||||
x = (ix)*deltah
|
||||
y = (iy)*deltah
|
||||
z = (iz)*deltah
|
||||
zt(k) = f_(x,y,z)
|
||||
! internal point: build discretization
|
||||
!
|
||||
@@ -670,8 +670,6 @@ program psb_d_pde3d
|
||||
use psb_linsolve_mod
|
||||
use psb_util_mod
|
||||
use psb_d_pde3d_mod
|
||||
use psb_comm_factory_mod
|
||||
|
||||
#if defined(PSB_OPENMP)
|
||||
use omp_lib
|
||||
#endif
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
! documentation and/or other materials provided with the distribution.
|
||||
! 3. The name of the PSBLAS group or the names of its contributors may
|
||||
! not be used to endorse or promote products derived from this
|
||||
! software without specific written permission.
|
||||
! software without specific prior written permission.
|
||||
!
|
||||
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
! ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
@@ -467,8 +467,8 @@ contains
|
||||
! compute gridpoint coordinates
|
||||
call idx2ijk(ix,iy,glob_row,idim,idim)
|
||||
! x, y coordinates
|
||||
x = (ix-1)*deltah
|
||||
y = (iy-1)*deltah
|
||||
x = (ix)*deltah
|
||||
y = (iy)*deltah
|
||||
|
||||
zt(k) = f_(x,y)
|
||||
! internal point: build discretization
|
||||
|
||||
@@ -14,7 +14,7 @@
|
||||
! documentation and/or other materials provided with the distribution.
|
||||
! 3. The name of the PSBLAS group or the names of its contributors may
|
||||
! not be used to endorse or promote products derived from this
|
||||
! software without specific written permission.
|
||||
! software without specific prior written permission.
|
||||
!
|
||||
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
! ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
@@ -496,9 +496,9 @@ contains
|
||||
! compute gridpoint coordinates
|
||||
call idx2ijk(ix,iy,iz,glob_row,idim,idim,idim)
|
||||
! x, y, z coordinates
|
||||
x = (ix-1)*deltah
|
||||
y = (iy-1)*deltah
|
||||
z = (iz-1)*deltah
|
||||
x = (ix)*deltah
|
||||
y = (iy)*deltah
|
||||
z = (iz)*deltah
|
||||
zt(k) = f_(x,y,z)
|
||||
! internal point: build discretization
|
||||
!
|
||||
|
||||
Reference in New Issue
Block a user