remove trailing semicolons

MESAHub · Dec 5, 2023 · 8abfe95 · 8abfe95
1 parent e390304
commit 8abfe95
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/neu/private/mod_neu.f90 b/neu/private/mod_neu.f90
@@ -711,7 +711,7 @@ subroutine phot_neu(sphot,sphotdt,sphotdd,sphotda,sphotdz, input)
 
          ! sin/cos (5 fac1 tau)
          sin5 = sin1 * (5.0d0 - sin1 * sin1 * (20.0d0 - 16.0d0 * sin1 * sin1))
-         cos5 = cos1 * (cos1 * cos1 * (16.0d0 * cos1 * cos1 - 20.0d0) + 5.0d0);
+         cos5 = cos1 * (cos1 * cos1 * (16.0d0 * cos1 * cos1 - 20.0d0) + 5.0d0)
 
          last = cos(fac2*tau)
          xast = sin(fac2*tau)
@@ -1047,7 +1047,7 @@ subroutine brem_neu_liquid_metal(sbrem,sbremdt,sbremdd,sbremda,sbremdz,t8, input
 
          ! sin/cos (5 u)
          sin5 = sin1 * (5.0d0 - sin1 * sin1 * (20.0d0 - 16.0d0 * sin1 * sin1))
-         cos5 = cos1 * (cos1 * cos1 * (16.0d0 * cos1 * cos1 - 20.0d0) + 5.0d0);
+         cos5 = cos1 * (cos1 * cos1 * (16.0d0 * cos1 * cos1 - 20.0d0) + 5.0d0)
 
 
    !..equation 5.21