NAME: Trunc

     USE: This function accepts a real type value and truncates it
          into a value of type LongInt.  If the truncated value is not
          of type LongInt, a runtime error will occur.

     DEPENDENCY:  None

     SYNTAX: Trunc(RealValue : Real);