Fixed bug in which central body mass wass computed incorrectly from G…

…*mass
MintonGroup · Jun 15, 2021 · 63ad803 · 63ad803
1 parent 6ee560b
commit 63ad803
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/io/io.f90 b/src/io/io.f90
@@ -740,7 +740,7 @@ module subroutine io_read_cb_in(self, config)
          open(unit = iu, file = config%incbfile, status = 'old', form = 'FORMATTED', iostat = ierr)
          read(iu, *, iostat = ierr) val 
          self%Gmass = real(val, kind=DP)
-         self%mass = real(val / config%GU * val, kind=DP)
+         self%mass = real(val / config%GU, kind=DP)
          read(iu, *, iostat = ierr) self%radius
          read(iu, *, iostat = ierr) self%j2rp2
          read(iu, *, iostat = ierr) self%j4rp4