Trailing-Edge
-
PDP-10 Archives
-
decus_20tap2_198111
-
decus/20-0026/pvsub.doc
There are 2 other files named pvsub.doc in the archive. Click here to see a list.
SUBROUTINE PVSUB
PURPOSE
SUBSTITUTE VARIABLE OF A POLYNOMIAL BY ANOTHER POLYNOMIAL
USAGE
CALL PVSUB(Z,IDIMZ,X,IDIMX,Y,IDIMY,WORK1,WORK2)
DESCRIPTION OF PARAMETERS
Z - VECTOR OF COEFFICIENTS FOR RESULTANT POLYNOMIAL,
ORDERED FROM SMALLEST TO LARGEST POWER
IDIMZ - DIMENSION OF Z
X - VECTOR OF COEFFICIENTS FOR ORIGINAL POLYNOMIAL,
ORDERED FROM SMALLEST TO LARGEST POWER
IDIMX - DIMENSION OF X
Y - VECTOR OF COEFFICIENTS FOR POLYNOMIAL WHICH IS
SUBSTITUTED FOR VARIABLE, ORDERED FROM SMALLEST TO
LARGEST POWER
IDIMY - DIMENSION OF Y
WORK1 - WORKING STORAGE ARRAY (SAME DIMENSION AS Z)
WORK2 - WORKING STORAGE ARRAY (SAME DIMENSION AS Z)
REMARKS
NONE
SUBROUTINES AND FUNCTION SUBPROGRAMS REQUIRED
PMPY
PADDM
PCLA
METHOD
VARIABLE OF POLYNOMIAL X IS SUBSTITUTED BY POLYNOMIAL Y
TO FORM POLYNOMIAL Z. DIMENSION OF NEW POLYNOMIAL IS
(IDIMX-1)*(IDIMY-1)+1. SUBROUTINE REQUIRES TWO WORK AREAS