Output E, B and V from the A form input file

farscape-project · Aug 29, 2024 · bde5a41 · bde5a41
1 parent 7d1057a
commit bde5a41
Showing 1 changed file with 37 additions and 0 deletions.
diff --git a/input/AForm.i b/input/AForm.i
@@ -15,6 +15,18 @@
     family = LAGRANGE
     order = FIRST
   []
+  [Vt]
+    family = LAGRANGE
+    order = FIRST
+  []
+  [E]
+    family = NEDELEC_ONE
+    order = FIRST
+  []
+  [B]
+    family = NEDELEC_ONE
+    order = FIRST
+  []
   [P]
     family = MONOMIAL
     order = CONSTANT
@@ -56,6 +68,27 @@
 []
 
 [AuxKernels]
+  [V(t)]
+    type = ParsedAux
+    variable = Vt
+    coupled_variables = V
+    use_xyzt = true
+    expression = sin(${voltage_wfrequency}*t)*V
+    execute_on = timestep_end
+  []
+  [E]
+    type = VectorTimeDerivativeAux
+    variable = E
+    coupled_vector_variable = A
+    coeff = -1
+    execute_on = timestep_end
+  []
+  [B]
+    type = CurlAux
+    variable = B
+    coupled_vector_variable = A
+    execute_on = timestep_end
+  []
   [P]
     type = JouleHeatingAux
     variable = P
@@ -91,6 +124,10 @@
   num_steps = 1
 []
 
+[Outputs]
+  exodus = true
+[]
+
 [MultiApps]
   [VLaplace]
     type = FullSolveMultiApp