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 />

SUPROUTINE FF<br />

L11:NS1C’N F(2)<br />

INTEGER SR<br />

C04EN Zi,Z2,Z3,Z4,75,RE,SR,Z8,Z9,Z10,Z11,Z12,Z13,Z 14,Z1 ,Z16,Z17,<br />

iZid ,Ll),CF<br />

IF(SR.E).H GflTO 10<br />

C<br />

C<br />

GOTO 40<br />

10 (1)=0.01<br />

20 I-(a)13L2*ALOCl0((RE)/(F(i)<br />

IF((c(F(1)—F(2));E)*o.’5).Lrao,oo1) GiTO 30<br />

F(1)-F(a)<br />

GOTO 20<br />

30 CF=F(2)<br />

40 RiT-E(6,100) CF<br />

100 roRMAT(1uo,1oX,2H:p,ax,r1o6)<br />

RETU.U’J<br />

E Ni)

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

Saved successfully!

Ooh no, something went wrong!