!copyright (C) 2001  MSC-RPN COMM  %%%RPNPHY%%%
      REAL EXPLIM,TANLIM
      COMMON /MACHCON/ EXPLIM , TANLIM
#if defined(DOC)
*COMMON BLOCK /MACHCON/
*
* EXPLIM   limit for the exponential; set to 75 in CLEMULT.
* TANLIM   limit for the tangent; set to EXP(12.*ALOG(2.)) in
*          CLEMULT.
*
#endif