fix missing declarations

jonathanschilling · Dec 5, 2023 · 8ae37b4 · 8ae37b4
1 parent 20e1241
commit 8ae37b4
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/NESTOR/belicu.f90 b/src/NESTOR/belicu.f90
@@ -26,6 +26,9 @@ SUBROUTINE belicu(torcur, bx, by, bz, cos1, sin1, rp, zp)
   REAL(rprec) :: current
   INTEGER :: i, j, kper, kv
 
+  REAL(rprec) :: L, Ri, Rf, Ri_p_Rf, Bmag
+  REAL(rprec), dimension(3) :: dvec, xpt, Ri_vec
+
   real(rprec), dimension(3, nuv2) :: eval_pos, magnetic_field
 
   ! If .true., use ABSCAB for computing the magnetic field contribution