Warning, /include/hplot/hpl13.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/01/19 10:50:14 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_HPLOT_HPL13_INC
0010 #define CERNLIB_HPLOT_HPL13_INC
0011 *
0012 *
0013 * hpl13.inc
0014 *
0015 *CMZ : 09/11/95 17.18.57 by O.Couet
0016 *-- Author :
0017 PARAMETER (NOPT=6)
0018 COMMON/HPL13/IOPT(NOPT),IHOPT(6),IDZB,IDZK,LIPTOL,LOSCAL
0019 +, IOPTF,IOPT0,IOPTH
0020 LOGICAL LOSCAL
0021 EQUIVALENCE (IOPTS ,IOPT(1)),(IOPTU ,IOPT(2))
0022 EQUIVALENCE (IOPTK ,IOPT(3)),(IOPTP ,IOPT(4))
0023 EQUIVALENCE (IOPTE ,IOPT(5)),(IOPTA ,IOPT(6))
0024 EQUIVALENCE (IHOPTL ,IHOPT(1)),(IHOPTC ,IHOPT(2))
0025 EQUIVALENCE (IHOPTT ,IHOPT(3)),(IHOPTP ,IHOPT(4))
0026 EQUIVALENCE (IHOPTB ,IHOPT(5)),(IHOPTH,IHOPT(6))
0027
0028 #endif
