maxhom.param 3.79 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88
*----------------------------------------------------------------------*
*     
*----------------------------------------------------------------------*
C
      INTEGER         MAXPROC,MINPROC,MAXQUEUE,MAXQUEUE_LIST
      PARAMETER      (MAXPROC=                 200)
      PARAMETER      (MINPROC=                  20)
      PARAMETER      (MAXQUEUE=                  4)
      PARAMETER      (MAXQUEUE_LIST=             5)

C---- maximal length of sequence
      INTEGER         MAXSQ,MAXALSQ
C                                  G  M  K
C      PARAMETER      (MAXSQ=                 10000)
      PARAMETER      (MAXSQ=                   9999)
C      PARAMETER      (MAXSQ=                  19876)
      PARAMETER      (MAXALSQ= (MAXSQ + (MAXSQ/10) ) )

C---- score MATRIX
      INTEGER         MAXMAT
C    PARAMETER      (MAXMAT=              6000000)
      PARAMETER      (MAXMAT=                    1)

C---- trace-back matrix
      INTEGER         MAXTRACE,MAXALIGNS,MAXHITS,
     +                MAXDATABASE_BUFFER,MAXBUFFER_LINE,MAXINS,
     +                MAXSEQBUFFER,MAXSTRBUFFER,MAXINSBUFFER,
     +                MAXIOBUFFER,MAXINSBUFFER_LOCAL
C                                  G  M  K
C      PARAMETER      (MAXTRACE=            3888888)
      PARAMETER      (MAXTRACE=            6543210)
      PARAMETER      (MAXALIGNS=              8765)
C      PARAMETER      (MAXALIGNS=             12345)
C      PARAMETER      (MAXALIGNS=             21987)
      PARAMETER      (MAXHITS=                5000)

C                                  G  M  K
      PARAMETER      (MAXDATABASE_BUFFER=  3888888)
      PARAMETER      (MAXBUFFER_LINE=         1000)
      PARAMETER      (MAXINS=                50000)
      PARAMETER      (MAXSEQBUFFER=        3000000)
      PARAMETER      (MAXSTRBUFFER=        4000000)
      PARAMETER      (MAXIOBUFFER=         4000000)
      PARAMETER      (MAXINSBUFFER=        4321432)

C---- caution on some machine the maximal strin length is 32000
      PARAMETER      (MAXINSBUFFER_LOCAL=    50000)

C==================================================================
      INTEGER    MAXSTRSTATES,MAXIOSTATES,
     +           NTRANS,NSIZE,INDEXRECLEN,MAXRECORDLEN,NASCII,
     +           MAXCUTOFFSTEPS,MAXBREAK,MAXBOX,MAXHIST,MAXPROFAA,
     +           MAXLENSTRING
C                                  G  M  K
      PARAMETER      (MAXSTRSTATES=              4)
      PARAMETER      (MAXIOSTATES=               4)
      PARAMETER      (NTRANS=                   26)
      PARAMETER      (NSIZE=                    12)
      PARAMETER      (INDEXRECLEN=2*NSIZE+8+8)
      PARAMETER      (MAXRECORDLEN=            200)
      PARAMETER      (NASCII=                  256)
      PARAMETER      (MAXCUTOFFSTEPS=          100)
      PARAMETER      (MAXBREAK=                 50)
      PARAMETER      (MAXBOX=                   10)
      PARAMETER      (MAXHIST=                  10)
      PARAMETER      (MAXPROFAA=                20)
C 	br: 2000-05
      PARAMETER      (MAXLENSTRING=            200)
c     INPUT/OUTPUT UNITS
      INTEGER        KGETSEQ,KLIS1,KLIS2,KSIM,KISO,KREL,KBRK,
     +               KBASE,KINDEX,KDEF,KCORE,KREF,KSTP,
     +               KPLOT,KSTAT,KWARN,KSTRUC,KTAB,KCONS,
     +               KPROF,KLOG,KHSSP,KCOM,KHISTO,KLONG,KDEB 
      PARAMETER (KGETSEQ=10, KLIS1=11, KLIS2= 12, KSIM=  13, KISO= 14)
      PARAMETER (KREL=   15, KBRK= 16, KBASE= 17, KINDEX=18, KDEF= 19) 
      PARAMETER (KREF=   20, KSTP= 21, KPLOT= 22, KSTAT= 23, KWARN=24)
      PARAMETER (KSTRUC= 25, KTAB= 26, KCONS= 27, KPROF= 28, KLOG= 29)
      PARAMETER (KHSSP=  30, KCOM= 31, KHISTO=32, KDEB=  33, KLONG=34)
      PARAMETER (KCORE=  35)

C---- br 2003-08: switch for new (1999) HSSP curve
      LOGICAL         LNEWCURVE
      PARAMETER      (LNEWCURVE=            .TRUE.)
C      PARAMETER      (LNEWCURVE=           .FALSE.)