PRO test_num, num, status, numtype

; Description: This module tests that the parameter "num" contains a scalar number. In other 
;              words, it checks that "num" contains a single number of any of the types BYTE, 
;              INTEGER, LONG, FLOAT, DOUBLE, UINT, ULONG, LONG64 or ULONG64. The module also
;              returns the IDL type code of the parameter "num".
;
; Input Parameters:
;
;   num - ANY - The parameter to be tested whether or not it satisfies the properties that a 
;               scalar number would have.
;
; Output Parameters:
;
;   status - INTEGER - The parameter "status" is set to "1" if the parameter "num" is a scalar
;                      number of any of the types BYTE, INTEGER, LONG, FLOAT, DOUBLE, UINT, 
;                      ULONG, LONG64 or ULONG64. Otherwise, the module sets "status" to a value 
;                      of "0".
;   numtype - INTEGER - The IDL type code of the parameter "num". Note that IDL type codes of 1, 
;                       2, 3, 4, 5, 12, 13, 14 and 15 correspond to variable types of BYTE, 
;                       INTEGER, LONG, FLOAT, DOUBLE, UINT, ULONG, LONG64 and ULONG64, 
;                       respectively.
;
; Author: Dan Bramich (dan.bramich@hotmail.co.uk)
;
; History:
;
;   16/01/2009 - Module created (dmb)

;Determine the IDL type code for "num"

;Check that "num" is scalar

;If "num" is scalar and contains a number of any of the types BYTE, INTEGER, LONG, FLOAT, DOUBLE,
;UINT, ULONG, LONG64 or ULONG64, then set the value of "status" to "1"