{VERSION 6 0 "IBM INTEL NT" "6.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Headi ng 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 4 1 0 1 0 2 2 0 1 }{PSTYLE "Heading 2" -1 4 1 {CSTYLE "" -1 -1 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 2 1 0 1 0 2 2 0 1 }{PSTYLE "Title" 0 18 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 1 0 0 0 0 0 0 0 }3 0 0 -1 12 12 0 0 0 0 0 0 19 0 }} {SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT -1 7 "6. test" }}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 1 "1" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "re start;" }}}{SECT 0 {PARA 4 "" 0 "" {TEXT -1 4 "Data" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "m:=1500; g:=9.81; A:=4*0.1*0.2;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "Tt:=0.01+273.15; pt:=611; DHt:=6009 ;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "rhol:=1000; rhos:=917; M:=0.018;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{SECT 0 {PARA 4 "" 0 "" {TEXT -1 6 "\330e\232en\355" }}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 23 "DVt:=M*(1/rhol-1/rhos);" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 10 "Dp:=m*g/A;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "p2:=pt+Dp;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "r:=p2-p t=DHt/DVt*ln(T2/Tt);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "T2: =fsolve(r);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "t2:=T2-273.1 5;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 1 "2" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "re start;" }}}{SECT 0 {PARA 4 "" 0 "" {TEXT -1 4 "Data" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "p:=10.^(7.196210-1730.63/(t+233.426));" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "vlhkost:=0.6; t1:=22;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{SECT 0 {PARA 4 "" 0 " " {TEXT -1 6 "\330e\232en\355" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "p1:=vlhkost*subs(t=t1,p);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "fsolve(p=p1,t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 " " }}}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 1 "3" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{SECT 0 {PARA 4 "" 0 "" {TEXT -1 4 "Da ta" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 77 "pp:=10.^(5.928880-803. 81/(t+246.990));\npb:=10.^(5.933860-935.86/(t+238.730));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "t:=25.;" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 15 "Mp:=44; Mb:=58;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "wp:=0.7; wb:=1-wp;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{SECT 0 {PARA 4 "" 0 "" {TEXT -1 6 "\330e\232en \355" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "yp:=wp/Mp/(wp/Mp+wb/ Mb); yb:=1-yp;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "p:=1/(yp/ pp+yb/pb);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "xp:=p*yp/pp; \+ xb:=1-xp;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "wxp:=xp*Mp/(xp *Mp+xb*Mb); wxb:=1-wxp;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 " " }}}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 1 "4" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{SECT 0 {PARA 4 "" 0 "" {TEXT -1 4 "Da ta" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "KHO:=4399.6e6; KHN:=86 79.3e6;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "t:=25; p:=100e3; yO:=0.21; yN:=1-xO;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }} }}{SECT 0 {PARA 4 "" 0 "" {TEXT -1 6 "\330e\232en\355" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "pN:=p*yN; pO:=p*yO;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "xN:=PN/KHN; xO:=pO/KHO; " }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 16 "xxN:=xN/(xN+xO);" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 16 "xxO:=xO/(xN+xO);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}}}{MARK "4" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }