*
*=== Fntexp ===========================================================*
*
*
*----------------------------------------------------------------------*
*                                                                      *
*     Copyright (C) 2003-2019:  CERN & INFN                            *
*     All Rights Reserved.                                             *
*                                                                      *
*     Auxiliary common for the Finter interpolation routine            *
*                                                                      *
*----------------------------------------------------------------------*
*                                                                      *
      LOGICAL LEXNP, LXNPM1
      COMMON / EXPEXP / LEXNP, LXNPM1
      SAVE / EXPEXP /