class PPOLY


Flattened version is here



Public


Readonly Shareds
shared chs,chx:STR;
shared chs,chx:STR;
shared ci:INTI;
shared ds,dx:INT;
**** degree
shared ds,dx:INT;
**** degree
shared z,z1,x,x1:INT;
****
shared z,z1,x,x1:INT;
****
shared z,z1,x,x1:INT;
****
shared z,z1,x,x1:INT;
****

Writable Shareds
shared chs,chx:STR;
shared chs,chx:STR;
shared ci:INTI;
shared ds,dx:INT;
**** degree
shared ds,dx:INT;
**** degree
shared z,z1,x,x1:INT;
****
shared z,z1,x,x1:INT;
****
shared z,z1,x,x1:INT;
****
shared z,z1,x,x1:INT;
****

Constants
const Def_xyz,Def_lm,Def_vz;
const Def_xyz,Def_lm,Def_vz;
const Def_xyz,Def_lm,Def_vz;

Features
PPrintLog(DefS:INT,title:STR)
Ppoly(TCode:TCODE,DefS:INT)
**** rate: rateCl res/s: rateCl*4.4 1.201< 1.25 <1.5 1.25, 2.18 1.27, 2.0 : (worst time)=(expected time)
_____________Worst_case_is_(2,n)_torus_knot.
1.27, 6.0 : (real time) < 3*(expected time) 1.27202=sqrt((1+sqrt(5))/2)= sqrt of Fibonacci ratio.
PpolyLow(TCode:TCODE,DefS:INT)
**** 1.120< ? <1.124
PpolyP(TCode:TCODE,DefS:INT)
**** for speed test


Private

CnvP
CoeLMs
CoeLMx
CoeVZs
CoeVZx
CoeXYZs
CoeXYZx
SetPolyP
wrTitle(title,s:STR)

The Sather Home Page