I still can't find the solution. I post my code and tried your solution but still can't find the solution of my problem.
This the main program of my code :
READ (nin,*)
READ (nin,*) n, nrhs
lda = n
ldb = n
ALLOCATE (a(lda,n),b(ldb,nrhs),ipiv(n))...
I forgot that I'm not use division. When I try put for if else end if, I still get error. This is my line code:
Factorize A
Factorize A
call cpu_time(start)
CALL dgetrf(n,n,a,lda,ipiv,info)
IF (info==0) THEN
...
Dear all,
I'm write code in Fortran language when compile my program I got error message :
forrtl: severe (71): integer divide by zero
Image PC Routine Line Source
f0511 00000000007536A5 Unknown...