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

/*****************************************************
 * grph2/ulpack/ulxlog.f
 ****************************************************/
/* 
 *      SUBROUTINE ULXLOG ( CSIDE, NLBL, NTICKS )
 *      CHARACTER CH(MAXL)*16,CHR*8,CFMT*16,CSGI,CSIDE
 */
      SUBROUTINE ULXLOG(
          CHARACTER*(*) CSIDE
          INTEGER NLBL
          INTEGER NTICKS
      )

/*****************************************************
 * grph2/ulpack/ulylog.f
 ****************************************************/
/* 
 *      SUBROUTINE ULYLOG ( CSIDE, NLBL, NTICKS )
 *      CHARACTER CH(MAXL)*16,CHR*8,CFMT*16,CSGI,CSIDE
 */
      SUBROUTINE ULYLOG(
          CHARACTER*(*) CSIDE
          INTEGER NLBL
          INTEGER NTICKS
      )

/*****************************************************
 * grph2/ulpack/ulxlbl.f
 ****************************************************/
/* 
 *      SUBROUTINE ULXLBL ( BL, NBL, INUM )
 *      DIMENSION XBL(10,4),NXBL(4),BL(*)
 */
      SUBROUTINE ULXLBL(
          REAL (NBL) o BL
          INTEGER o NBL
          INTEGER INUM
      )

/* 
 *      ENTRY ULSXBL ( BL, NBL )
 *      DIMENSION XBL(10,4),NXBL(4),BL(*)
 */
      SUBROUTINE ULSXBL(
          REAL (NBL) BL
          INTEGER NBL
      )

/* 
 *      ENTRY ULQXBL ( BL, NBL )
 *      DIMENSION XBL(10,4),NXBL(4),BL(*)
 */
      SUBROUTINE ULQXBL(
          REAL (NBL) o BL
          INTEGER o NBL
      )

/*****************************************************
 * grph2/ulpack/ulylbl.f
 ****************************************************/
/* 
 *      SUBROUTINE ULYLBL ( BL, NBL, INUM )
 *      DIMENSION YBL(10,4),NYBL(4),BL(*)
 */
      SUBROUTINE ULYLBL(
          REAL (NBL) o BL
          INTEGER o NBL
          INTEGER INUM
      )

/* 
 *      ENTRY ULSYBL ( BL, NBL )
 *      DIMENSION YBL(10,4),NYBL(4),BL(*)
 */
      SUBROUTINE ULSYBL(
          REAL (NBL) BL
          INTEGER NBL
      )

/* 
 *      ENTRY ULQYBL ( BL, NBL )
 *      DIMENSION YBL(10,4),NYBL(4),BL(*)
 */
      SUBROUTINE ULQYBL(
          REAL (NBL) o BL
          INTEGER o NBL
      )

/*****************************************************
 * grph2/ulpack/ulpget.f
 ****************************************************/
/* 
 *      SUBROUTINE ULPGET(CP,IPARA)
 *      CHARACTER CP*(*)
 */
/*      SUBROUTINE ULPGET(
 *          CHARACTER*(*) CP
 *          INTEGER o IPARA
 *      )
 */

/* 
 *      ENTRY ULPSET(CP, IPARA)
 *      CHARACTER CP*(*)
 */
/*      SUBROUTINE ULPSET(
 *          CHARACTER*(*) CP
 *          INTEGER IPARA
 *      )
 */

/* 
 *      ENTRY ULPSTX(CP, IPARA)
 *      CHARACTER CP*(*)
 */
/*      SUBROUTINE ULPSTX(
 *          CHARACTER*(*) CP
 *          INTEGER IPARA
 *      )
 */

/*****************************************************
 * grph2/ulpack/ulpqnp.f
 ****************************************************/
/* 
 *      SUBROUTINE ULPQNP(NCP)
 */
      SUBROUTINE ULPQNP(
          INTEGER o NCP
      )

/* 
 *      ENTRY ULPQID(CP, IDX)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULPQID(
          CHARACTER*(*) CP
          INTEGER o IDX
      )

/* 
 *      ENTRY ULPQCP(IDX, CP)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULPQCP(
          INTEGER IDX
          CHARACTER*(*) o CP
      )

/* 
 *      ENTRY ULPQCL(IDX, CP)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULPQCL(
          INTEGER IDX
          CHARACTER*(*) o CP
      )

/* 
 *      ENTRY ULPQIT(IDX, ITP)
 */
      SUBROUTINE ULPQIT(
          INTEGER IDX
          INTEGER o ITP
      )

/* 
 *      ENTRY ULPQVL(IDX, IPARA)
 */
      SUBROUTINE ULPQVL(
          INTEGER IDX
          INTEGER o IPARA
      )

/* 
 *      ENTRY ULPSVL(IDX, IPARA)
 */
      SUBROUTINE ULPSVL(
          INTEGER IDX
          INTEGER IPARA
      )

/* 
 *      ENTRY ULPQIN(CP, IN)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULPQIN(
          CHARACTER*(*) CP
          INTEGER o IN
      )

/*****************************************************
 * grph2/ulpack/uliget.f
 ****************************************************/
/* 
 *      SUBROUTINE ULIGET(CP, IPARA)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULIGET(
          CHARACTER*(*) CP
          INTEGER o IPARA
      )

/* 
 *      ENTRY ULISET(CP, IPARA)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULISET(
          CHARACTER*(*) CP
          INTEGER IPARA
      )

/* 
 *      ENTRY ULISTX(CP, IPARA)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULISTX(
          CHARACTER*(*) CP
          INTEGER IPARA
      )

/*****************************************************
 * grph2/ulpack/uliqnp.f
 ****************************************************/
/* 
 *      SUBROUTINE ULIQNP(NCP)
 */
      SUBROUTINE ULIQNP(
          INTEGER o NCP
      )

/* 
 *      ENTRY ULIQID(CP, IDX)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULIQID(
          CHARACTER*(*) CP
          INTEGER o IDX
      )

/* 
 *      ENTRY ULIQCP(IDX, CP)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULIQCP(
          INTEGER IDX
          CHARACTER*(*) o CP
      )

/* 
 *      ENTRY ULIQCL(IDX, CP)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULIQCL(
          INTEGER IDX
          CHARACTER*(*) o CP
      )

/* 
 *      ENTRY ULIQVL(IDX, IPARA)
 */
      SUBROUTINE ULIQVL(
          INTEGER IDX
          INTEGER o IPARA
      )

/* 
 *      ENTRY ULISVL(IDX, IPARA)
 */
      SUBROUTINE ULISVL(
          INTEGER IDX
          INTEGER IPARA
      )

/* 
 *      ENTRY ULIQIN(CP, IN)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULIQIN(
          CHARACTER*(*) CP
          INTEGER o IN
      )

/*****************************************************
 * grph2/ulpack/ullget.f
 ****************************************************/
/* 
 *      SUBROUTINE ULLGET(CP, LPARA)
 *      CHARACTER CP*(*)
 *      LOGICAL   LPARA
 */
      SUBROUTINE ULLGET(
          CHARACTER*(*) CP
          LOGICAL o LPARA
      )

/* 
 *      ENTRY ULLSET(CP, LPARA)
 *      CHARACTER CP*(*)
 *      LOGICAL   LPARA
 */
      SUBROUTINE ULLSET(
          CHARACTER*(*) CP
          LOGICAL LPARA
      )

/* 
 *      ENTRY ULLSTX(CP, LPARA)
 *      CHARACTER CP*(*)
 *      LOGICAL   LPARA
 */
      SUBROUTINE ULLSTX(
          CHARACTER*(*) CP
          LOGICAL LPARA
      )

/*****************************************************
 * grph2/ulpack/ullqnp.f
 ****************************************************/
/* 
 *      SUBROUTINE ULLQNP(NCP)
 */
      SUBROUTINE ULLQNP(
          INTEGER o NCP
      )

/* 
 *      ENTRY ULLQID(CP, IDX)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULLQID(
          CHARACTER*(*) CP
          INTEGER o IDX
      )

/* 
 *      ENTRY ULLQCP(IDX, CP)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULLQCP(
          INTEGER IDX
          CHARACTER*(*) o CP
      )

/* 
 *      ENTRY ULLQCL(IDX, CP)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULLQCL(
          INTEGER IDX
          CHARACTER*(*) o CP
      )

/* 
 *      ENTRY ULLQVL(IDX, LPARA)
 *      LOGICAL   LPARA
 */
      SUBROUTINE ULLQVL(
          INTEGER IDX
          LOGICAL o LPARA
      )

/* 
 *      ENTRY ULLSVL(IDX, LPARA)
 *      LOGICAL   LPARA
 */
      SUBROUTINE ULLSVL(
          INTEGER IDX
          LOGICAL LPARA
      )

/* 
 *      ENTRY ULLQIN(CP, IN)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULLQIN(
          CHARACTER*(*) CP
          INTEGER o IN
      )

/*****************************************************
 * grph2/ulpack/ulrget.f
 ****************************************************/
/* 
 *      SUBROUTINE ULRGET(CP, RPARA)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULRGET(
          CHARACTER*(*) CP
          REAL o RPARA
      )

/* 
 *      ENTRY ULRSET(CP, RPARA)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULRSET(
          CHARACTER*(*) CP
          REAL RPARA
      )

/* 
 *      ENTRY ULRSTX(CP, RPARA)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULRSTX(
          CHARACTER*(*) CP
          REAL RPARA
      )

/*****************************************************
 * grph2/ulpack/ulrqnp.f
 ****************************************************/
/* 
 *      SUBROUTINE ULRQNP(NCP)
 */
      SUBROUTINE ULRQNP(
          INTEGER o NCP
      )

/* 
 *      ENTRY ULRQID(CP, IDX)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULRQID(
          CHARACTER*(*) CP
          INTEGER o IDX
      )

/* 
 *      ENTRY ULRQCP(IDX, CP)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULRQCP(
          INTEGER IDX
          CHARACTER*(*) o CP
      )

/* 
 *      ENTRY ULRQCL(IDX, CP)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULRQCL(
          INTEGER IDX
          CHARACTER*(*) o CP
      )

/* 
 *      ENTRY ULRQVL(IDX, RPARA)
 */
      SUBROUTINE ULRQVL(
          INTEGER IDX
          REAL o RPARA
      )

/* 
 *      ENTRY ULRSVL(IDX, RPARA)
 */
      SUBROUTINE ULRSVL(
          INTEGER IDX
          REAL RPARA
      )

/* 
 *      ENTRY ULRQIN(CP, IN)
 *      CHARACTER CP*(*)
 */
      SUBROUTINE ULRQIN(
          CHARACTER*(*) CP
          INTEGER o IN
      )

/*****************************************************
 * grph2/ulpack/ulxsfm.f
 ****************************************************/
/* 
 *      SUBROUTINE ULXSFM ( CXFMT )
 *      CHARACTER CXFMT*(*)
 */
      SUBROUTINE ULXSFM(
          CHARACTER*(*) CXFMT
      )

/* 
 *      ENTRY ULXQFM ( CXFMT )
 *      CHARACTER CXFMT*(*)
 */
      SUBROUTINE ULXQFM(
          CHARACTER*(*) o CXFMT
      )

/*****************************************************
 * grph2/ulpack/ulysfm.f
 ****************************************************/
/* 
 *      SUBROUTINE ULYSFM ( CYFMT )
 *      CHARACTER CYFMT*(*)
 */
      SUBROUTINE ULYSFM(
          CHARACTER*(*) CYFMT
      )

/* 
 *      ENTRY ULYQFM ( CYFMT )
 *      CHARACTER CYFMT*(*)
 */
      SUBROUTINE ULYQFM(
          CHARACTER*(*) o CYFMT
      )