Construct Thiele on the length of 'K'

ecd0d2c4-fa77-44e6-859a-d9524e1c2faa 7 4 5 decimal

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

user length j 16 :

SS 6179 supports latest SS versions complain

j 1 - (0 range

Thiele on length 'j' of support points K X x Cfr 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 51 line :

Expandable Thiele wrt X's, K's
Export, enable, set 'j' on length of support points K X x Cfr K 1 el x X 1 el - K 2 el x X 2 el - K 3 el x X 3 el - K 4 el x X 4 el - K 5 el x X 5 el - K 6 el x X 6 el - K 7 el x X 7 el - K 8 el x X 8 el - K 9 el x X 9 el - K 10 el x X 10 el - K 11 el x X 11 el - K 12 el x X 12 el - K 13 el x X 13 el - K 14 el x X 14 el - K 15 el x X 15 el - K 16 el / + / + / + / + / + / + / + / + / + / + / + / + / + / + / +

Water Saturation

Water Saturation Temperature ... bar(°C)

t0 1 time :

°C 1 :

bar 1 :

n 1167.0521452767 724213.16703206 - 17.073846940092 - 12020.82470247 3232555.0322333 - 14.91510861353 4823.2657361591 - 405113.40542057 0.23855557567849 - 650.17534844798 101 mat :

K 273.15 : t v t K + (n 9 el t K + (n 10 el - / + : t A t v n 1 el + (t v * n 2 el + : t B n 3 el t v * n 4 el + (t v * n 5 el + : t C n 6 el t v * n 7 el + (t v * n 8 el + : t bar_1 102 t C * t B - t B 2^4 t A * t C * - (0.5^+ / (4^* : u 0 x ≤ (x 373.946 ≤ (* : 71 sys

373.946 bar_1 bar 220.64

a 348.05185628969 1.1671859879975 - 0.0010192970039326 572.54459862746 13.918839778870 51 mat :

K 273.15 : t bar_2 10 a 3 el t K + (* a 2 el + (t K + (* a 1 el + (* : w 350 x ≤ (x 590 ≤ (* : 31 sys

x bar_1 u / x bar_2 w / 373.95 220.64 + 40 black 1 5 mat 3 1 sys

critical °C 373.946 ≡ bar 220.64 ≡ 21 sys

X t bar_1 100 - 0 ≡ t 250350 solve :

X °C 311

sterilized units X °C * bar_1 450 °C * bar_2 21 mat bar 100 370.39 21 mat

conversion 101325 Pa * 1 atm * ≡ 100000 Pa * 1 bar * ≡ 21 sys

=========================================================================================

Water Saturation Pressure ... °C(bar)

bar u 10 :

K 273.15 : p β p 10 / (0.25^: p E p β n 3 el + (p β * n 6 el + : p F n 1 el p β * n 4 el + (p β * n 7 el + : p G n 2 el p β * n 5 el + (p β * n 8 el + : p D 2 p G * p F - p F 2^4 p E * p G * - (0.5^- / : p °C n 10 el p D + n 10 el p D + (2^(4 n 9 el n 10 el p D * + (* - (0.5^- 2 / K - : x c 1 0.006117 x ≤ (x 220.64 ≤ (& cases : 81 sys

user 4 - 322432 u u °C 32 mat :

x °C x c * user 2 1 sys

u u °C 12 mat °C 10 179.89 12 mat

sanity 1.01325 °C °C 100.0

triple point 0.006117 °C °C 0.01

X 0.01 0.05 0.1 0.25 0.5 0.75 1 2.5 5102550100150200220161 mat :

X X °C vectorize augment 0.01 6.97 0.05 32.875 0.1 45.808 0.25 64.963 0.5 81.317 0.75 91.758 1 99.606 2.5 127.414 5 151.836 10 179.886 25 223.956 50 263.943 100 310.999 150 342.158 200 365.746 220 373.707 162 mat

4 appVersion 0.98.6179.21440 ≡

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.01 6.97 0.05 32.875 0.1 45.808 0.25 64.963 0.5 81.317 0.75 91.758 1 99.606 2.5 127.414 5 151.836 10 179.886 25 223.956 50 263.943 100 310.999 150 342.158 200 365.746 220 373.707 162 mat :

X XY 1 col : Y XY 2 col : 12 mat data XY o 5 black plot : 21 sys

clear K 0 : Table 0 : 12 mat

t0 1 time :

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 4 round vectorize :

... NUMERIC ...

K 6.97 0.0015 64.6651 0.0121 58.7843 0.0441 53.7884 0.1119 73.8734 0.3361 108.5365 1.0831 152.2138 3.6528 66.2576 2.897 - 161 mat

Expand to View/Export as required Table 11 mat

isolate 'K' K K eval :

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

isolated 'K'

Cf(x) Export Thiele [X, K]... plug in any sytem compatibele

x Cf K 1 el x X 1 el - K 2 el x X 2 el - K 3 el x X 3 el - K 4 el x X 4 el - K 5 el x X 5 el - K 6 el x X 6 el - K 7 el x X 7 el - K 8 el x X 8 el - K 9 el x X 9 el - K 10 el x X 10 el - K 11 el x X 11 el - K 12 el x X 12 el - K 13 el x X 13 el - K 14 el x X 14 el - K 15 el x X 15 el - K 16 el / + / + / + / + / + / + / + / + / + / + / + / + / + / + / + :

bar u 75 :

user 001000 u u Cf 32 mat :

user x Cf x λ * data 3 1 sys

1 time t0 - 1.6 s *

u u Cf 12 mat °C 75 290.59 12 mat