!--- Opening output file: PCoes.txt 2021.04.05.0459.20.390 This is: "PolyGen.exe", By: Jeff Setterholm Version 1. 2021.03.31 Lakeville, MN 55044 USA Output: a large binary file of very accurate matrix coefficients. : Up to 8th order the nearest integers are scaled exact values & can be written to a .csv file by `Polyize.exe`. : 2000+ coefficient polynomials up to 20th order can be computed. "IntroToPolyGen.txt" - has some background information. "PolyGen.ini" - has your program control inputs. ... opening it now... !--- Run configuration: Values # 2,:1 nVT -independent variables ,:2`order` =power of each variable- evens only 8, 8, 1,:3 iPolyClass - 1:exact, 2:unscaled ,:4 TEC - Time Estimate Coefficient = 218422.0 !--- Assigned internally: 2,:5 iOutFiles Output- 1:.csv, 2:.bin, 3:both ,:6 cFileOut - `PolyGen`+hex+`.bin` ,:6 cFileOut - `PolyGen`+hex+`.bin` = PCoesE288.bin order indices ^ are augmented hexadecimals:{ 0,15}->{0:f} -&- 16->g 17->h 18->i 19->j 20 -> k !--- Overview: 8, :Highest `order` 2, :# of variables 8, :Order of X( 1) 8, :Order of X( 2) 81, :# of Poly Coeff`s 6561, :# of matrix Coeff`s 0.030, estimated runtime (minutes) !--- Data entry - done 2021.04.05.0459.20.406 !--- task`s time: . . . 16 All arrays needed have been successfully allocated Subroutine PowersMatrixGen(): !--- MatrixExportPrep(): 0.429496729600000000000000000000E+10, Division factor 4294967295.999999999999999999999820000000, 0.100000000000000000000000000000E+01, matrix MaxAbs 1.000000000000000000000000000000, 0.232830643653869628906250000000E-09, matrix MinAbs 0.000000000232830643653869628906, 4294967296.000, :Matrix - biggest integer- decimal 4294967296.000, :storage space needed- i*1,i*2,i*4,i*8 21098765432109876543210987654321, :digits index 3 2 1 12, : digits recommended w/`.` !--- Powers matrix - done 2021.04.05.0459.20.421 !--- task`s time: . . . 15 Coe[,] = inverse(Pow[,]), inversion progress bar... 0.342418201333026697598066233407-107, :Determinant 0.000000000000000000000000000000, !--- 2021.04.05.0459.20.531 Evaluating the inversion accuracy... 0.587E-26, :AbsMax r*16 inversion error in [Coe*Pow-I] !--- Powers matrix - inverted 2021.04.05.0459.20.609 !--- task`s time: . . .188 !--- MatrixExportPrep(): 0.396900000000000000000000000000E+06, Division factor 396900.000000000000000000000000000400, 0.455111111111111111111111110264E+05, matrix MaxAbs 45511.111111111111111111111026448400, 0.204081632653061224489795892940E-03, matrix MinAbs 0.000204081632653061224489795893, 18063360000.000, :Matrix - biggest integer- decimal 18063360000.000, :storage space needed- i*1,i*2,i*4,i*8 21098765432109876543210987654321, :digits index 3 2 1 13, : digits recommended w/`.` !--- Coeffs matrix - done 2021.04.05.0459.20.625 !--- task`s time: . . . 16 PCoesE288.bin Binary file data write/read sequence- integer*4`s & real*16`s: 4, i* 4 nVT -Number of independent variables fixed size 4, i* 4 nOrdMax -Highest order variable ` ` 4, i* 4 nCT -Number of polynomial coefficients ` ` 40, i* 4 nOrd(20) -Order of each variable ` ` 4, i* 4 iPolyClass-=1:exact, =2:unscaled ` ` 4, i* 4 iCoeDigits- +***. <-count ` ` 4, i* 4 iCoeDeciPl-number of digits after . ` ` 16, r*16 CoeDiv -Coe[,] dividing factor ` ` 16, r*16 CoeMaxScaled -AbsMax Coe[,] ` ` 4, i* 4 iPowDigits- +***. <-count ` ` 4, i* 4 iPowDeciPl-number of digits after . ` ` 16, r*16 PowDiv -Pow[,] dividing factor ` ` 16, r*16 PowMaxScaled -AbsMax Pow[,] ` ` 288, r*16 X[0:nOrdMax,nVT] -Variable values to use allocated 648, i* 4 nVnC[nVT ,nCT] -Values combinations sequence ` 104976, r*16 Coe[ nCT ,nCT] -The coefficients solver ` 104976, r*16 Pow[ nCT ,nCT] Coe[,] = inverse(Pow[,]) ` 211024, Total Bytes 0.000 :write-time-minutes ballpark !--- Binary file - exported 2021.04.05.0459.20.640 !--- task`s time: . . . 15 Arrays deallocated !--- Done. 2021.04.05.0459.20.640 !--- task`s time . . . !--- Elapsed time: . . .250 year ^m ^d ^h^m ^s ^ms 1574640.000,:TEC- measured matrix coefficients per minute Link: http://ftp.setterholm.com/ExactInversePolynomials/PolyGen.zip Analyst: Jeff Setterholm Lakeville MN 55044 USA Thursday 2020.04.01 ********, PolyGen.exe is post-copyright i.e.:FREE ,******** My legal disclaimer: *********************************************************** ********, Individual cognition is always flawed ,******** ********, including yours & mine. ,******** ********, - So: - ,******** ********, Use these results at your own risk. ,******** *********************************************************** Mitigate malfunctions. Nurture synergies. !--- Ending "PolyGen.exe"