mshSoybean Subroutine

public subroutine mshSoybean(obj, name, num_threads)

$OMP parallel num_threads(n) private(i) $OMP do $OMP end do $OMP end parallel

$OMP parallel num_threads(n) private(i) $OMP do $OMP end do $OMP end parallel

$OMP parallel num_threads(n) private(i) $OMP do $OMP end do $OMP end parallel

Type Bound

soybean_

Arguments

Type	Intent	Optional	Attributes		Name
class(soybean_),	intent(inout)			::	obj
character(len=*),	intent(in)			::	name
integer(kind=int32),	intent(in),	optional		::	num_threads