VMS Help PASCAL, Predeclared Routines, Misc, EXPO  *Conan The Librarian (sorry for the slow response - running on an old VAX)

  The  EXPO  function  returns  the  integer   exponent   of   the
  floating-point representation of its parameter.

  Syntax:

     EXPO( x )

  The parameter 'x' can be of any real type.