split_pgrid_index Function

public pure function split_pgrid_index(ind_in, dims) result(ind_out)

transform flat index to nd index

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	ind_in	flat index
integer,	intent(in),		DIMENSION(:)	::	dims	nd dimensions

Return Value integer, DIMENSION(SIZE(dims))

nd index