PRO sta,arr ; ;MIDAS-like statistics (min,max,mean,stdev). ;Michal dim=size(arr) ma=max(arr,min=mi) sig=stdev(arr,me) if dim(0) eq 1 then print,'1-D ARRAY, DIMENSION:',dim(1) if dim(0) eq 2 then print,'2-D ARRAY, DIMENSIONS:',dim(1),dim(2) if dim(0) eq 3 then print,'3-D ARRAY, DIMENSIONS:',dim(1),dim(2),dim(3) print,'MIN, MAX = ',mi,', ',ma print,'MEAN, STDEV = ',me,', ',sig print,'NORMALIZED STDEV = ',sig/me END