Lines Matching refs:YC
94 INTEGER XA,YA,ZA,XB,YB,ZB,XC,YC,ZC,XD,YD,ZD
154 DO 112 YC = YCMAX,0,-1
156 ZC = YCMAX - YC
166 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
173 + * INT2DY (M,YA,YB,YC,YD)
232 DO 212 YC = YCMAX,0,-1
234 ZC = YCMAX - YC
244 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
251 + * INT2DY (N,YA,YB,YC,YD)
317 DO 312 YC = YCMAX,0,-1
319 ZC = YCMAX - YC
329 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
336 + * INT2DY (N,YA,YB,YC,YD)
405 DO 412 YC = YCMAX,0,-1
407 ZC = YCMAX - YC
417 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
424 + * INT2DY (N,YA,YB,YC,YD)
496 DO 512 YC = YCMAX,0,-1
498 ZC = YCMAX - YC
508 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
515 + * INT2DY (N,YA,YB,YC,YD)
590 DO 612 YC = YCMAX,0,-1
592 ZC = YCMAX - YC
602 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
609 + * INT2DY (N,YA,YB,YC,YD)
687 DO 712 YC = YCMAX,0,-1
689 ZC = YCMAX - YC
699 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
706 + * INT2DY (N,YA,YB,YC,YD)
787 DO 812 YC = YCMAX,0,-1
789 ZC = YCMAX - YC
799 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
806 + * INT2DY (N,YA,YB,YC,YD)
890 DO 912 YC = YCMAX,0,-1
892 ZC = YCMAX - YC
902 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
909 + * INT2DY (N,YA,YB,YC,YD)
1008 DO 1012 YC = YCMAX,0,-1
1010 ZC = YCMAX - YC
1020 IF (.NOT.DIFFY .AND. YA+YB+YC+YD.EQ.0) THEN
1027 + * INT2DY (N,YA,YB,YC,YD)