/*
 * grph2_uxpack.fp
 *
 * $Id: grph2_uxpack.fp,v 1.1 2000/11/19 16:00:16 keiko Exp $
 */

/*****************************************************
 * grph2/uxpack/uxptmz.f
 ****************************************************/
/* 
 *      SUBROUTINE UXPTMZ(UX,N,UPY,ROFFX,RTICK,INDEX)
 *      REAL      UX(*)
 */
/*
      SUBROUTINE UXPTMZ(
          REAL (N) UX
          INTEGER N
          REAL UPY
          REAL ROFFX
          REAL RTICK
          INTEGER INDEX
      )
 */

/*****************************************************
 * grph2/uxpack/uxplba.f
 ****************************************************/
/* 
 *      SUBROUTINE UXPLBA(UX,CH,NC,N,UPY,ROFFX,RSIZE,IROTA,ICENT,INDEX)
 *      REAL      UX(*)
 *      CHARACTER CH(*)*(*)
 */
/*
      SUBROUTINE UXPLBA(
          REAL (N) UX
          CHARACTER*(*) (N) CH
          INTEGER NC
          INTEGER N
          REAL UPY
          REAL ROFFX
          REAL RSIZE
          INTEGER IROTA
          INTEGER ICENT
          INTEGER INDEX
      )
 */

/*****************************************************
 * grph2/uxpack/uxplbb.f
 ****************************************************/
/* 
 *      SUBROUTINE UXPLBB(UX,CH,NC,N,UPY,ROFFX,RSIZE,IROTA,ICENT,INDEX,
 *     +                  RBTWN,LBOUND,LBMSG)
 *      REAL      UX(*)
 *      CHARACTER CH(*)*(*)
 *      LOGICAL   LBOUND,LBMSG
 */
/*
      SUBROUTINE UXPLBB(
          REAL (N) UX
          CHARACTER*(*) (N) CH
          INTEGER NC
          INTEGER N
          REAL UPY
          REAL ROFFX
          REAL RSIZE
          INTEGER IROTA
          INTEGER ICENT
          INTEGER INDEX
          REAL RBTWN
          LOGICAL LBOUND
          LOGICAL LBMSG
      )
 */

/*****************************************************
 * grph2/uxpack/uxsaxz.f
 ****************************************************/
/* 
 *      SUBROUTINE UXSAXZ(CSIDE,ROFFX)
 *      CHARACTER CSIDE*1
 */
      SUBROUTINE UXSAXZ(
          CHARACTER*1 CSIDE
          REAL ROFFX
      )

/*****************************************************
 * grph2/uxpack/uxsaxs.f
 ****************************************************/
/* 
 *      SUBROUTINE UXSAXS(CSIDE)
 *      CHARACTER CSIDE*1
 */
      SUBROUTINE UXSAXS(
          CHARACTER*1 CSIDE
      )

/*****************************************************
 * grph2/uxpack/uxsoff.f
 ****************************************************/
/* 
 *      SUBROUTINE UXSOFF
 */
/*
      SUBROUTINE UXSOFF(
      )
 */

/* 
 *      ENTRY UXROFF
 */
/*
      SUBROUTINE UXROFF(
      )
 */

/*****************************************************
 * grph2/uxpack/uxpaxs.f
 ****************************************************/
/* 
 *      SUBROUTINE UXPAXS(CSIDE,ISLCT)
 *      CHARACTER CSIDE*1
 */
      SUBROUTINE UXPAXS(
          CHARACTER*1 CSIDE
          INTEGER ISLCT
      )

/*****************************************************
 * grph2/uxpack/uxptmk.f
 ****************************************************/
/* 
 *      SUBROUTINE UXPTMK(CSIDE,ISLCT,UX,N)
 *      CHARACTER CSIDE*1
 *      REAL      UX(*)
 */
      SUBROUTINE UXPTMK(
          CHARACTER*1 CSIDE
          INTEGER ISLCT
          REAL (N) UX
          INTEGER N
      )

/*****************************************************
 * grph2/uxpack/uxplbl.f
 ****************************************************/
/* 
 *      SUBROUTINE UXPLBL(CSIDE,ISLCT,UX,CH,NC,N)
 *      CHARACTER CSIDE*1,CH(*)*(*)
 *      REAL      UX(*)
 */
      SUBROUTINE UXPLBL(
          CHARACTER*1 CSIDE
          INTEGER ISLCT
          REAL (N) UX
          CHARACTER*(*) (N) CH
          INTEGER NC
          INTEGER N
      )

/*****************************************************
 * grph2/uxpack/uxpnum.f
 ****************************************************/
/* 
 *      SUBROUTINE UXPNUM(CSIDE,ISLCT,UX,N)
 *      CHARACTER CSIDE*1
 *      REAL      UX(*)
 */
      SUBROUTINE UXPNUM(
          CHARACTER*1 CSIDE
          INTEGER ISLCT
          REAL (N) UX
          INTEGER N
      )

/*****************************************************
 * grph2/uxpack/uxpttl.f
 ****************************************************/
/* 
 *      SUBROUTINE UXPTTL(CSIDE,ISLCT,CTTL,PX)
 *      CHARACTER CSIDE*1,CTTL*(*)
 */
      SUBROUTINE UXPTTL(
          CHARACTER*1 CSIDE
          INTEGER ISLCT
          CHARACTER*(*) CTTL
          REAL PX
      )

/*****************************************************
 * grph2/uxpack/uxaxlb.f
 ****************************************************/
/* 
 *      SUBROUTINE UXAXLB(CSIDE,UX1,N1,UX2,CH,NC,N2)
 *      CHARACTER CSIDE*1,CH(*)*(*)
 *      REAL      UX1(*),UX2(*)
 */
      SUBROUTINE UXAXLB(
          CHARACTER*1 CSIDE
          REAL (N1) UX1
          INTEGER N1
          REAL (N2) UX2
          CHARACTER*(*) (N2) CH
          INTEGER NC
          INTEGER N2
      )

/*****************************************************
 * grph2/uxpack/uxaxnm.f
 ****************************************************/
/* 
 *      SUBROUTINE UXAXNM(CSIDE,UX1,N1,UX2,N2)
 *      CHARACTER CSIDE*1
 *      REAL      UX1(*),UX2(*)
 */
      SUBROUTINE UXAXNM(
          CHARACTER*1 CSIDE
          REAL (N1) UX1
          INTEGER N1
          REAL (N2) UX2
          INTEGER N2
      )

/*****************************************************
 * grph2/uxpack/uxaxdv.f
 ****************************************************/
/* 
 *      SUBROUTINE UXAXDV(CSIDE,DX1,DX2)
 *      CHARACTER CSIDE*1
 */
      SUBROUTINE UXAXDV(
          CHARACTER*1 CSIDE
          REAL DX1
          REAL DX2
      )

/*****************************************************
 * grph2/uxpack/uxmttl.f
 ****************************************************/
/* 
 *      SUBROUTINE UXMTTL(CSIDE,CTTL,PX)
 *      CHARACTER CSIDE*1,CTTL*(*)
 */
      SUBROUTINE UXMTTL(
          CHARACTER*1 CSIDE
          CHARACTER*(*) CTTL
          REAL PX
      )

/*****************************************************
 * grph2/uxpack/uxsttl.f
 ****************************************************/
/* 
 *      SUBROUTINE UXSTTL(CSIDE,CTTL,PX)
 *      CHARACTER CSIDE*1,CTTL*(*)
 */
      SUBROUTINE UXSTTL(
          CHARACTER*1 CSIDE
          CHARACTER*(*) CTTL
          REAL PX
      )

/*****************************************************
 * grph2/uxpack/luxchk.f
 ****************************************************/
/* 
 *      LOGICAL FUNCTION LUXCHK(CSIDE)
 *      CHARACTER CSIDE*(*)
 */
/*
      LOGICAL FUNCTION LUXCHK(
          CHARACTER*(*) CSIDE
      )
 */

/*****************************************************
 * grph2/uxpack/uxsfmt.f
 ****************************************************/
/* 
 *      SUBROUTINE UXSFMT(CFMT)
 *      CHARACTER CFMT*(*)
 */
      SUBROUTINE UXSFMT(
          CHARACTER*(*) CFMT
      )

/* 
 *      ENTRY UXQFMT(CFMT)
 *      CHARACTER CFMT*(*)
 */
      SUBROUTINE UXQFMT(
          CHARACTER*(*) o CFMT
      )