Hi Fortran experts,
I am quite new to fortran, recently I am going through some fortran training materials and unable to make sense of a fortran array function: UBOUND.
in below subroutine, SUBROUTINE cholin(kb)
kb is an array, what is the difference between n and iw?
I am thinking n will be dimension 1 array, for a 3 x 3 arrary, n will be 9
and iw will be two dimension array, so iw= 3-1 equals 2. is it right?
it seems quite difficult to find materials that explains these functions in details.
Thanks in advance for anyone that could give some explanations.
!—Choleski Factorization on a Lower Triangle Stored as a Band—
USE precision; IMPLICIT NONE
REAL(iwp),INTENT(in out)::kb(:,:); INTEGER::i,j,k,l,ia,ib,n,iw; REAL(iwp)::x
DO j=1,iw; x=x+kb(i,j)**2; END DO
END SUBROUTINE cholin