dustem_param_range2param_values.pro 668 Bytes
FUNCTION dustem_param_range2param_values,iv_min,iv_max,iv_Nvalues,Nc=Nc,log=log

Nparams=n_elements(iv_min)

;==compute number of combinations
Nc=1L
FOR i=0L,Nparams-1 DO Nc=Nc*iv_Nvalues[i]

;compute parameters possible values
par_values=ptrarr(Nparams)
FOR i=0L,Nparams-1 DO BEGIN
	vv=range_gen(iv_Nvalues[i],[iv_min[i],iv_max[i]],log=log)
	par_values[i]=ptr_new(vv)
ENDFOR
;=== compute combinations
ivs=ptrarr(Nc)

vec=fltarr(Nparams)      ;individual vector of parameter values
FOR i=0L,Nc-1 DO BEGIN
	ij=index2ij([i],iv_Nvalues)
	FOR j=0L,Nparams-1 DO BEGIN
		vec[j]=(*par_values[j])[ij[0,j]]
	ENDFOR
	ivs[i]=ptr_new(vec)
	;print,vec
	;stop
ENDFOR

RETURN,ivs
END