Lines Matching refs:stn2
517 struct gastn *gastop (struct gastn *stn1, struct gastn *stn2, in gastop() argument
525 if (stn1->idim==0 && stn1->jdim==1 && stn2->idim==0 && in gastop()
526 stn2->jdim==1) dimtyp = 1; in gastop()
527 else if (stn1->idim==2 && stn1->jdim==-1 && stn2->idim==2 && in gastop()
528 stn2->jdim==-1) dimtyp = 2; in gastop()
529 else if (stn1->idim==3 && stn1->jdim==-1 && stn2->idim==3 && in gastop()
530 stn2->jdim==-1) dimtyp = 3; in gastop()
540 if (stn1->rnum > stn2->rnum) { in gastop()
542 stn1=stn2; in gastop()
543 stn2=stn; in gastop()
555 rpt2 = stn2->rpt; in gastop()
556 for (j=0; j<stn2->rnum; j++,rpt2=rpt2->rpt) { in gastop()
557 if (rpt2->val == stn2->undef) continue; in gastop()
603 if (stn2->blks[i] != NULL) free (stn2->blks[i]); in gastop()
605 free (stn2); in gastop()