-
Notifications
You must be signed in to change notification settings - Fork 1
/
AForm.i
102 lines (93 loc) · 1.67 KB
/
AForm.i
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
!include Parameters.i
[Mesh]
[]
[Variables]
[A]
family = NEDELEC_ONE
order = FIRST
[]
[]
[AuxVariables]
[V]
family = LAGRANGE
order = FIRST
[]
[P]
family = MONOMIAL
order = CONSTANT
[]
[]
[Kernels]
[curlcurlA_coil_target]
type = CurlCurlField
variable = A
coeff = ${copper_reluctivity}
block = 'coil target'
[]
[curlcurlA_vacuum]
type = CurlCurlField
variable = A
coeff = ${vacuum_reluctivity}
block = vacuum_region
[]
[dAdt_target]
type = CoefVectorTimeDerivative
variable = A
coeff = ${copper_econductivity}
block = target
[]
[dAdt_coil_vacuum]
type = CoefVectorTimeDerivative
variable = A
coeff = ${vacuum_econductivity}
block = 'coil vacuum_region'
[]
[gradV]
type = CoupledGrad
variable = A
coupled_scalar_variable = V
function = ${copper_econductivity}*sin(${voltage_wfrequency}*t)
block = coil
[]
[]
[AuxKernels]
[P]
type = JouleHeatingAux
variable = P
vector_potential = A
sigma = ${copper_econductivity}
block = target
execute_on = timestep_end
[]
[]
[BCs]
[plane]
type = VectorCurlPenaltyDirichletBC
variable = A
boundary = 'coil_in coil_out terminal_plane'
penalty = 1e14
[]
[]
[Executioner]
type = Transient
solve_type = LINEAR
petsc_options_iname = -pc_type
petsc_options_value = cholesky
num_steps = 1
[]
[MultiApps]
[VLaplace]
type = FullSolveMultiApp
input_files = VLaplace.i
execute_on = initial
clone_parent_mesh = true
[]
[]
[Transfers]
[pull_potential]
type = MultiAppCopyTransfer
from_multi_app = VLaplace
source_variable = V
variable = V
[]
[]