GRASP
|
Functions/Subroutines | |
subroutine | biotr1 (PI, QI, NLI, NINSHLI, PF, QF, NLF, NINSHLF, NGRID, MXL, SCR, LSCR, NTESTG, CISHL, CICI, CFSHL, CFCI) |
subroutine biotr1 | ( | real(double), dimension(ngrid,*) | PI, |
real(double), dimension(ngrid,*) | QI, | ||
integer, dimension(mxl) | NLI, | ||
integer, dimension(mxl) | NINSHLI, | ||
real(double), dimension(ngrid,*) | PF, | ||
real(double), dimension(ngrid,*) | QF, | ||
integer, dimension(mxl) | NLF, | ||
integer, dimension(mxl) | NINSHLF, | ||
integer, intent(in) | NGRID, | ||
integer, intent(in) | MXL, | ||
real(double), dimension(*) | SCR, | ||
integer, intent(in) | LSCR, | ||
integer, intent(in) | NTESTG, | ||
real(double), dimension(*) | CISHL, | ||
real(double), dimension(*) | CICI, | ||
real(double), dimension(*) | CFSHL, | ||
real(double), dimension(*) | CFCI | ||
) |