|
Using JUMP in problems with many variables
|
Previous Top Next |
| TITLE 'Contact Resistance as a heat source'
|
| VARIABLES
|
| Phi { the voltage }
|
| Temp { the temperature }
|
| DEFINITIONS
|
| Kd = 1 { dielectric constant }
|
| Kt = 1 { thermal conductivity }
|
| R = 0.5 { blob radius }
|
| Q = 0 { space charge density }
|
| Res = 0.5 { contact resistance }
|
| EQUATIONS
|
| Phi: Div(-kd*grad(phi)) = Q
|
| Temp: Div(-kt*grad(temp) = 0
|
| BOUNDARIES
|
| REGION 1 'box'
|
| START(-1,-1)
|
| VALUE(Phi)=0 { grounded outer walls }
|
| VALUE(Temp)=0 { cold outer walls }
|
| LINE TO (1,-1) TO (1,1) TO (-1,1) TO CLOSE
|
| REGION 2 'blob' { the embedded blob }
|
| Q = 1 { space charge in the blob }
|
| START 'ring' (R,0)
|
| CONTACT(phi) = -JUMP(phi)/Res
|
| { the heat source is the voltage difference times the current }
|
| NATURAL(temp) = -JUMP(Phi)^2/Res
|
| ARC(CENTER=0,0) ANGLE=360 TO CLOSE
|
| PLOTS
|
| CONTOUR(Phi) SURFACE(Phi)
|
| CONTOUR(temp) SURFACE(temp)
|
| END
|