|
Kategorie: Kniha |
Tento dokument chci!
Publikace zpracovává teorii ventilačních a tepelných výpočtů elektrických strojů točivých včetně problematiky měření, zkoušení a modelování. V závěru se probírají výzkumné a vývojové problémy chlazení, ventilace a hluku elektrických strojů točivých. Kniha je určena výzkumným a vývojovým pracovníkům, inženýrům, konstruktérům a dalším pracovníkům z oblasti konstrukce elektrických strojů.
Strana 366 z 442
«
Vámi hledaný text obsahuje tato stránku dokumentu který není autorem určen k veřejnému šíření.
»
Jak získat tento dokument?
Poznámky redaktora
02? .2>2Xj4HALC
6=j1F8.»(DID+BCU)+Y
IF(ZZ.1////)
107 FORMAT(1H1//5Xj 92HV S
IT E//>
PI=3.2//5Xj4HBCU=j1F7.3
IF(YA.5-HD
TAUJ=PI*(D-HJ)/AND
364
. Program výpočtu oteplení vinutí podle algoritmu uvedeného 61.0E-3
ALVZ=2.0052».014*.0t5».5*AM*HCU/Z<Y*(0.3j0.36j0»29jO.033j.)Y=0.021,.2j2Xj3HXK=j1F8.15/»
4 F'PC/5*0.*BID-(Z-l.001>.21j0.M2.
FF=0.0j2Xj3HWJ=j1F8.2j2Xj4HQ =j1F7. 12.023j.0E-3
AL.2.15»0.32
IF(YA.1j2Xj4HXP =>1F7.)Y=0.8
ALI=2.1
LIST(LP)
PROGRAM(FVAX)
INPUTlr(MONITOR)=TR0
OUTPUTS*(MONITOR)=LP0
COMPACT
COMPRESS INTEGER AND LOGICAL
TRACE2
END
MASTER TEPVY
DIMENSION R(26)»W(10rll)»WV(10)jPPA(14>jPPB(14>jPPC(14)
lrlWÚO)
ALCU=3.034j.20.0*2Xj4HB «=j1F7.8E-4
AAAJ=5.Q27j .
22>2Xr4HAI =ílF7.0j2Xj3HAN=j1F8.05/
REAB(1j2002)(WV(J)jJ-1j6)
2002 FORMAT(ÓA8)
READ(1rl05)VHjQjACjANPjXPjXKjPDjSIjAIíPC2jDICjFV>WZ»WJjPPjBtBIj
ITPjANDjBDjHDjBCUjHCUiDV.5
BC=Z*BCU+2.35j0.4j2Xj4HSTR”,1F7.2ř2Xf4HPM =j1F7.055»4*0.43jO.2001)VHjQjACjANPjXPjXKjpDjSljAIjPC2jDICiPyjHZjWJjPP»IijDIf
ITPjANDíBDjHDjBCIJjHCUjDVíALCjDIPiUjAN
2jR1jSTR
2001 FORMAT(5X»4HUH =,1F7.GT.2i2X»3HU =,1F8.1j2Xj4HANP=j1
1F8.20.026j .)
GGG=HC+BC
TAU=PI*D/AND
B1=PI*DI/ANB-BB
B2=PI*(DI+HD)/AND-BB
HJ=(D-DI)*.*DIC+Y*(Z-l.LE.5
ALFEK=0.ALCjDIDjUjAN
2jR1jSTR
105 FORMAT(30F0.
ZZ=2.0j2Xí4HDIC=rlF8.1j2Xí4HPC2=rlF7.031j.BD)Z=2.29*0.5*AM/Z-1.2X,4HHQU=í1F7.27j4*0.2j2Xj3HH
5D=j1F8.1,2Xi3HPD=j1F8.07j0.022j .0174».)Y=0.011
DATA /.24j0„2j0.008».032j
2.1.024t.0135f.2j2Xj4HBV =j1F7.17*4*0.1415926535
AM=U*AN
YA=BCU*HCU-
IF(YA.1j2Xj
44HDI =j1F7.012f.>*Y>
HC=.0»
32Xj3HWZ=p1F8.5*(BB-Z*BCll-2.028j .0)
WRITE(2j107)
WRITE(2j1000) (WV(J)jJ=1j6)
1000 FORMAT(5Xr 7HZABAL ,A8j8Xj 8HTELEF0N jA8 DNE r2A8j2X»10
1HTYP STR0JE>2Xj2A8///36Xj24HV //)
WRITE(2.Tabulka 20.0//5X?4HPP =j1F7.1»0.0j2Xj3HBB=j1F8.01».03j.5j0.25/j
4 PPB/5*0.*DIC
A=AM*YA*0.l//5Xf4HS1 =»1F7.FER=0.025j .6.37
Z=l.LE.0185i
1.035/j
3 PPA/6*0.1j2Xj4HAC =j1F7.1»2Xj4HTP =j1F8.LE.5*HCU*AM/Z+Y*(AM*.5/Z-1.2Xj4HDID=p1F7.41j0.Q29» .0//5X»4HR1 =j1
7F7.)-tDIB
DVZ=0.1j2Xj4HAND=j1F7
