Subroutine chdiskn

subroutine chdiskn

        ! Variables
    integer :: i
    integer :: k
    integer, intent(in) :: N
    integer, intent(in) :: flag
    double precision :: pi
    double precision, dimension(N,3) :: A
    double precision, dimension(N,3) :: C
    double precision, dimension(N) :: D
    double precision, dimension(N) :: p

end subroutine chdiskn

Description of Variables

i

integer :: i

k

integer :: k

N

integer, intent(in) :: N

flag

integer, intent(in) :: flag

pi

double precision :: pi

A

double precision, dimension(N,3) :: A

C

double precision, dimension(N,3) :: C

D

double precision, dimension(N) :: D

p

double precision, dimension(N) :: p