fdurastante/psblas3
1
0
Fork 0
mirror of https://github.com/sfilippone/psblas3.git synced 2026-10-19 12:22:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

base/Makefile

Browse Source 
base/modules/Makefile
 base/modules/psb_error_mod.F90
 base/newserial
 base/newserial/Makefile
 base/newserial/psbn_base_mat_mod.f03
 base/newserial/psbn_coo_mat.f03
 base/newserial/psbn_csr_mat.f03
 krylov/psb_zrgmres.f90
 util/psb_mmio_mod.f90

psblas3:
fixed CMPLX kind argument.
Added files for initial OO class implementation of serial stuff.
This commit is contained in:
Salvatore Filippone
2009-06-28 17:17:31 +00:00
parent 2a6383e870
commit a1cf9b1836
9 changed files with 1662 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/modules/Makefile
+1
View File
@@ -41,6 +41,7 @@ psb_hash_mod.o: psb_const_mod.o psb_realloc_mod.o
psb_base_mod.o: $(MODULES)
blacsmod:
(make psb_blacs_mod.o F90COPT="$(F90COPT) $(EXTRA_OPT)")
base/modules/psb_error_mod.F90
+3
View File
@@ -471,6 +471,9 @@ contains
write (0,'("Argument M is required when argument PARTS is specified")')
case(600)
write (0,'("Sparse Matrix and descriptors are in an invalid state for this subroutine call: ",i0)')i_e_d(1)
case(700)
write (0,'("Base version has been called: the actual derived type is incomplete!")')
case (1122)
write (0,'("Invalid state for communication descriptor")')
case (1123)