Public Function GetGeneralParameters( _
   ByVal I As Long _
) As Double