Oteplení vodiče průchodem elektrického prouduProveďte termoelektrickou analýzu pole neizolovanéhoocelového vodiče délky 5 cm a poloměru 1 cm. Vodič máresistivitu 200 nWm, tepelnou vodivost Tv = 13 W/(mK) aprochází jím proud I = 25 A. Povrchový součinitelkonvekce (přestupu tepla) mezi vodičem a vzduchem jeh = 25 W/m2K. Je-li teplota okolí To = 20°C, určete tepelnéztráty tepla q a vypočtené pole zobrazte.
Select, Entities, Areas, pick/ num zadáme 3.
Hustotu sítě řídíme omezením velikosti prvku ESIZE celém prostoru síť zjemníme okolí
křivky počtem úseků křivkách definujících tyto oblasti LESIZE.
Procesor (solution)
Pro řešení úlohy potřeba nastavit Dirichletovu okrajovou podmínku hranici oblasti pro
elektrické pole.
Modeling, Operate, Calc Geom Items, Areas,
Parameters, Get Scalar Data, Model Data Areas,
Name Plast, Areas, Areas, OK.
Preprocesor, Coupling Ceqn, Couple DOFs, pick all, NEXT, VOLT, OK.
Mesh Tool, Size Control, Global Set, postupně zadat ESIZE 0.
Select Everything.001.
Pro stanovení požadovaných veličin provedeme výpočet velikostí ploch podstavy pláště.
Select Everything.
Select, Entities, Areas, pick/ num zadáme Select, Entities, Nodes, Attached Areas,
OK.
.
Postupně plochy vybereme vypočteme jejich velikost
Select, Entities, Areas, pick/ num zadáme 1.
Modeling, Create, Volumes, Cylind, dimensions, rad1 rad2 theta1 theta2
= 90.
Loads, Define Loads,
Apply, Electric, Boundary, Voltage, Areas, zadáme plochu hodnotu 0.
Parameters, Get Scalar Data, Model Data Nodes, Name Nmin, Node, Next highest
node, OK.
Pro vytvoření sítě konečných prvků dále stanoví hustota sítě požadavek tvar sítě.
Zjemnění sítě vybrané křivce
Mesh Tool, Size Control, Lines Set, zadat vybrané křivce ndiv 15.Modelování elektromagnetických polí 3
Zadání geometrie modelovaného problému, vygenerujeme jednu čtvrtinu válce.
Nastavení tvaru sítě
Shape aktivní parametr Hex, Sweep, vygenerovat síť příkazem Sweep (generuje prostorová
síť).
Solution, Loads, Define Loads, Apply, Electric, Excitation, Current, Nodes Nmin, 25,
OK.
Velikost plochy získáme příkazem
*STATUS, Postava (7,85398 e-5).
Operate, Transfer FE, Constraints okrajová podmínka přenesena všech uzlů na
ploše.
Modeling, Operate, Calc Geom Items, Areas,
Parameters, Get Scalar Data, Model Data Areas,
Name Podstava Areas, Areas, OK
