odd bug catched; in italian:
Usavo dichiarare e inizializzare "flags" come:
integer :: flags=c_def_flags
e da una chiamata all'altra, rimaneva il flag della chiamata precedente.
Poiche' nel modulo fortran, "aggiungo" is flag usando + anziche' un
operatore OR, il flag (un bit) rimanendo dalla chiamata precedente,
(la costruzione di L: qui siamo nella costruzione di U) veniva "spostato"
di una posizione in su, risultando nell'assenza effettiva del bit
"triangolare", a fronte della sua aggiunta.
Ho rimediato con:
integer :: flags
flags=c_def_flags
opt/Makefile
opt/psb_d_rsb_mat_mod.F03
opt/rsb_mod.f03
test/newfmt/Makefile
test/newfmt/ppde.f90
test/newfmt/runs/ppde.inp
test/serial/d_matgen.f03
test/serial/psb_d_rsb_mat_mod.F03
Minor fix for interface of rsb_init.
Copied RSB interface to OPT/
Linked into TEST/NEWFMT: start of debug.
Status: TO/FROM COO/FMT (CSR), SPMV, GET_DIAG seem to be working
(tested from ppde with DIAG preconditioner).
GETBLK segfaults.
Michele Martone
Salvatore Filippone