Prediction of batch heat transfer coefficients for pseudoplastic fluids ...

3 REAL). N. ti •• D
4 cN=N
E'I'1 = [·1
SX=Lo.
'SY=W.
SXY-o.
SX2=,O.
Sy2=O.
D051=1.N
--~---RE·AtS'.~TE:lqp~ SHST. RPtC---------
Z= ~209*RPI'l/D
SX2=SX2+X*X
5 SV2=SV2+V*V
XBAR=SX/EN
YEIAR-SY7EN
'j
i
---~------,~-~--- ---------------,5"'0"'o",.-+\
.. , -------------~ --------------:S=-C=-=-O-li
500
500
500
~. ---- -·--·------~-~-----------;=5-;;:0-;;:O-l
500
.... - ..... -------------1
W=ShST/Z ------------.---------------------------------------~;
PUNCH. TEji,P. r.(Pf.1. Z. Vi
----·X- .4343*LOG IZ)
Y=.4343*LOGISHST)
--,------ -SX=SX+X
SY=SY+Y
SXY=SXYtX*V
6
CX2=SX*SX/E"!
ex,' -:3X*S i ; EO!'"
VX2=SX2-CX2
VXy=SXY-CXy
d=VXY/VX2
A=YL,AR-8*xaAR
C=SXY/Sx2
R=
~------... -, ,--_ .... -_ ...
7
8 S2SX=IEN*SX2-SX*SX)/IEN*CEN-l.) I
S2SY-IEN*SY2-~y*SYI)(EN*C~N I.})
YGX=IIEN-l.I/(EN-2.»*CS2SY-d*O*S2SX)
SYGX-YGx**.S
se=SYGX/I(S2SX*IEN-l.)I**.51
!F(B)9.10.1C ·__ n ---- ~oo
~~~ I'
500
500 I
~~~ I
~oo (
5'00 !
50
500 1
500 '
500 I
----.------------~
500
500
9 i3A=-B 500
;,a GO TO II SOo
' ,7 ( 10 BA=8 500
~'6 --·!·1-·....,.-:s-A"'/"'s"8:r-------------·---- -- 500
15 IFIT)12t!3.13 500
I ,'· 12 TA=-T 500
1~'
12 14 DF 2=EN-2. 500
'\
500 {
___________ ~~G~O~~T~O---1-4----------------------~-----------------------------------------______ ~5~0~,O~
13 TA-t 500
(
,'1 ( SEX- ( !Sx2-Sx*Sx7ENj7 tEN I. I )**.::>
':
SEY.=((Sv2-SY*SY/EN)/(EN-l.)I**.S
1 1''-'" xK=IQ**A
'76el.____\ __ ~P~U~N~C~H~.~T~E~M~P~.~8~.~.~X~K~----------------________________________________________________________ __
POi