comp-chem/cp2k
1
0
Fork 0
mirror of https://github.com/cp2k/cp2k.git synced 2026-07-28 22:25:32 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix integer overflow for large, very sparse matrices on few ranks

Browse source 
svn-origin-rev: 18332
This commit is contained in:
Samuel Andermatt 2018-03-20 08:43:00 +00:00
parent 6a0c3af035
commit dcd8c0de6d
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/dbcsr/ops/dbcsr_csr_conversions.F
View file

@ -220,7 +220,7 @@ CONTAINS
IF (INT(nrows_total, kind=int_8)*INT(ncols_total, kind=int_8) .LT. nze_total) &
CPABORT("Total number of non-zero elements must not exceed total matrix size")
IF (nrows_local*ncols_total .LT. nze_local) &
IF (INT(nrows_local, kind=int_8)*INT(ncols_total, kind=int_8) .LT. nze_local) &
CPABORT("Local number of non-zero elements must not exceed local matrix size")
csr_mat%ncols_total = ncols_total