Hi!
I am a new user. When I try to compile my fortran code in Pardiso. I got some errors.
*** Error in Pardiso < sequence_ido,parameters> error_num= 15
*** Input check: matrix_type_new 0 <out of bounds>
*** Input parameters: inconsistent error= 15 max_fac_store_in:1
matrix_number_in: 1 matrix_type_in: 0
ido_in : 33 neqns_in : 10000
ia<neqns_in+1>-1: 0 nb_in : 1
SOLVE COMPLETED ...
My CSR fie is 1-based format and my sparse matrix is a complex structurally symmetrical matrix.
I have print my CSR and carefully check. I believe there is nothing wrong.
I do not set any IPARM parameters and just use the pardisoinit and pardiso subroutine.
Here is my part of the code and parameters.
MTYPE = 3 ! COMPLEX STRUCTUALLY SYMMETRIC SOLVER = 0 ! USE SPARSE DIRECT METHOD CALL PARDISOINIT(PT, MTYPE, SOLVER, IPARM, DPARM, ERROR) IF (ERROR .NE. 0) THEN IF (ERROR.EQ.-10 ) WRITE(*,*) 'NO LICENSE FILE FOUND' IF (ERROR.EQ.-11 ) WRITE(*,*) 'LICENSE IS EXPIRED' IF (ERROR.EQ.-12 ) WRITE(*,*) 'WRONG USERNAME OR HOSTNAME' STOP ELSE WRITE(*,*) '[PARDISO]: LICENSE CHECK WAS SUCCESSFUL ... ' END IF MAXFCT = 1 MNUM = 1 PHASE = 33 MSGLVL = 1 NRHS = 1 CALL PARDISO (PT, MAXFCT, MNUM, MTYPE, PHASE, 10000, A1, A3, A2,& PERM, NRHS, IPARM, MSGLVL, S, X, ERROR, DPARM) WRITE(*,*) 'SOLVE COMPLETED ... '
Could you give me some suggestion and help? Thanks for your time and attention!
Sincerely,
Baorui