Separation processes on your pocket computer: Eleven chemical engineering programs in BASIC

(1)

(2)

P1726

6009

C10081

45508

(3)

deY01-

~

ang

U1aaM

9 pib9

t12ft1j

t-Î1,

lMS/G

-BIBLIOTHEEK TU Delft • P 1726 6009 VSSD '982

1111111111111

C 814550

L

~

(4)

---r

\ "

(5)

Co~

~Q.ÇorQ.

---~

ra,)t

51,W\ple.

~J~tWW\ j{Q9Q,~

Vopour

pt'Q.~)LJrQ. o~

Q

l;.quLd

stage.- -

ia -

siägQ;

No\\ -

~oth<lrW\al Qb~orpiiov\"

Cb~ry

JQPout"

-lsu.-J

~u~lbrlQ

<t~Ohj ~Q)~

I . ' r

~~hj d~slllöfio~

Cf<2h\OKj

'

~uLd

-

~~w.d ~uJ~n.Q

cTh.rc.c

COM})

OV\Q1\,t

QXc.koV\.ge-Cou~b-

-c.urwJ-

c.o(UW\Vl

wL~

a~' dl,~p~JlOV\.

N\u~

_

CoW\('OVH2_~t

dLSbJlorLOV\-AÇt-Qr .

--4

9

10

14 1&

S1

42 51-6'3

80

91 IOQ

116

3

(6)

'1'40Y"e._ ..

a.

~~ o~

pragn:lMh

Cbr

~9~

buWQ.IÁ.

I

a

6u.~el

of

~rudQ.M..-t ~

My~Q,\ ~

pu.t

togä±hlU,

1t oU

hoppC2l1>2d

1\

-+

0 dl"lAA9

Q

wune..

~a..p::2rallOVV \tocQ..~~<Z-)

OV\.

~our

(\>ockel-

Çbmpu1är

'1

-tkt

Wa..

cpva.

o.ç-~l~ UvV..ua.n~ ~ Ig~2..

11-

w~

\\Ot-r<lC2H'j

0. \l<l.nj

.lt2ri.ou.~ <tou~

,

bu\-

mG.Wj

oe

u.~

(UAdl.l.d~

Ma..)

d~

\a.Qm.

Q..

lot

~~

-lt'_

'lk.

Pro9ro.\\\-~

Qra.-

VJ~tr~

fot"

Q

SKItRP

'\t-\C},\

I, bLAt-

.

~\I2lj

:>koul

d

obo

tu.iI\ OIA. Q

tpe.-15ro.

etor

o~Q.r

'

OA)IC-

~~~

~~~~)

.

~r ~od4?~~

wsJ.L

k

WW2-:>)Q..~. ~

~

da.M-to~'V o~ ~

~~?

rockQ..r

c.o~

p~~ ~M., \t~ardl\

1f>A-)lC,

.~:>

ü,t,

-»~

cb~wifro~ o~ vono.bb,~·. ~Q.-Ye-\tll o~{'j

6ow;)

k

vonabic)

A- ...

'L

o.~d

4(11-) ... 110

0 4).

yO..A

· ~

0.1)0

aJÓr<2.:»

ia..

~~Ie...

letfá.y

J~

~

.,. z

blj

1\(1) ..

J1L2b).

~~ ~) occQ~~QIl~

doWl.-

~

~~~9 l.v.dw.-~ o..dt-a.»~

.

Work~

wl

*,<L~ ~\l Ma~ g~a..!>

52J~ ~~~. ~t-

:'J:-

~)

alMO:>t

.~

(7)

5 but"

r~dL'j

gO\l'2/

up.

So 1

kavQ,

k.ad

te

U~Q.- (2,)(T0'\.~~ d~rQM~ ~d k~t.

oç

\lo.rtoblQ,~

ië

do(.v.V'v\.~

ika"

(1rosrQwl~.

%<2.-

VV\a.u..v

a,{Q.M.~-t o~

-tka..

d~\'OM.~

ClrQ., ~

I

':l"

Q..b "-

x

I

opam.io ...

~V\;

or-I

ptuJ7

\1

subrou~

lV\

h\O~ d~a.g~~ ~

c.o~laá Çotw\.~a.

aw3

~(ZI r\I.t~a.Q

o.ra.

~~

-te

o1.lovJ

'-jOU-

iä

rQM:)V\.~~

-thçz,..

ftoglOM..

q,Q..;:.Qu~Q.

cf.

1k~ p~)

cR

-ik

cnl\)(G

~

<tb

progrOM.

md

d~~ ~-)a..~(2,

~

~)O~~.

A

~a.co~d ~-tiow t,~

-ia,

~uz., ()~

ik,

~ry D~

-tb

~,C1l:.~ pl't2."~ ~

U~C2.. o~ ~Ij

COW\MOv\,

~~

dod~.

(8)

(,

moJd~ ca.~

ba..

u~.~) ~) ~

r~

wly

~-to-t~ ~d} pb~ ~~

0.

ro\a..

~,

A

~

~Ciä.~vv

lb

-tk-

sp~ o~ ~

Mt\Q~~.

~

l,)

a.)~

c1a.r

~ ~

frogtowv

'I

tIlc..t~~ .)~( w~

~

U~

o~

10 owz, bur!

rll,~ 'l,~ ob~oJ~ brd~

~roèlid

,c.ia,

~

pltXjraM.~ u)dl~

-hb b.~)

~

~a. ~iä>

b(hlllt",

~

4'<2L-\,

~

la.}s,

CT

o

~~a.-

seaad

~

'W>

.

~ u~a.d ~~

cf

~

Pros~

QtQ.

u~

eU±

.(tob,

Sok

~

V\U~ ~

not'

<J~~ ~

J~

log~

.

lLttl

011 -tk~a. d~~~o",-iä9Q.) ~Du ~

WO~lU': ~

lA~(2, ~ocbt ~~

al-

oJl9

UW!

~~'=' ~

-ik

bC29~

tka.!>

10 r~

wttk

~.1t ~) ~~ QQ~'

-t

9~

0.

~

prog~ ~

,

awJ

.

tö

9~

.

'J;-

~V\Y\~

~

1ha,

b~ bJ~

ika..

~~

ow:\

Q.

fock+-Qo~pJ-.2-~ .~:>

tw-lcl

b>~ ~~

ktw<li2JA-

~

9 ~~

~.

Of

Cout)C2..

k

»0"'-

rl2.Q.~<Z» ~

~ito~

I

bul-~

ka.

ka)

'

Q.

~t~+.

(9)

0.

~

_

~~k

oç

OUY

~

.R...U~

DUr"'-O\W.,.

~\~

.

b<UQ.u..~

· ~

~

pcJiblc...

tl~

Q~ ,,~ ~~IQ,-

fov

ko~~_

~<2. ~yw\'bob u~

ara..

tI)iä~~

rTham

L:>

ovuz..

QX~ii.o\'\,"

r

ba.. la6alaJ

~

~t~~

~

Q.oW\f>DS'~~ o.(U)rd~

te

t~."kQ..

co~cu\bV\..- ~

te

l.ahd

tk~ QeLO~~<j

1:ö

k

.rr-o.g

Q..

tl~

taa.\Ia.

~

OO~UaJA.-t:o~ ~

Me.~

:

y

5 .

X"

ijS"

t

Xstl'

ti

':.1~

X5

Ytt

Xl{

1 ~u~d ~~

CL

~Q. 6~~

tM,

tla.

~ro-~~~

,

~

~ow~

are.

~bY ~r-ra..a.\M.~ ~

-tb

CoVll'-pO~~~~~ ~la.

-

~tQC..+:OV\..~

_

~ ~QW ~ol r~~

.

~>2-- PtoS~)

<lt0

wot

~~

1 blfQ.,

\Wt

~

o~

~

k

u.~

-

~l<j. AqQ~

4

(10)

-tLc..-8

Wlo~ Solüt:o~~ ~

ocoo>Wl-\.Q.I~ ~

~I

ool-CowJ~~

o.t

dl.

Al:>o

r

~t- 9oQKl~1äa..- ~

4.~

wl

b

hO

Cltt"ot)

~

3

D

~

~~

too"""

ror-

~.w1"ro~ ~ .~ ~1.4 b~

0"-

t.Jaa.

kt

~

bo~.

t/y

adlrcz.»

t,):

laborat

_DIY

~

rt~kOlog~ O

oe1Zul\\Oto~1

juL:c.~CJi\

l3b

I

2bCJ.8

~dÇ~

I

~

Na.Waw;}').

oJ-ob

\'3<&1

(11)

t\

1ë~t.

~

1k.

au-\lor

~tk)

ror

OV\.

adU(a.tlO~al

~~~ wa.. ~t-a.~

wJl

a.

1<l~\-,

9 Wa~

1k

~Q, ~

-tk

?Ro-

~a.

,'t'j'e...

'\ha..

~Qow~

ptoqraM

~. ~

'30

ro

~

'Kur-{ -

~Ja.

aw:J

b<29~

WJk

~u~

-

~hzr

.

8:REM "A TEST"

10: BEEP

1:

PAUSE

"HAVE YOU EV

ER DONE"

20: BEEP 1: PAUSE

"ANV COMPUTE

R

t

'

10DELLI HG"

30: BEEP 1: PAlISE

"OF UNIT

OPE

RATIONS?"

35:BEEP l:IHPUT

"YES OR

~~O?"

iA$

40:IF A$="VES"

GOTO 80

50: IF

A$="~~O"

GOTO 70

60:GOTO 10

70:BEEP l:PAUSE

"VOU HAVE PA

SSED THIS"

75: BEEP

1:

PAUSE

"TEST! GO OH

• ":BEEP

3:

END

80:BEEP l:PAUSE

"THEN THIS B

OOK IS OF"

85:BEEP l:PAUSE

"LITTLE USE

TO VCiU"

90:FOR N=1TO

2:

:E:=B'~'.

33: HEXT

N

100:BEEP 3:GOTO

90 ~) t'~r ~JOU\J t\O\- b~ ~ucttd ~

ik.

(12)

lO

.

yo

X

o

V L

~~

OV\

QJ(o.Mpl~ Q.oV\.~~<2r

a

rtkp(J~

aoI.u~v\.

C1k

~ulJ ~~ t.AJÎ.,~

.

Q.

~railiov\' x~

oç

a.

Co~o~ ~

Lh

tó

ba..

_

rQ.W\.Ov~

10 a.

b~

bal

(xo).

<"Tk)

l,!>

do~Q. b~

Q

~~'~

ga.~ ~cl ~ta.tS ~\l

Q.

Co~o~

<3

0 :

O. ~ow

walt

Jo(Z.,')

l~

Q.

ecL..~V\

opcuot/Z..

~

eaJ~{aiio~~ (by

k:>

W

of

~u.lf>tWU\t

CQh.

ba.-

~ua-(l, d~lt;

(tJz,

will

~Q.~

~a.ral QxQ'"PI~ fv.~~

0"").

HovJ~~

(13)

Il

DWll#d-

da,~~to\N

c?

tk.,

p.J.,~ .~

aVQ.J.obI~.

lJa.,

ww.

u)0

-tk)

a.~

-tk

~~~

o~

our

~~t

(J<Wj

~~(JlQ.,) P~9raM.1t

reluh:

r -

s - \

for

S

i

I

-

~~+-!..

I

~

=

tJ-;-t

fo

r

S : ,

~Q.1-ï2. ~

l-)

tl<2.-

~ëfio~ ~t- ~Oll~ o~

~Q., CoMf?o~

.

iö

bQ...

~~atQ.\a.d.

N

~

L

WJ.~bQr

o?

~wt..bh..uv\'\' ~9a.)

~ ~ ~

KV

L

~s

+la.

~ ~pp~g ~ciör.

~~e,

czq/.Áölio\'\.:>

QrQ.o~~ ~Q~ ~ tkQ.,

dt--t:.c;h" Co~~<..MlNt-

I(

oç

llQ,

Co~-poV\.~~ ~C2.flarQrQ.j ~') Cow.,+ö.~t-, Q.~

wall

Q.)

~

~w

mhz.)

L

Q"""

V. ~)

b

cppl'O-~hJ~

)0

\br

low

c.o~~hr

..

;it:o"'~ o~

~ c.ow.po\'\.~1- ~Qtut-d. ~

<U.}ua~ ~~~

(14)

12. KrQ.M5Q.r

e.q.u~v\'

û\"put'

5

I

N

100

~=~

108

~~ I+I~

output

· t

f

S-I

-

S~+-!..I

':Ól:::: PEN "KF.:H1SER EOUAT I Cir~" 1 00: It·jPUT "S="; S i 02: I t·jPUT "t·~=,,; N 104: IF ::;=1 TH EN 1 08 106:F=(S-1)/(SA( [.j+ 1 ) -1 ::. : GOTO 110 10:::: F=l/üHl) 110:USING "tttt.tttt tt":PF.:INT "F= ";F:Et·m

lOb

Ho

A

~IOLÛ d~9roW\,

a.

l;f;

o~

\JQYLo.61a.)

Q\I\.d

1k,a...

pl"OjraWl.

A-

W±LQ..,

OÛ~O"Q...I

Py

suc.k

a.

~w.aH progrQ~. 1>ut-

~J'

~cz5

tla...

(15)

Ex~plQ.,

~~p~

_of

OMMOru4

froW\.

wa.t'<u- :

X

_O":.

I

kgj",3 ;

L =

IÖ

3 m

~/~

K ::.

b

~

IÖ4

(kg

Nth/M'

o.u-)

/(kg

~~~ ~\ocl-Q.r)

~

QY\.

olr

~\-f12-QW\

V

=-

Q. m

~

l,)

u)

~

1

ik

~t-~p~

fac10r

l,~ ~

5"

b ..

lo~2..

=

l.

Q

10 W~

(kkvv

o~

ik.,

QmMO~ l.~ l~~

~ ~ uu1a.r ~12.r"

10 ~JJ1.briliw\'

~iäs,Q.,~

?

~ut (~

c\ka...

~u~

Cr

'lE'F-h'\oda,) :

rWN <2N\hu"

5 :.

l.

2.

0o\.TQ.r

N:;

10 Qv\.tx-

- >

outp'-l+

~

=O.03l

~~<U\~

(jou

wi.ll

~

~Q. ~a.~v\' ~ ~

K\'12.W\~<Zr ~udiovv a~ o~

opplt.,,$Oll\)

UI\., ~

\J.L.tIL~eaba.., J.C.S~

I'OW}-

Op<2.(U~~~

ot:

&~

~~ll

gtd<2d,

~c.qrQu) tiJ!

\91.5 .

(16)

Vopo"'"

~jU

...

e.

cf

·

0 14l"U{

-I

\

.

- ' T

qh~

prtXJKlW\

Qalcul~~\

kpo

"a.pour

prl2-5~~ u~t,W3

~Q.

clapaljt'OVl

aqua+lDvL

~

po=

pQOQXp[~~k .~

]

~~ ~ua.-to~ c.o~~~

rwu

~p~nc.a.'

rorOtl\QJ-ar~

:

r

o~

tb

b~

cf

oJapor-~'Z.Cl-tlOli\..

Ah .

1hQ.)Q..-

ro~

ba-

d&-<u~ ~

1-un.?

d~~~~r wa'j~

'

,

r

~C2-

OV\,\Lj

~

-tiet

~

u...\-

'(.h

~

01-~~-çbc.

.

bo~ ?"'~t-

,,0

of ie

lq~d,

~u.bprosroM-

11Cf,1(

+h<2n.

M\eulaT /Q ~ro~

'1rcv.to~~

lo.w:

~

=:

\0

b

tKi

O I

r

~

Çotlow:>

~h'\

k

~Qh~

Dg

-tk

clapayro\l\.

~u.~"

p'"

~

{QXP

[-t

~o1F'(Il,ç,>:1

~~

tndkod

~~

not-

Q~

pt-

pokr

~U~~1

(Z:>p<Zci.ol[tj

~Y

o.W<;Uj

~

tkci..Y

(17)

15 ](

~

$<2C.owd

(~otQ;

reUablc)

1\1.<Z.-4.cd

I'"Q..-q~

1wc

TQ.lM.(JaroT~

-r;-

Q~

<""\2..

~tl

-\la...

<2.C>tl'"Q.~row::J~9 \Opo~r prQ~)ur<Z~

PlO

o.w3

p:.~

.

I~r~t-~t"")

QtQ-

+kQ.k,

Ja~

froW\.. .

. _

~lv

_

(~

_

1-)-'

k~:

R -

TIL Tt

}~\

;' =

p~{QXp[-t ~r

~

~~ do ~Q. ~ ~ubrro9ro.M

ti

c.-If •

~u..t t-~pQ.rQ.ru.r-a.~

ara..

l~ dQ.gr-ÇlQ.~ Cbl~w.~.

+~

QrQ,

~~t-Q.k~

Col-Ula.J-ed

-kl

,./

d<Z-<3lï2O-~ l(alV'~.

w"Jl

~od

r

-&Q.

eK2.-~\ur-1Z- ~J.-- ~~

1kz.

o.~~pkQrQ.

(1,01'3

bor) ,

ukJ-l

~~d

1I

ik-

prD9roW\.

U~Q.'

tk.

.

~

.

~h

(18)

16 qA-"

OCtpour

prQS~UyQ,

wUl

ClO{J0jtOV1

~pu--t

T

(Oe) '.

oe.-

~

K

100

pO

=.

pQxp

~~+

1

102

ptUJ;

P

0 lOl{

tlCf>I'

pa.r~a.r

da-t

ernu ..

-4't-Q:h'o",

r

ilO

~pC,)t

,-0 (oC)

~

oe

~

K

1\1

f - - - . IlO [(

r.

lIh

I

J

-j

-t

=

-10.bT~

P :::

QXPL-~

'1.

IILi 11 I'

ckt;

I

ctio

G

poraw\<zter

QXW\(N\.Q

~

J[

12.0

I

rT.

0 0

U\('u

1 ,

Pi

J

IQ.

1

PL

'.

0c..~

K

12.2. _~_

_{(.L_1)'}

~&

130 R -

'"Ti

17 p.0

pro

=.

p~ {QXp[-~ ~

J

-I

_'~2

V(lnablQ,~ ~

A

'B

c...

'D

213,1b

p~

T,1";

e:

(19)

98:REM "VAPOUR

PRESSURE WIT

H CLAPEYROH"

100:

u

_{A"IHPUT "T=}

";H:H=H+A

102:I=G>t<EXP (F/H

)

l04:USIHG "UU.UU

...

"

1"06:

PRINT "PO=";

I:END

110:

"B"A=273.

16 112: INPUT "TO=";'

C:C=C+A

E)(O~p'1

<2-')

114:F=-10.6>t<C

116:

G=l/E>~P

(F/C

>:END

120:

"C"A=273. 16

122:INPUT "P1=";

B

124: INPUT "Tl=";

C:C=C+A

126:

It~PUT

"P2=";

D

128:

n~PUT

"T2=";

E:E=E+A

130:

F=1/( 1/E-1/C

)*LN (D/B)

132:G=B/EXP (F/C

):END

eIk

Ilapov.r

pra,~~nz.. o~

wat-0'

~~

\ bar at

100

0

e

all\.d

10 6Qr

a.r

Ca\~la.rQ.,

;.,t)

"c:Jua.

ar

\2..0

è

~Jk,d

r

)k~t

1>

TD

=

\00

{2N\\at-~~~\-

t\

T ::

\2.0

~<2r

...dkdl(

~kel-

C. '1 :\

~~

'PO :

1.1l IEOo

(~)

1t> :.

\00

~C2Y

?t

=\0

~y

n=I~~~

(aJ-~ Ja1~

$~~ ~

' \ :.

\2.0

(20)

'8

v

~

~tá.gQ.,

ia

~

calcu\át'l.O\'\)

OJ'Q,

ik

MO~l--U~~ ~

te

àa,~~ ~araiio~ proc.a.))~.

~

-!lrtU2.

~~pt(l, <2.I(~IQ.~.

~

1k

~~

0"(2..

W(l;

t~~

a.

d~u\-a,., CD~~a.vJ- ~W\.

Q

~r~w\'

V

t-O

O~~Qk"'

~~I(2.. ~rrC2J;l.W\.

L (or

1)"U2..

1l~Q.).

cia..

-li.<f.u..~'\

la.a.\tu..v,

\la,

b.:,~o~

sr-a.g<2-b

o.)~UMa.d

ra

b<Z..

~

C2'4~n.uW\

wtik

-k

It

OC2pou~' ~

y,

=

Kx

o

Clk

d~!>rJ:,u.\-~"", ~\-

K

1.)

Q.)U~

Co~)ravJ-.

rtlv

co""'Po~o~ o~

Lz,

~~~J

~~

abo\ltZ.-

~llo\J.) ~

Q

~)

bala."'C.a..'.

x,

=

Xc

+

~

('j;'"3o)

~2. I..~ a.9~1I\, ~ ~w.tlt\.o.M.

wJ.l \:

I ,

~

·)0

wa-

c.a~a.r~

tk

CDWi'O)J-~~

(21)

19 S-\a9~ro

~.ruqa..

_r

'lM.P

ut

L,

V,

K,

)(0 ,'jO

400

500 ~tid~

X:::.

X.

O

~

:::. <.Jo

~~O

Ou.tput

~,X,~

100 ~\a.gQ. cO\c.uldlO~

~:~+,

150 ~vlt..b ri.u.~

'j

~

Kx

M.O.)~ bQ1Q",~

X,:

X

o

+-

~

Ly-'jo)

rapa.ot-

fer

\\a.x~ ~\ë.'3Q.,

~ra~

cTh.a.

tAAf'c. .

..r

a~ ~.h.a.

l.i.who~ k~C2"

baa.vv

pl.4f

Cl~ra.Y

k

!)\-Q.'3l2--c.a\a..v..\Q,\-~~

.

rTl~

g\.ûa.)

a

~rav

ptogro.m.

'310

98:

RE~l

" STAGE

TO STAGE

1"

100:USING :PRINT

t~; U::;It~G "##. 11 'lil; 'r'

150:

~~=t·~+ 1

200:

,(=I<*~-<

300:X=Q+V/L*<Y-R

)

310:GOTO 100

400: "A"

n~PUT

"L=

"; L .

402:INPUT "V=";V

404: It·1PUT "K=";K

410: IHPUT ":><:0=";

Q

412: INPUT "'(0=";

F~

500:N=0:X=Q:Y=R:

GiJTCi 100

(22)

~J- .1)€t--~a,

~~~

L::l

~QY

~=

1.2. ~ClY

(::. \ aaJ-

QY

xo::.Dl

~C2Y

yo%O

akrar

O~pL.ll-o

X .010

Y ..

000 aJ-ar

, X .021

Y

.0\0

aJ-ax

'2.

X .O!>b

~.

021 ~aY

3 X .OS":>

~

.0'3b

~\-Ql-a.rc. .

~

tIlc.&ba.~1k1e, d~ rQ.~) o~

fou...t-

CQ.)a..)

a.ra..

)bull\,

610w

~

0,\

QX~le,

Y abO\le,

V~\.o

0,1

V-+-O$

0,0

x

0,\

J,)Orpr~V\

.

\

.

(23)

21 Moya,

CoM{)~t-czJ ~uUl.,brWWl

ow:}

MQ»)-boLaVlC.C2-

r-alóto~)

Qre.

QQ)Uy

~Corporobd.

~

progmM

1r

~Q,

agJJlbrtuW\-

L'V\Q.,

k)

4-k

<Ui.<Ja.t~V\ ~

I

Y

Kx

y

~

Ï+(k-I)

x

r{~~ ~UQito\'\ QPpro~J-Q.~

~<:i

vopour -

~u;d

-o

- F - - - +

~

oho

~MQ. ku~~:h o~

o

.

x

l

o.(ho~ho~

ï ,

w~ckQ"'9

-

I

~

QXtro~v\' ~w1.1t\.Q.

<\=Or

trQ~~Pr

oç

Q

~~V\;1IQ.

I

~O~

-

d~lu~Q.,

Q.o~v\'~

-tk.Q.,

M..a~~

-bQlQ.\I\.C,.Q..

ra.a.d):

*/~ ~)_L~(l_xo)

V

l\-'j - I-Yo -

I-X \-)(0

I!"

Q\A.d

V

k-

Qro.1l~ ~tr-a.~~ o~ ~Q,

~V\-1-ra.V\'3 c.oW\f>oV\..

_we,

U)Q.. 0..

MOd~~ ~(W\.

~

~:.

Xo _

\j~ ~

~-Xo

L

~

\-'30

" _

1-"

-

,~~

(24)

~\-a9<2-

to

~\-asQ..

1t

- - -

-_

....

_--_.-

-~ut-

t::

V

~

K

I

X

o I

Y

0 400

~'vt..olLrz.~S

x=

X

o

y

='jo

~

=

0

500

6 ~

XO/ll-X

o)

-'Jii*4f{jo/ó-~o)

ourpu\-

~,)I.,Y

100

~b'3Q, Cou~~

er

N=N+I

150

equJl.brW~

y:::

K\

/(

I

~(K-0><)

100 MQ~~ 6alo.\-\.e.Q..,

~ =-vj1.~~':1/(I-~)

+-&00

X:

?/(I~~)

. \

reçoot-

for

v\Q.X.t-

:\1ag<2-.

'310

'~:::: FH1 11 STAGE TCi STAGE 2" 100: Ij:::: I 1··iC; : FF.: I t-n t·j; U::::lt-lG

"nn.

11 ' .. '11- ' .. " : ' I 1 '50: t'4=t-H 1 200:Y=K*X/(1+(K-300: B=",,.'.····L:i<'·(.···· 0:: 1-'l >+D 302:>::=:E:/O::l+B) 310:GCiTCi 100 400: !; A" HWUT "L= ";L 4C'2: HlPl .. ,iT "V="; \1 404: n·IPUT "K="; K 41 Cl: 1 t~PUT "::<:0="; I) 412: 1 t·IPUT "\'0="; r, f". 500: t'i=:I): ;'::=0: '1'=F.: 5(12: D=Ci./ 0:: 1-0) -V.·/ L :t:p ... ( 1 -R) 504: C::OTCi 100 .

(25)

-23

~

ki..sk.

pY~:>(.ira.-

ob)orba.r

r~\/~g

WQRu-~h'\

vd-ctm\

')Q)

wJl

Q

glYCol

)Olil~f-

,

~llr·

.

1)EF

-~dQ..

l

ou~U.r

)k~~

It-

L

~

IE

-3

l

X

3,00

[-I

Qh\-CZY

V

=-

i

I :

2.b3 '

y

5.00 [-4

4.2.~

~a.t'

K

=-

[-3

I

2.'21

· l

.

3.5b

~ro.r

xo= ..

~

,

l.t5

atJ'"av

yo=-

5[-4

~~Q.J-

.,

\.2.4

O,bS

y

-4

~~IO

o

a.Cl.

2.15 L41

X

O.LL

(

(26)

'24

rRQ,MQrk.~

*cThc

cx.J-pu.+

g~Q.~

--the.

x

a.~

lj

d-o.

ca.ytzl~

kva!

~

ik

COk.lMV\,

~Q.

o.ra,

rot-

tb

CoW\po&~!> o~

ik

~kM~

tQ.Q.~~ ~'\

cgw.L..brLuW\

~

.

tage...

1\1\,

tha..

Q,x~lc ~

S

Lx.

lQA)Q,b (;::

çw~ S~CU3<Z-))

.

r~uc:a,

1k

JOfJou\'"

Qow.po~·dioV\. ~

lj

~

5*ld

ió

.

y

-=.

\.Lil

~ \Ö~ ~r

Q..

6a.trar-

~~

<::Jou

wou.IJ

~~

Mort2.-

}OIJatAt-:

~ h1o~t- ok}orb~

ara-

V\Ot-

L~O~ ~

K

JarUl,~

wJl

~Qro.~yQ.. ~

Sa.a.

~

pK>grQvv\'

Il~_ ü>o~

'

ob~-bV\

q \

~Qra,

-tle.

tQ.M-.

p<u-a.rv.ra.-

~Q, l,~ ~I

bu.)a.-

o~

tb

vQX"'-j

~~l

Mol-)h;x(2.

ao~czJ- o~

tke..

gÇl~,

"*

J\.~ )tQ~ ~o\~(l,)

WQ.

~d

tuso

CoW\.-po}èko~~

a1-

k

~a.rr\Q... ~

oç

~

cot.l~.

~

'-jOLQ

bow

ik

QoW\flC)·~V\. ..:>~ ~Q.,

t-wo

çaaJ)

-ll~ calcu.\Q.h-~~)

("aq,w.rQ..

I1

t-ri..a.l

a.wJ

\(

<2.trOr.

*

1k

progruwt

caldJé~

ÇtoM

~

bo1tö\tV\

opwcu-d~.

-n-

~ld

a.bo

ba..

Pk'09~W\~

(27)

25 ~

cu.r

la.~r a,xo~lQ., ~ ~tru.a~~ b:w~

Q

~ra9Q..

ara..

W)\-

w..

9.w.ü.6rWW\.

lUQ.

takcz.

-\k:>

'uJo

Q~\- b~ UA.t-roJ~~

Q

!>~~a.. ~}tc.i.Q."-~ ~

aqUJebliMM

Lu,.'Q-

E:

~:~~~_I

y

\

~ ~-\

Y

~

y:

i.,)

ia.

~poSdiDV\.-~

b

\j"

yOl(

wou..lJ "

~"It\.,

011\.

y~_

OV\

~~~n..u.W\

sk

g

<2.-;

'

\j

~

l,)

-tha.,

CQVIf\(.>o;di:oV\.-X"_I

X

o.ètaH'j

o~

..

!la.,

~9~-~~ d~)

DIA-

ia-~ow

pdtQ.rV\.

~

-tha..

\tv\a-~) +ro.l-\.~Pr

p~J-Q.t-~ o~

tk.-

~SQ..-.

y~

x~ r~ bath pk)<l~ ara..

wa.ll

m~aJ

-th

Q....

y-Ja ho

V\.)

ara.. :

E _

No~

- 1"-

~o'j

~I\-\

Xr\_1

1ha..

llO\.lQXall

~1cu- o~

troh)~ uvV.t~

,\

N

_OJ

~ ~

Thm. 9

W

CU!\,

b

~ ~

.1

_~

(28)

26 ~Oj CoJ-a.~~

1ka..

~\-a.rpka.)a..-

QraQ

A-

o~

-tha.

)rasa..

Q.~

Oh. 11

oua..rull

h'\.Q.!»

t-ro",)~

~~'I:

k,~

=

[k;'

+

K1k:T'

~arQ.,

K /

~)

-thez.

~lo~Q.,

4 1k

~u:Jt1~uw\

~Q.,

ot

-tb

d-~Q.. ~~tóa.rad~ k~ ~

kx

().ro, "Ma.))

tÇar I\

~ ~

tV1\?

o.ro.ta.. . ~0"Q.. ~

Qt--Q.

r~Qrda.d

Q.~ ~cz.po.ro.

ta..

~"u.~

.

~

proSI'UW\.

~

)Q.t-

up

Çor

0. COuvJ-ay-fu~\A.\-

tOV\.-

axcko.~9Q.,

proc.a.b)

ti,...

Q,

plo.k-Co\U~~. ~ tl.~ e.x

,

~WjQ.., pro(.~~ ~

~\O.y) bal~ k~ ~a.. la.. ~

X

~

X

o

+-

~

(Y-Yo)

-~rrh~ orpro~~Q-t:oVV U~Q.Ó

hQJ-Q..

l,~

t\Or-~u.èto.bl<v ~r 5trt>VU3I~

CuruaJ

asu.~b~W\

~w:2-:>

• ctol""

a

.

b~<2Y

MQ.tk,d

~<Z.. ~

l'RE

tir~bd

I{

~10~) "T~~~ ~--to~)

11 I

H1eC}aw-

(29)

2.1 ~ra9Q.

to

~(l,

J[

(~o~ -~UCl(lb~u~

U'\put

L,

V

IK, X

o ,

yo,

k~,

k':) ,

~

400 ~ctta-t.

zattoV\.

~::O

X::Xo

'='=':10

soo

OUrrJut-

~

C

)( C

Y

100

~\-a9Q..

COltV\h.V\.g

N

:.

~+-I

150 ~lOfX2'

K

f

=

d'-j~/dx

()Qa.

\,\Qxt

~QgQ,

r

ko~:; I/(VkJ+ICÎkx)

O\l(2(Q\I

CO~~Q.lt\F8

~o'j:

ko'j

Pc

/

V

"0.

tro~~~ CJ~l..t

~

::

~o'j/L\

....

~o'j) ~~Cl1

ho~ 9.uJ~~W\

y ::

y ..

E

('-j*-Y)

9.14 W\Q.)~

bdQLl\(.Q,

X

=

\ijL (y-"jo)

+

X

_o

500 ra.poor

Var

V\<2.Xt-

~bsQ...

3\0

~Q~bla.~

A

1>

c.

1)

E

₁₌

g

_~

r }

_K

_L

_tic.

A

_P

ó

E

k".

Is

~

_K'

_{K L}

rio,;

N

Ó

l'

Q

t

· _~

_T

_{(J "}

IJ

X

_Y

2-~

)(g

'jo

V

(Al

X

~

~ ~

(30)

-

~lopQ.

ca\c.u \

ot:Ov\,

~

200

X

-C'-

Xt-E.

y~: Kx/(\~(K-l)X)

~O2.

~aa\;

~

X

+-X-E,

204 KI-=:

(y(X) lX))/'~

20b

98:REM " STAGE

TO STAGE 3"

100:USING :PRINT

N;

USHIG

"UU. ~UUt";" X";X; " ~/"; Y

150: N=t'l+t

'

200:

~<=><:+E-5:

101=-1

202:Z=KX/(1+(K-1)X)

204:IF W<OLET 101=

Z:X=X-E-5:

GOTCi

202 206:.]=(W-2)*E5

208:I=1/(1/G+J/H

)

210: t1=I*A/\o'

212:

E=t1/(

1

+M)

214:

'"!'=Y+E*<Z-Y)

300:X=Q+V/L*CY-R

)

310:GOTrJ

100 400:"A"INPUT tlL=

"; L

402:INPUT "V=";V

404:INPUT "K=";K

410:INPUT "XO=";

Q

412:INPUT "YO=";

R

414: INPUT "I<X=";

G

416: INPUT "K'y'=";

H

418:INPUT "A=";A

500:N=O:X=Q:Y=R:

GOTO

100

(31)

[xa~plQ.

rTh,<2..

QJl'.ckaNjQ..

oç

cJ+-

o.~d

ea.

2

1-

bQ.t-~

wa.Tax-

~d

a.

ca.-tioV\.-ra.~~ ~

Q

cou.~

ûU.~t pla~

cokn .

re~~

V

I

eaQ.+--

\?ol"M

t""'I---+-t

~~ ~IT6V\J

oo.pccl-

y

o~ bo~

~J-~ L,~ ~

L ::. V

~

\

~I/s

.

rtkQ..

agulJ1.1~~ co~!>t-Q\I\.t--

kÇ.)

t

iha-

Jo.lu.e-

K

~ ~

Q..

wo.t-Q.r

L

.1

l

./

eu.<L:

~

'\V\Q.,

Ja.

ua..:>oç

1WZ.

rt\Q))

t-rCll'\)~

pa.~a.r

a-I-~

ÇU-Q..,

~

4 kl( -; kj::

b-4\Mvt~L.»

A-:

lO

~/~rQ.9Q..

"( Nora..

~

tk

uwJ-)

\w.ö~

b<2.--

~~

llal-~ =-

kA/v

~) d~)l.oJQ.~})

~vJ-(

UA-

1lEF

-~àQ..) ~

~~

A

\0(

=

f-4

~~

L

~

.

,

eN\r~

,/

Klj =-lE -4

,\

"IJ:

I

\I ~ :

14

.1

K:

2.

11

4 XO:.b

'I

'jo: .

'3 "

(32)

30 out-puf

0 X ,boo

y.'300

<2Mra.r-\ X. 54b

y.

~4b

a,lAra.r

2. X ..

LBb Y

/t

gfo

(UAt-cz.r

a.rc- ,

~Q..- rQ..~l.l\\-:> ara. flotta.d

balow.

~orQ.,

tl<l.

a.kV\.<3~'3 4~V\.~ o~

ik

~ta.9Ç2.).

1\0

cl

coppar

~o\-\. o~

Y

\'"Q.}UA

ca\loV\.-

coV\.t~1-0.0

f---,---r---.---.---::'1=---+-

CJ..é+-D,O

X

1,0

(33)

Non-4Uma1 Abo

~\- Q,WQ..Ct~ Cln~, o~r~ ~Ot=tavJ;- ~

Qb:,orp-toV\-

eoluW\V\.):

~J'.X ~T

,

obsorpiiov\'

=-

Co~QY\~a-tlOVl

31 ~

d,-~fJ,dio~ (!O(l,~~ -tl~ J~(4)

a.\o~

tlC2-

cob~ a~

tl.,;>

ka)

tb

612.-tok~

Ul\.t-o

o~uvX.

~Q, ?oUo~

progrum

troo.t

~y~I-~'\!> wk~

ciha..

~u:~

tu.\W\

rJdio~ ~Uow ~

:

f "

K " Ko

c><p

~t(~-+a)J

.. '

I. ~Q.ra..

Ko::'

d~)t-~u.ii.o\'V ~~

at-<Ic, ::

r~

T~-ru.rQ.

(KJ

(34)

~k

=

klZa~ o~ !>o~ltV (jfool)

<R.

=

90-)

(!o~ta.~t

=-

8.31 O/~I

K)

'\a.w.pcz.rarut"Q..

~o.~a..) Cl("~ CQICM.lQt-~ ~~

. Q.N'\.

<2lJ\<2.rl:jj

6dQ~ca...

<1L:>

r~u~

t"Q.)

\l

o.L

<2-:>

ÇOY

tk

uo.pour

~ k<:} lplQ.j!

h

.)Qp~r-

=

cT

+-

'j

~k.

kt4~~

=

bT

'" 1.

w~

b ~J

c..-

Oro,

~f~c br~ (J~\K)

ctk~Q, oqu.o.r~~) ~ptoX~t-Jj ~bQ.

~J' ~'1~t-~ ~

~thcu-- ~ '~da..QJ

Dy-a.

d~t0 ~(J.~pko.~Q..

cThc

prob\~

For

+ha.

ob

-~rp--to~

QöluW\V\

i.-~

)uM.-MOM~ ~

+ha..

Q(o~rQ.~

lw:3

MUYcz...

g~<ZM,

Cl 9Q.)

~~,

Q

~WQ.4.-\.\- ~\Ya.awv

a.~

Q.

dc.~~~ Sa..) p~h.,

\i-c.cib~

I

da1-~a..-

kow

w\Q~ o.s.~6~~ ~ta.S'Q.~

ara..

rQ.sv-U.-d,

I

~?

1 -

-

---

--

-

--

-Yo

I~ I v~

Tv

(35)

10 ~rt

-tk",

(.aleu.6-t:o\l\-~

wa.,

V\~

Q

.

ooW\f>ld-<2.-

~p<W..~l.ca.-t:o\.v o~

4:2-

+WO

,

~~)

a.t

0"(2,.

~ o~

k

c..oLW\V\.

HC2.rQ..

.~

Q.,

chOO)(2..

4.'2.-

k,WQk"

~.

~

J~ o~

X

O

l?oUOW)

ÇoW\

QJ-\

· ov<Ua.l1

\'VlO,))

b~C0 ~

,

.. , '3

(36)

~

=-

'T",

~b~;

(w -

<23

+

Ij.,Ak_

Y~àk)

'"

t

o

l-X~

~

\1-':10

l-ljt-{

\-"30

\-'='I'{

C1la..

s\-a.'ja.-

-t-o

~<2-- c.alc~JQ-r~~) pro~ ~

Q\'\.

~\

..

~

..

~Lbn...\1A.

ra1öl,,,,,,

,Q

~)

bo..!c;u,v..c..,

avJ

~

QAA.-tla.l

p

,=,

kl~CQ.-.

:1~:1

't'"-t

X~

~0 Q.~l.l~btLu"",

rekii.oV\.-y

~ K~

é1:.)

x~

gwQ..)

-thQ..

va.pour

CD~O~~

ov\.

~Q,

W2Xt

k\JJ.

Y-w-t

iJ:.><M-'

· A-

_~~ 6aL~,,-ca. g~a.>-Ik

tl.'4.u.ld

coW\{Jo;~"--:

L*(

X

Xo)

"*(~

<.jO )

(37)

35 'T~

(I-X){

t

~

t;.

(~I

'

l~-I+ ~

...

Il6.)

wUl

\. . Ulo:"

-'1""

I

_"j....

"."

\2

'6:~

_"

'*-

je""

+

Yot.\k.)

\ -X_o

bL~

l

\-tjo

I_~

... 13

<l"kQ.,

"a.L.a..~ o~

Xo

fT.:>

a.~d ~

Ql.J..~

"aMblQ,~

'6

Q~

A

ara-

dJ-~~ b<2~rQ..,

1k.,

Vv\.Q~

PtOSruW\

~

.

~

ra-~u.\h ~h\t

~

rlo.

g

0 Qro.-

p~d ~

0.

s,l.lhrou.t-L.h0.

'1k

~ld~~) ~ ~

':1

~tj'"

~

r~t

o?

1lo.-

prDgrQ.hl\.

~

.

kou.IJ

bQ..

Ja4r.

~axc Qr~

+l.ûO

W!>.

O~Q..- ~

,,:; <

L.*b

(0.)

wa..

~)uVV\.d) ~

O\'\.Q..-

wwLu-~~ ~ SwwLu-wwLu- 4~

-to

Q~Q..

ob)ot-p"to

\I\. !

L

~

.

I-~o

>

I

'"

14 t<croJVI'-

\-

XQ

IÇ

-\ha..:>Q..

W~

QrQ..

~ot ob~ed

b

(38)

36 noV\. -

~>o*,Q.rW\.a.l

Qk

)orp-t:.o

~

f--- - --

----~pu

r-

lj"

,~

,

x~ I~

I

Yt-l,

I!

Á'~

Ka,

f1~

I

bIc..

300

r---

-

.

-.-. ---_

.

-cal

c.u.lar

Q, )(0

(G24l-4)

,'"10

(agh)

~OO

~

(eq

1'5)

I

À

(~IO)

ck~ l,~ (L~)J~J

biG

>

I

Ll08

ekcL

~ç (I!/V~yK(fo)* (\~oy{'->co)

> ,

410 ~-N=OlilQ.

~~éti.alrzQ.,

~

X=.Xo

~:yo

T=-To

- ._._ ... "---"-'."._ ... _. ---- - ---_ ..

_

.. -.', -_._- --

-I

e~t

I

X,~,'T

o~

bua,l

"0

I/

412. Stasa,

ea.lcvlo..TLO

\Iû ;

10°

1 K :.

Ka

axp

[Óh;({

(,;1-;. -

l/T)]

I

;

':J:.

Kx

,

~

:: N"I

>.<

\j\..Q

~) bQ.~ (~

.

9)

T~~a

Q..lI\~o.~~

bakV\C.a-

(~.l

'2.)

ler\,~1

x,y,T

lo~

~~

<j

>

'j~

gote

~t

~t-Q.'3Q..

108

(39)

van.ab\Q.~

1-\

1>

C

~ .

b

c..

_'Jo

t<

L

tI\

~

I(

_tj""

Vl

U

V

W

x

\'I~O

tl

?,bo

\).3 \

<p~~

9E,:

REM

"t~ON

ISO

THERMAL ABSO

RPTION"

98: RHl "STAGE C

ALCULATIONS"

lûO:K=J*EXP (WR

* (

1 /E -UT) )

102: 'l=K*X: N=N+1

104: W=l/L*Y/( 1-Y

)+V:X=W/(l+W

)

106: T=( 1->D*(U+1

/B,.."L:+:(C*T/(

1

-'y')+'y'*H/( 1-Y

» )

108:CiCiSUB 200:IF

Y>QGOTO 100

110:END

198:

RE~l

"SUBROUT

WE F'RItH"

200: Z=T-

I:

USmG

"UU.UU""

202:F'RINT

u ____ _ - - - _ _ _ _ _ _ 11

204:PRINT "X "iX

206:PRINT

uV

";Y

208:F'RINT "T

";l

210:RETURN

Ë

~

Ó

~

<j

~

3'1-~

₉

ij

r

~k

_i13.2

1(0

'P

Q

R

S

T

~

tj.,

8,31

T,ro

Z. T(°e..)

298:REM "INPUT"

300: "A"R=8.31:I=

273.2

302:INPUT "YO=";

D

304:INF'UT "TV=";

E:E=E+I

306:INPUT "XN=";

(i

308:INPUT "TN=";

P:P=P+I

310:INPUT "YN=";

G!

312: It·jPUT "L/V="

;L

314:INPUT "KO=";

.J

316:INF'UT "DH=";

H

318:INPUT "B=";B

320: mpUT "C="; C

(40)

38 398: REt'1 "PRELIMI

HAR'" CALCULA

TICiNS"

400:W=1/L*(D/(1-D)-Q/( 1-Q»+

1)/ (

1-('j) : X=W/

(l+W)

402:U=P/(1-0)+1/

B/L(CE/(1-D)-C*P/(1-Q)

+D*H/(l-D)-Q

*H/(l-Q»: T=

(l-;'O*U

404:U=T/(1-X)-1/

B/L(CE/(1-D)+D*H/(l-D)

)

406:V=X/(1-X)-1/

L*D/(l-D)

408:IF L*B/C<l

PRINT "LB/VC

TCiCi SMALL

11 :

STOP

410:K=J*EXP (H/R

*' (

1 ... E -1 /T) ) :

L,J=UK+:( 1-D)/

(1-:~):

IF W<1

PRItH "H~CRE

ASE

L .... V":

::

:

TCiP

412:Y=D:N=0:

GCiSUB 200

414:GCiTCi 100

top

-~

4u~d t-Q.~n~al-u\"Q.-

...

output-

O~

QXa.W\012.-on

V\<2Xt-

pagQ....

X

E,.27E-02

Y

5.00E-01

T 5.09E 01

;:<

4. 40E -02

Y 4.06E-Ol

T

4.81E 01

;<

2.41E-02

'y'

2. 67E-Ol

T

4.44E 01

:x:

1 •

05E -02

'l

1.34E-Ol

T

4.1:3E 01

::< 4.

20E

-03 'ï' 5.

52E -02

T 4.06E 01

::<

1 • 77E -03

'l

2.13E-02

T 4.01E 01

::< 9. 27E -04 Y

:3. '33E-03

T 3.99E 01

(41)

Exo.W\.~IQ-

-

U\(Jur:

Yv\.O.chL.V\<2.-

l.w

<lEf-

M.oda..;

~~~t-

A-yo

= .

5 ~a-r-l

() \

'T\J

~

40 ~rQX

J

gc',)

tQ..C.O

xt4

=.

.001

OMt",,}

I

'1l4

=.~o

QAl\.-t

JZ.r So

J~

\-~N

=

.01

0\,"tér

ck~~~ go~ Co~o~

Uv

.~

15 a.V\.

r-

(bIr

ra.

st.o

1\ • lM.QX

t-'I

~

ow

ro

h

a..)

K.O ::: 5

~QX

d~)r-~u.ko~ Q09?~.

o.t-

ï j

\))~

:::

1[~

~t~

k~~ o~ ~olu..hov-. ~k LJ/~l)

1 ,&

₌

₆₀

_QX\.tzr

~pec.

hi2at-

ll.~w.J

_b

CV~\

_Id

(42)

CoV\~t-at-LOV\- ptofJa-) ~r

dl-~~QÄt\,t- ~Î\l*' rui.ol~

0,0

O.Q..

%Q;

-

\'Y\~u.nu.YY) L/~ ~) o.ppro)(~at~

1'1.7!

~r

lOlVQ.r

vo.luc)

~

~yt-Q.rI\

(43)

41

(44)

4'2.

'bWuy

~"r- L~,,'W ~"aili,w.

~ ~~pl(2, go~w2-wlat

old

-rQ~lw~<Zd

tvtodJ.

~ot \lG2nJ a..ec.u.-ro~

, but- -J-

(1Qlf\.

~~~u!QtQ..

dl

t.a..

ÇQC.TLAyQ,~ o~

\-\()V\.-

~Q.O.L

Vo.pour--lLqWd

~u:~bn.a

wJ.k

Q

M~'-~uh't

()?

pro:-<jroM

~PQCQ,.

oç

ik

tro

~~~~

A

~

,

f+

~~

L

MQI'Q.-

\/olaiik.

%e-

\/o.p.ou.r

prC2-~~unz-~ o~

bo~ (loMPo~-t

roUow

Q!Clp~ro~~ ~u.Qf~:

p~

"P:

Qxp

[-~

1 p~ ~ p~

<2l<p

G

t ]

~~ ~ u~ o~ "Q.çor~)z..atolA-

qrQ..

~~(.LÇl.l

.

<Jk<2lj

<J.r1:2.-

ob

~

}?oM.

Tr~x.i\-o~~

I

blU

.

:

&

L~

=

ti _.-

15 1R..2,.

!\~)

~~tt?-

IA-

~T€> QrQ.-~

.

C.r~~p~ b~

po~"tr

. ~

k,l..)Q.y

"alu.a.-- (\{

)

l,s

{?ei-

t\D~

.

-pob-

m~~~

,

.

~

19hQr

fbt-

~~gl'-j

pobr

t

.

(~ Mo~t ~<l-~ Q~

'

Q.IJ<UO.SQ...

()~

\2-~~~~~W.)).

~(l, bo~ po~~ o~

4(V

Co~--t

at

rtk

~y~b pm-~~U)'l2., a~

1Ä

0

a~ T~

o .

A-t

(45)

\00

T

%J

6o~---I-43

,looi

IT

I&J

I

05Zeotro~

I

to

\---1-I

4 l . , r

-I

y

I

o

0

4 L +

-_ -_

~

_ _ _

X_I~

_0

_ _ _

x_l_

t'20

I

\'20

.

\00

T

1\00

z·"-;

80 _I

80

UVlI'Y\

U(U"u3

I _I

I

~

\0

boY"

1J

_"-

Iy

'7

I"

~

Wc1ler-

I'

OOVlZQ.V\Q,

buiänoL

f'l -

toIU01Q/

.

0

0 X

\

I

0 x

1

(46)

44 <Zgud,

5t-Q.W\. p~~u.\'12; p. ~:

PA

=

p <2Xp

t-t

(~-~)l

p;

=

pexPt-~(~~.;)]

ria-

htolQ;

.p-ocflOVÖ

~ -AQ.*

4u:..d

Otc:

X

A-

=-

X

o.Vt.d

Xe, ::

Cl

-

x)

~

hv

~Q.

vopou.r:

YA-

:.-

.

y

~

Ye,=

(I-y)

'Tor Ujrol

~n~xiü.l12-~

-thQ-

lew

~ 0~

r:tulto

v\.

Ü-Vld

~a.ou.Lt

o.pr/y

~

Pit ::

'.:lA- ()

=-

yp

PI?:: t3sfJ

= (I-Y)

P

o 0 0 \ 0

PA.:

XA-Pfl

=.

XP4\-

PB:

X~Pi':: (1-x_

;

r')~

ElL~4'Wt:o~ o~

-thQ,

pamaL

pre~!>uYl2-~ p~

o..vu:J

PB

~d ~~9

4A~ y~ld~:

(X~x

wJk

~

PAO

tj

~

1 _{+-({Xld_ l)}

X

ex. ::

p~o

1i..Q,

UJea.l

rJoruJ(2,

volatt-ts

cx.ld

l

,

~ QQ~

~koWV\

-tb

bQ.-

9..

~

oL 10 :

O(J~ 0<r[+~h(~-~o)l

~ot'" ~yct-Q.W\,~ ~""V\

-

~Q.Ota-~) ~

thv

(47)

45

'0.

%~ aëfi.~ ~

Vo\low

1ka..

Q-1i.o o~

VOlt\.

laar"" :

?)l:

~UI~))2]

Xe,

=

0<PK'

J~'ij]

.

\AJ~ A ~d ~

<ltt2-

nzloiód

10 1k

Qëik,~

eooff~

rit

~~

dJdio~ ~

A ::

kX:'

'b

=

kö:'

~

b.ra.

te

bl2-

obTh.~cuJ

.{kW\

~OO)~YQ..-""'~

Or

llitarcitü.~,

~(2, ~"'

kt:,aa.l'\.

Y

~

X

L~

t\.Ow

~

Cl()(

y - _

.

-

'~((x-l)

X

wUk

(48)

~Q. ~t a1~ o~ ~

kt\odcJ

~~

tl(L

.

· oo.lCLJ~,

or

-\la.-

~arot\'U.;. ~~ l,~

ob-iä.~ad ~\.

.

a.

~~~a.d QlQP~ro'" ~u.a.t~V\:

PA

=

YP

:0

xl\RP (/)<P

~~( ~

-

~o)J

98: ":E~l "BINARY "lAPOUR

LIQUI

D EQUILIBRIA

"

100:

"A"Q=273.

16:

R=8.314 102: H1PUT "TA=";

v:

\o'='\,'+G! 104: HlPUT "TB="; 1.0.1: ~l=~~+Q

10E.:H=6*<1ol+'v')

108:

nWUT ' "TAO="

; s:

S=~3+~~

110:

HlPUT "TBO="

; u:

U=U+G! 112: IHPUT

"A=";A

114: HlPUT "B="; B 116: "B" IHPUT "><:= 11 ; ::.:: 11::::IF A=OLET D= l:E=l:GCiTO 1 32 120:IF B=OLET D=

l:E=l:GOTO 1

32 122:IF X=OLET D= E>~P A: E=1: GOTt) 132 124: IF ~-O:=1LET D= 1: E=E>~P B: GOTO 132

126:C=1/(1+A*X/(

B:f: (1->D») 12:::: II=D:;P

(ACC

) 130: E=E~'<P

<B:+:(1-C>*(l-(:»

132: F=E:X:P

(H*(

1/

S-l/lj) ;.

134: G=II/E:+:F 136:

'ï'=G*:X:

,

"'(

l+(G-Ul Cr',·"D/X» 140: T=T-G! 142: IY3IHG "lUl.1Ut #": PF.:ItH "'-(= 11 ; 'l; US I t~G 11# ###.#";" T=II