diff --git a/Superconductors/helix.pro b/Superconductors/helix.pro
index 426d1756794288a71935fb2ef776d3c83adee17f..7034442634e8a2756f1524a9976d98c7fa1b69a8 100644
--- a/Superconductors/helix.pro
+++ b/Superconductors/helix.pro
@@ -92,7 +92,8 @@ Function {
              CompZ[$1] * CompX[$1], CompZ[$1] * CompY[$1], CompZ[$1]^2];
 
   // test: source magnetic flux density
-  DtBs[] = hsValue * mu0 / Scaling * Sin_wt_p[]{2*Pi*Freq, 0.} * Vector[1,0,0];
+  DtBs[] = hsValue * mu0 / Scaling * 2 * Pi * Freq *
+           Sin_wt_p[]{2*Pi*Freq, 0.} * Vector[1,0,0];
 }
 
 Jacobian {
@@ -191,7 +192,7 @@ Formulation {
         In Omega; Integration Int; Jacobian Vol;  }
 
       If(sourceField)
-        Galerkin { [ -DtBs[] * Normal[] , {dInv h} ];
+        Galerkin { [ DtBs[] * Normal[] , {dInv h} ];
           In BndInf; Integration Int; Jacobian Sur;  }
       EndIf