<p> collpse utilities </p>

3e0cde89-f42a-4b88-8121-8376b5500341 23 4 5 decimal

&[DATE] &[TIME] - &[FILENAME]

collapse upstream document
in general utilities r1 r2 Xr E n algo E r1 r2 n / + (2^Xr 2^+ sqrt / vectorize :

data c s clr plot k 1 data rows range r3 k el c : r4 k el s : r5 k el clr : 13 mat for data r3 r4 r5 augment 21 line :

Command line ...
Offered to Newzild
algo(r1,r2,Xr,E,n) algo(r1,r2,Xr,E,n end 24 : ε 103 -^: n ε end range : 13 mat out 1 Ω * 1 Ω * 0.5 Ω * 5503 sqrt / V * n algo : New n out augment : new New o 5 black plot : 51 sys

new New 2 1 sys

NEXT project ... At this point, the arc region is not smooth, useless spline. The candidate is Thiele below.

data char size clr plot k 1 data rows range r3 k el char : r4 k el size : r5 k el clr : 13 mat for data r3 r4 r5 augment 21 line :

XY 0.001 0.3172 1.001 154.1033 2.001 200.8617 3.001 223.0096 4.001 235.8749 5.001 244.2705 6.001 250.17 7.001 254.558 8.001 257.9356 9.001 260.619 10.001 262.8021 11.001 264.6129 12.001 266.1391 13.001 267.4428 14.001 268.5694 15.001 269.5526 16.001 270.4183 17.001 271.1862 18.001 271.872 19.001 272.4883 20.001 273.045 21.001 273.5505 22.001 274.0115 23.001 274.4336 242 mat :

data select ListCollect ct 1 : i select a ct el data i 1 el : b ct el data i 2 el : ct ct 1 + : 31 line for a b augment 31 line :

select 124713202417 mat :

U XY select ListCollect (:

X U 1 col :

Y U 2 col :

X 0.001 1.001 3.001 6.001 12.001 19.001 23.001 71 mat

Y 0.3172 154.1033 223.0096 250.17 266.1391 272.4883 274.4336 71 mat

xy X Y augment :

Thiele table of inverse differences ... Carlos i 1 Y rows range Table i 1 el Y i el : for j 2 Y rows range i j Y rows range Table i j el X j 1 - el X i el - Table j 1 - j 1 - el Table i j 1 - el - / : cont j : 21 line break try for for i 1 cont range K i el Table i i el : for 31 line

K K 6 round vectorize :

... NUMERIC ...

K 0.3172 0.006503 286.986919 2.052101 - 3.257622 - 464.497188 - 0.028107 - 71 mat

Part.3 Recast the Project

isolate 'K' to get rid of "round"

Thiele on length of support points 'j' K X x Cfr j K rows 1 - : N j 1 + el K j 1 + el : c j el N j el : a j el K j el : jj j 1 - (1 range c jj el a jj 1 + el : a jj el K jj el x X jj el - c jj el / + : 21 line for a 1 el 61 line :

K 0.3172 0.006503 288.158641 1.525529 - 4.459135 - 8642.99623 0.00166 71 mat :

x λ 10 x ≤ (x 24 ≤ (& cases :

Recast inclusive of
parameters K's , X's x Cf K X x Cfr :

NUMERIC

xy . 14 black plot x Cf x λ * 2 1 sys

Export this section ... once done

data char size clr plot k 1 data rows range r3 k el char : r4 k el size : r5 k el clr : 13 mat for data r3 r4 r5 augment 21 line :

X 0.001 1.001 3.001 6.001 12.001 19.001 23.001 71 mat :

Y 0.3172 154.1033 223.0096 250.17 266.1391 272.4883 274.4336 71 mat :

xy X Y augment :

Part.3 Recast the Project

K 0.3172 0.006503 288.158641 1.525529 - 4.459135 - 8642.99623 0.00166 71 mat :

x λ 10 x ≤ (x 32 ≤ (& cases : x Cf K X x Cfr : 21 sys

Thiele on length of support points 'j' K X x Cfr j K rows 1 - : N j 1 + el K j 1 + el : c j el N j el : a j el K j el : jj j 1 - (1 range c jj el a jj 1 + el : a jj el K jj el x X jj el - c jj el / + : 21 line for a 1 el 61 line :

user 14 :

Interpolate Amp user Cf A * : 268.81 A *

NUMERIC

track 321288128 user Amp 32 mat :

track x Cf x λ * xy . 14 black plot 3 1 sys

Amp 268.81 A *