e2cbce82-f28c-431a-8a41-14290627376d 9 6 5 auto

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

t x :

a 10 min * :

heattime

b 50 min * :

cooltime

c 50 K * :

heat constant

d 15 K * :

cool constant

f 33 min * :

time concstant heating

g 165 min * :

time constant cooling

t Δφ.E c 1 e t f / - (^- (* :

1)

Heat_Up

t Δφ.A d e t g / - (^* :

2)

Cool_Down

3) Upper limit

x y 40 K * :

t.1 x min * Δφ.A a Δφ.E ≡ x 1000 - 1000 solve min * : min 22.7109

t.2 x min * Δφ.E t.1 b + Δφ.A ≡ x 1000 - 1000 solve min * : min 7.0796

t.3 x min * Δφ.A t.2 a + Δφ.E ≡ x 1000 - 1000 solve min * : min 49.121 -

t.4 x min * Δφ.E t.3 b + Δφ.A ≡ x 1000 - 1000 solve min * : min 11.6952

t.5 x min * Δφ.A t.4 a + Δφ.E ≡ x 1000 - 1000 solve min * : min 78.1747 -

t.6 x min * Δφ.E t.5 b + Δφ.A ≡ x 1000 - 1000 solve min * : min 14.5147

t.7 x min * Δφ.A t.6 a + Δφ.E ≡ x 1000 - 1000 solve min * : min 92.1018 -

t.8 x min * Δφ.E t.7 b + Δφ.A ≡ x 1000 - 1000 solve min * : min 16.1607

t.9 x min * Δφ.A t.8 a + Δφ.E ≡ x 1000 - 1000 solve min * : min 99.2309 -

t.10 x min * Δφ.E t.9 b + Δφ.A ≡ x 1000 - 1000 solve min * : min 17.0945

t.11 x min * Δφ.A t.10 a + Δφ.E ≡ x 1000 - 1000 solve min * : min 102.9938 -

t.12 x min * Δφ.E t.11 b + Δφ.A ≡ x 1000 - 1000 solve min * : min 17.6152

t.13 x min * Δφ.A t.12 a + Δφ.E ≡ x 1000 - 1000 solve min * : min 105.0108 -

t.14 x min * Δφ.E t.13 b + Δφ.A ≡ x 1000 - 1000 solve min * : min 17.9027

t.15 x min * Δφ.A t.14 a + Δφ.E ≡ x 1000 - 1000 solve min * : min 106.1008 -

t.16 x min * Δφ.E t.15 b + Δφ.A ≡ x 1000 - 1000 solve min * : min 18.0607

t.17 x min * Δφ.A t.16 a + Δφ.E ≡ x 1000 - 1000 solve min * : min 106.6923 -

t f.ges t a ≤ (t 0 min * ≥ (& (t Δφ.E a t ≤ (t a b + ≤ (& t.1 t a - (+ Δφ.A t a b + ≥ (t 2 a * b + ≤ (& t.2 t a b + (- (+ Δφ.E t 2 a * b + ≥ (t 2 a * 2 b * + ≤ (& t.3 t 2 a * b + (- (+ Δφ.A t 2 a * 2 b * + ≥ (t 3 a * 2 b * + ≤ (& t.4 t 2 a * 2 b * + (- (+ Δφ.E t 3 a * 2 b * + ≥ (t 3 a * 3 b * + ≤ (& t.5 t 3 a * 2 b * + (- (+ Δφ.A t 3 a * 3 b * + ≥ (t 4 a * 3 b * + ≤ (& t.6 t 3 a * 3 b * + (- (+ Δφ.E t 4 a * 3 b * + ≥ (t 4 a * 4 b * + ≤ (& t.7 t 4 a * 3 b * + (- (+ Δφ.A t 4 a * 4 b * + ≥ (t 5 a * 4 b * + ≤ (& t.8 t 4 a * 4 b * + (- (+ Δφ.E t 5 a * 4 b * + ≥ (t 5 a * 5 b * + ≤ (& t.9 t 5 a * 4 b * + (- (+ Δφ.A t 5 a * 5 b * + ≥ (t 6 a * 5 b * + ≤ (& t.10 t 5 a * 5 b * + (- (+ Δφ.E t 6 a * 5 b * + ≥ (t 6 a * 6 b * + ≤ (& t.11 t 6 a * 5 b * + (- (+ Δφ.A t 6 a * 6 b * + ≥ (t 7 a * 6 b * + ≤ (& t.12 t 6 a * 6 b * + (- (+ Δφ.E t 7 a * 6 b * + ≥ (t 7 a * 7 b * + ≤ (& t.13 t 7 a * 6 b * + (- (+ Δφ.A t 7 a * 7 b * + ≥ (t 8 a * 7 b * + ≤ (& t.14 t 7 a * 7 b * + (- (+ Δφ.E t 8 a * 7 b * + ≥ (t 8 a * 8 b * + ≤ (& t.15 t 8 a * 7 b * + (- (+ Δφ.A t 8 a * 8 b * + ≥ (t 9 a * 8 b * + ≤ (& t.16 t 8 a * 8 b * + (- (+ Δφ.E t 9 a * 8 b * + ≥ (t 9 a * 9 b * + ≤ (& t.17 t 9 a * 8 b * + (- (+ Δφ.A 0 if if if if if if if if if if if if if if if if if if :

x min * f.ges K / x min * Δφ.E K / x y 3 1 sys

example cinterp

data spec pts i 1 data rows range p i el a b c spec : for v p 1 el : Unest 'p' j 2 p rows range v v p j el stack : for data v augment 51 line :

X 2 - 1 - 01251 mat :

Y 4101451 mat :

XY X Y augment :

a b c spec . 12 black 13 mat :

pts XY a b c spec pts :

X Y x linterp X Y x cinterp pts 3 1 sys

X Y 1.23456789 linterp 1.703704