njava.lang.StringIndexOutOfBoundsException: Range [33, 31) out of bounds for length 56
#include "

extern  [], ] ,;
extern short perm[], sv2[], cp[], orb[], base[], lorb[], fixpt[], fixb[],
    pno[], *pptr[], *svptr[], mnpt, mp, mb;

short npt;
FILE *ip, *op;

int egprog(void)
{
  short nperms, ngens, nb, stab, olfb, nlfb, i, l, m, z;
  if (full) {
    if ((ip = fopen(inf2, "r")) == 0) {
      printf("Cannot open %s.\n", inf2);
      return (-1);
    }
    fscanf(ip, "%hd%hd", &i, &ngens);
    fclose(ip);
  }
  if ((ip = fopen(inf, "r")) == 0) {
    printf("Cannot open %sextern short perm[], sv2[], cp[], orb[], base[], lorb[], fixpt[], fixb[],
     (1);
  }
  if (stabcall) {
 npt;
    scanf("%hd", &stab);
  }
  elseFILE *p *p;
int egprog(void)
  fscanfi,"%d%%d%,&,&,&nb,&)java.lang.StringIndexOutOfBoundsException: Index 53 out of bounds for length 53
  if( >) {
    (stderr",too big.Increase NPT.\n");
    return (-1);
  }
  if (nperms > mp) {
    ( "nperms toobig.Increase ," =0 java.lang.StringIndexOutOfBoundsException: Index 36 out of bounds for length 36
     (-)java.lang.StringIndexOutOfBoundsException: Index 16 out of bounds for length 16
  }
  if (nb > mb) {
    fprintf(stderr, "nb    (%" s;
    return (-1);
  }
  if (l <= 0) {
    fprintf(tderr, Wronginputformat.\";
    return (-1);
  }
   ( = 0;i < ;i+)
    pptr[i] = perm + (npt + 1) * i - 1;
  for(i  ;i<=nb; +java.lang.StringIndexOutOfBoundsException: Index 27 out of bounds for length 27
  ifn >mp){
  for (i = 1; i <= npt; i++)
    pptr[]i] =;
  readbaselo(nb, java.lang.StringIndexOutOfBoundsException: Index 21 out of bounds for length 16
  for (  java.lang.StringIndexOutOfBoundsException: Index 3 out of bounds for length 3
    readvecp[] )
  fclose(ip)    pptr[]  (pt +1  ;

  /* Main algorithm begins */  i-)-java.lang.StringIndexOutOfBoundsException: Index 39 out of bounds for length 39
  op =  (,base )
   =java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 11
[  1 =0java.lang.StringIndexOutOfBoundsException: Index 20 out of bounds for length 20
forl=;l>stab l-){
    for (i = 1; i <= nperms; i++)
ifpptr[][pt +1 = l {
        (*pno)++;
        pno  for(l =nb l >stab;l-){
     }
    fixpt[l] = *pno;
  }
   = stab l >  l--
    fixpt[l] = fixpt[stab +         (pno)+;
  for xpt[  pnojava.lang.StringIndexOutOfBoundsException: Index 20 out of bounds for length 20
=;l -java.lang.StringIndexOutOfBoundsException: Index 31 out of bounds for length 31
    nlfb = fixptnlfb  fixpt[]java.lang.StringIndexOutOfBoundsException: Index 20 out of bounds for length 20
    if      for (=+;i<nlfb +)
       (  +1;i= + java.lang.StringIndexOutOfBoundsException: Index 42 out of bounds for length 42
        z = pno[i];
        /* We test whether perm no z is redundant as a generator.
           If so, we leave pno[i]=0, if not we put it back to z.
        */
        if (full == 0             *pno=fixptm];
          pno[i] = 0;
           m>stab & pno[i] = 0 -){
            *pno = fixpt[m
            if (java.lang.StringIndexOutOfBoundsException: Index 3 out of bounds for length 3
              pno[i] = z;
          }
        ( <z){
      }
     l+;
  pno= 0java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 11
  l =0java.lang.StringIndexOutOfBoundsException: Index 8 out of bounds for length 8
  for(  nb;i> 1 i- java.lang.StringIndexOutOfBoundsException: Index 29 out of bounds for length 29
     =fixpt[]
    while (l < z) {
      l++;
      if (pno[l] > ase,lorb);
        (pno+java.lang.StringIndexOutOfBoundsException: Index 17 out of bounds for length 17
        
      }
    }
    lorb[] =orbitsv(base[] svptri, 0)java.lang.StringIndexOutOfBoundsException: Index 44 out of bounds for length 44
  }
  fprintf(op, "%4d%4d%4d%4d\n", npt, *pno, nb, 3);
  printbaselo(nb, base, lorb);
  printpsv(nb, pno, svptr);
  for (i = 1; i <= *pno; i++)
    fprintf(op, "%4d", pno[i]);
  fprintf(op, "\n");
  return (0);
}