read_legpolyvar_modes Subroutine

private subroutine read_legpolyvar_modes(legpolyvar, modes)

Arguments

Type	Intent	Optional	Attributes		Name
type(atl_legpolyvar_type),	intent(in)			::	legpolyvar
real(kind=rk),	intent(out),		allocatable	::	modes(:)