initialize crystal_core_boundary_mass to -1

Author: pmocz

star/private/init.f90

@@ -744,7 +744,7 @@ subroutine set_starting_star_data(s, ierr)
          s% len_extra_iwork = 0
          s% len_extra_work = 0
 
-         s% crystal_core_boundary_mass = 0d0
+         s% crystal_core_boundary_mass = -1
          s% phase_sep_mixing_mass = -1
 
          call init_random(s)