Functions/Subroutines | |
| subroutine | calcz (d, e, n, dmax, dmin, z, ierr) |
| function | pythag (a, b) |
| subroutine | ident (a, n) |
| subroutine calcz | ( | real, dimension(n) | d, |
| real, dimension(n) | e, | ||
| n, | |||
| dmax, | |||
| dmin, | |||
| real, dimension(n,n) | z, | ||
| ierr | |||
| ) |
| subroutine ident | ( | real, dimension(n,n) | a, |
| n | |||
| ) |
| function pythag | ( | a, | |
| b | |||
| ) |