pick_hole Function

public function pick_hole(ilut, exclude_orb) result(orb)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(in)			::	ilut(0:NIfTot)
integer,	intent(in)			::	exclude_orb

Return Value integer

Contents