main Program

Uses

Variables

Type Attributes Name Initial
type(FEMDomain_) :: space
type(Random_) :: random
real(kind=real64) :: center(3)
real(kind=real64) :: dist
real(kind=real64) :: coord(3)
real(kind=real64) :: direction(3)
real(kind=real64), parameter :: a = 0.010d0
integer(kind=int32) :: i
integer(kind=int32) :: j