1686 S350:  in cdfbet()
1692         goto S350;  in cdfbet()
2048         if(!qporq) goto S350;  in cdfbin()
2051 S350:  in cdfbin()
2410         if(!(*status == 1)) goto S350;  in cdfchi()
2424 S350:  in cdfchi()
2982         if(!(*status == -1)) goto S350;  in cdff()
2990 S350:  in cdff()
3342         if(!(*status == -1)) goto S350;  in cdffnc()
3353 S350:  in cdffnc()
3927         if(!(*status == 1)) goto S350;  in cdfnbn()
3937 S350:  in cdfnbn()
7908     if(*p <= 1.e10*xmin) goto S350;  in gaminv()
7913     if(fabs(d) <= e2) goto S350;  in gaminv()
7918     if(pn == 0.0e0 || qn == 0.0e0) goto S350;  in gaminv()
7920     if(r == 0.0e0) goto S350;  in gaminv()
7944     if(*q <= 1.e10*xmin) goto S350;  in gaminv()
7949     if(fabs(d) <= e2) goto S350;  in gaminv()
7954     if(pn == 0.0e0 || qn == 0.0e0) goto S350;  in gaminv()
7956     if(r == 0.0e0) goto S350;  in gaminv()
8008 S350:  in gaminv()
8742     else if(T5 == 0) goto S350;  in gratio()
8755 S350:  in gratio()