FN_ROL()
 Rotate bits in an integer to the left
------------------------------------------------------------------------------
 Syntax
 
    fn_rol( <nInt1> | <cInt1>, <nBits> ) -> nResult
 
 Arguments

  <nInt1> may either be a numeric integer, or a 16-bit character string
  that is the binary representation of a numeric integer.

  <nBits> is the number of bits to rotate and must be a numeric.

 Returns

  <nResult>, a numeric

 Description

  The value returned is obtained by rotating the bits in <nInt1>
  to the left.  <nBits> determines the number of bits to rotate.
  If any parameters are invalid, the function will return zero.

 Examples

  nX := -32768
  nNum := fn_rol( nX, 2 )
  ? nNum      // 2


 Source: N:\SRC\MISC\FNROL.ASM

 Author: Ted Means