Subroutine lednstof
subroutine lednstof
! Variables
integer, intent(in) :: n
integer, intent(in) :: m
integer, intent(in) :: ns
integer, intent(in) :: nss
double precision, intent(in), dimension (0:m-2) :: aa
double precision, intent(in), dimension (0:m-2) :: ww
double precision, intent(inout), dimension (0:ns,0:m) :: s
double precision, intent(inout), dimension (0:nss,0:m) :: ss
integer :: i
integer :: j
integer :: k
double precision :: a1
double precision :: a2
double precision :: b1
double precision :: b2
end subroutine lednstof
Description of Variables
n
integer, intent(in) :: n
m
integer, intent(in) :: m
ns
integer, intent(in) :: ns
nss
integer, intent(in) :: nss
aa
double precision, intent(in), dimension (0:m-2) :: aa
ww
double precision, intent(in), dimension (0:m-2) :: ww
s
double precision, intent(inout), dimension (0:ns,0:m) :: s
ss
double precision, intent(inout), dimension (0:nss,0:m) :: ss
i
integer :: i
j
integer :: j
k
integer :: k
a1
double precision :: a1
a2
double precision :: a2
b1
double precision :: b1
b2
double precision :: b2