function check_math_msg,status
;+
;*NAME:
;	check_math_msg
;*PURPOSE:
;    Return IDL math error status message
;*Calling Sequence:
;	msg= check_math_msg( status )
;*PARAMETERS:
;  INPUT
;	status - value returned from IDL function CHECK_MATH
;*HISTORY
;	19-AUG-1991 	JKF/ACC		- for IDL V2
;
;-

case status of
	1: msg= 'Integer divide by zero.'
	2: msg= 'Integer overflow.'
       16: msg= 'Floating point divide by zero.'
       32: msg= 'Floating point underflow.'
       64: msg= 'Floating point overflow.'
      128: msg= 'Floating point operand error.'
     else:
endcase
return,msg
end