06.03.2014 Views

paraffin wax deposition and fouling

paraffin wax deposition and fouling

paraffin wax deposition and fouling

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

C<br />

C<br />

C<br />

SJtcLiJTINE TPC1F<br />

C<br />

LIfr:NSILN FT( ii) ,VISL)<br />

C0!-ON Z1,ZZ,Z3,Z4,l,76,L7,7Z9,Z10,Z11?Z12,Z13,Z147VIsWSI ?Z16,Z<br />

l1T,Z18,Zl9,Z0,Z?1,Z?2,UP,YP,TP,VIS,PR,UT,J,T<br />

REAL N,K<br />

INIECER YA<br />

N0.1L4<br />

K)36<br />

7Y,YC,YD<br />

C<br />

iFiYPLEYP1) GUTO 10<br />

IF(YPC70) TP1TP<br />

TP(1.0/K)’AL0G(YP/YPl)+TP1<br />

GOTO 30<br />

C I—J<br />

C<br />

C<br />

10 YA-I TX(Yt )‘i0+1<br />

Y3=LFIX(YP)±1)*10+l<br />

‘fDzzO<br />

IJR=UP—U--U-FLflAT(YD)/1O.O<br />

i’ r;o YC=’fA,Y8<br />

YPFLOAT(YCJ)/lQ.O<br />

YCYD+1<br />

(PYP—10<br />

IT(YP.LE.’.0) UR=YP<br />

C<br />

C<br />

flB’l .0—EXF (Ai)<br />

i-TP (Y[)=( 1 .oIp+ 2:-uRyp’eB<br />

)‘<br />

0 C0TINUE<br />

YD-0<br />

V C) • 0<br />

rfl<br />

30 I2,l0,Z<br />

[vE=EVN÷FTP( I)<br />

30 CTI1U<br />

(—1)

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!