Histogram object

Maximum As Long
Maximum_Clipped As Double

'like Get_Histogram, but normalized, with 5% tollerance for outliers.
Sub Get_Normalized(buf() As Single)

Sub Get_Histogram(buf() As Long)

Sub Eval_FromMain()

Sub Eval_FromImage(rbuf() As Byte, gbuf() As Byte, bbuf() As Byte, w, h)

Sub Eval_FromPicture(MyPic As VBpicture)

'create a normalized version of the histogram found in the Normalized member
Sub Normalize()

Function mean(ByVal index As Long) As Double

'a specific rgb channel
Function Standard_Deviation(ByVal index As Long) As Double

'all 3 channels
Function Standard_Deviation_3() As Double

Function Compare(h As VB_Histogram) As Single