laytracingsoybean Subroutine

public subroutine laytracingsoybean(obj, light, Transparency, Resolution)

$OMP parallel do private(j) $OMP end parallel do

Type Bound

soybean_

Arguments

Type	Intent	Optional	Attributes		Name
class(soybean_),	intent(inout)			::	obj
type(Light_),	intent(in)			::	light
real(kind=real64),	intent(in),	optional		::	Transparency
real(kind=real64),	intent(in),	optional		::	Resolution