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:CARD,title:STR)
PPrintLog(poly:POLYM_INTI,DefS:CARD,title:STR)
PPrintLogHead(DefS:CARD,title:STR)
PTbl2Polym(DefS:CARD):POLYM_INTI
****
P_str(poly:POLYM_INTI, DefS:CARD):STR
P_str(poly:POLYM_INTI, DefS:CARD, format:STR):STR
Ppoly(tcode:TCODE,DefS:CARD)
Ppoly(tcode:TCODE,DefS:CARD,isTest:BOOL):POLYM_INTI
PpolyLow(TCode:TCODE,DefS:CARD)
**** 1.120< ? <1.124
PpolyP(TCode:TCODE,DefS:CARD):POLYM_INTI
**** 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.
PpolyTest(tcode:TCODE,DefS:CARD)
Ppoly_time(TCode:TCODE,DefS:CARD)
**** for speed test
test_time(TCode:TCODE):FLT


Private

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

The Sather Home Page