Warning, /include/minuit/d506cm.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/03/07 14:31:31 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_MINUIT_D506CM_INC
0010 #define CERNLIB_MINUIT_D506CM_INC
0011 *
0012 *
0013 * d506cm.inc
0014 *
0015 PARAMETER (MNE=100 , MNI=50)
0016 PARAMETER (MNIHL=MNI*(MNI+1)/2)
0017 CHARACTER*10 CPNAM
0018 COMMON
0019 1/MN7NAM/ CPNAM(MNE)
0020 2/MN7EXT/ U(MNE) ,ALIM(MNE) ,BLIM(MNE)
0021 3/MN7ERR/ ERP(MNI) ,ERN(MNI) ,WERR(MNI) ,GLOBCC(MNI)
0022 4/MN7INX/ NVARL(MNE) ,NIOFEX(MNE),NEXOFI(MNI)
0023 5/MN7INT/ X(MNI) ,XT(MNI) ,DIRIN(MNI)
0024 6/MN7FX2/ XS(MNI) ,XTS(MNI) ,DIRINS(MNI)
0025 7/MN7DER/ GRD(MNI) ,G2(MNI) ,GSTEP(MNI) ,GIN(MNE) ,DGRD(MNI)
0026 8/MN7FX3/ GRDS(MNI) ,G2S(MNI) ,GSTEPS(MNI)
0027 9/MN7FX1/ IPFIX(MNI) ,NPFIX
0028 A/MN7VAR/ VHMAT(MNIHL)
0029 B/MN7VAT/ VTHMAT(MNIHL)
0030 C/MN7SIM/ P(MNI,MNI+1),PSTAR(MNI),PSTST(MNI) ,PBAR(MNI),PRHO(MNI)
0031 C
0032 PARAMETER (MAXDBG=10, MAXSTK=10, MAXCWD=20, MAXP=30, MAXCPT=101)
0033 PARAMETER (ZERO=0.0, ONE=1.0, HALF=0.5)
0034 COMMON
0035 D/MN7NPR/ MAXINT ,NPAR ,MAXEXT ,NU
0036 E/MN7IOU/ ISYSRD ,ISYSWR ,ISYSSA ,NPAGWD ,NPAGLN ,NEWPAG
0037 E/MN7IO2/ ISTKRD(MAXSTK) ,NSTKRD ,ISTKWR(MAXSTK) ,NSTKWR
0038 F/MN7TIT/ CFROM ,CSTATU ,CTITL ,CWORD ,CUNDEF ,CVRSN ,COVMES
0039 G/MN7FLG/ ISW(7) ,IDBG(0:MAXDBG) ,NBLOCK ,ICOMND
0040 H/MN7MIN/ AMIN ,UP ,EDM ,FVAL3 ,EPSI ,APSI ,DCOVAR
0041 I/MN7CNV/ NFCN ,NFCNMX ,NFCNLC ,NFCNFR ,ITAUR,ISTRAT,NWRMES(2)
0042 J/MN7ARG/ WORD7(MAXP)
0043 K/MN7LOG/ LWARN ,LREPOR ,LIMSET ,LNOLIM ,LNEWMN ,LPHEAD
0044 L/MN7CNS/ EPSMAC ,EPSMA2 ,VLIMLO ,VLIMHI ,UNDEFI ,BIGEDM,UPDFLT
0045 M/MN7RPT/ XPT(MAXCPT) ,YPT(MAXCPT)
0046 N/MN7CPT/ CHPT(MAXCPT)
0047 o/MN7XCR/ XMIDCR ,YMIDCR ,XDIRCR ,YDIRCR ,KE1CR ,KE2CR
0048 CHARACTER CTITL*50, CWORD*(MAXCWD), CUNDEF*10, CFROM*8,
0049 + CVRSN*6, COVMES(0:3)*22, CSTATU*10, CHPT*1
0050 LOGICAL LWARN, LREPOR, LIMSET, LNOLIM, LNEWMN, LPHEAD
0051
0052 #endif
