Home
last modified time | relevance | path

Searched defs:PGCONB (Results 1 – 1 of 1) sorted by relevance

/dports/graphics/pgplot/pgplot/src/
H A Dpgconb.f6 SUBROUTINE PGCONB (A, IDIM, JDIM, I1, I2, J1, J2, C, NC, TR, subroutine
8 INTEGER IDIM, JDIM, I1, I2, J1, J2, NC
9 REAL A(IDIM,JDIM), C(*), TR(6), BLANK
54 IF (PGNOTO('PGCONB')) RETURN argument
79 60 XX = I+IDELT(ICORN+1)
84 70 XX = REAL(I+IDELT(ICORN+1)) +
88 80 X(NPT) = TR(1) + TR(2)*XX + TR(3)*YY
91 120 CONTINUE
121 140 CONTINUE
137 110 CONTINUE
[all …]