Previous: contma Up: ../plot79_c.html Next: contp2

CONTP1

       SUBROUTINE  CONTP1 (IT0, IPT, PDD)
 C$    (ALG626 - Internal Polynomial Coefficients)
 C$    Compute coefficients for  polynomials along sides,  leaving
 C$    them in private COMMON.  The arguments are:
 C$
 C$    IT0............Number of triangle in use.
 C$    IPT(*).........Point numbers stored as 3*K-2, 3*K-1, 3*K-th
 C$                   element for triangle K.
 C$    PDD(*).........Partial derivatives at data points
 C$                   (ZX,ZY,ZXX,ZXY,ZYY).
 C$    (20-AUG-85)