--- Garfield/garfield-7.car.orig 2008-05-21 10:04:11.000000000 +0900 +++ Garfield/garfield-7.car 2008-07-16 12:56:06.000000000 +0900 @@ -232,7 +232,7 @@ +KEEP,DIMWIRE,IF=-MANYWIRE. PARAMETER (MXWIRE= 300,MXSW = 50) +KEEP,DIMLIST,IF=LONGLIST. - PARAMETER (MXLIST= 1000) + PARAMETER (MXLIST= 4000) +KEEP,DIMLIST,IF=-LONGLIST. PARAMETER (MXLIST= 200) +KEEP,DIMMAP,IF=HUGEMAP. @@ -269,7 +269,8 @@ PARAMETER (MXGRID= 50) PARAMETER (MXNAME= 200, MXLUN = 30) PARAMETER (MXCLUS= 500, MXPAIR= 2000, MXPART= 10000) - PARAMETER (MXLINE= 150, MXEQUT= 50) +c PARAMETER (MXLINE= 150, MXEQUT= 50) + PARAMETER (MXLINE= 600, MXEQUT= 200) PARAMETER (MXFOUR= 16) PARAMETER (MXRECL= 10000) PARAMETER (MXINCH= 2000, MXWORD= 200, MXCHAR=MXINCH) @@ -5570,6 +5571,11 @@ NCFILE=MIN(LEN(INFILE),NCHOME+25) CALL DSNINQ(INFILE,NCFILE,EXIST) ENDIF + IF(.NOT.EXIST)THEN + INFILE='/cern/pro/share/garfield/garfinit' + NCFILE=MIN(LEN(INFILE),33) + CALL DSNINQ(INFILE,NCFILE,EXIST) + ENDIF +SELF,IF=-CMS,IF=-VAX,IF=-UNIX,IF=-CYGWIN. INFILE=' ' NCFILE=1