Subroutine lenstof2

subroutine lenstof2

        ! Variables
    integer, intent(in) :: n
    integer, intent(in) :: m
    integer, intent(in) :: ns
    integer, intent(in) :: nss
    integer, intent(in) :: mx
    double precision, intent(in), dimension (0:ns,0:m) :: s
    double precision, intent(in), dimension (0:mx) :: aa
    double precision, intent(in), dimension (0:mx) :: ww
    double precision, intent(inout), dimension (0:nss,0:m) :: ss
    integer :: i
    integer :: j
    double precision :: a1
    double precision :: a2
    double precision :: b1
    double precision :: b2

end subroutine lenstof2

Description of Variables

n

integer, intent(in) :: n

m

integer, intent(in) :: m

ns

integer, intent(in) :: ns

nss

integer, intent(in) :: nss

mx

integer, intent(in) :: mx

s

double precision, intent(in), dimension (0:ns,0:m) :: s

aa

double precision, intent(in), dimension (0:mx) :: aa

ww

double precision, intent(in), dimension (0:mx) :: ww

ss

double precision, intent(inout), dimension (0:nss,0:m) :: ss

i

integer :: i

j

integer :: j

a1

double precision :: a1

a2

double precision :: a2

b1

double precision :: b1

b2

double precision :: b2