Commits

John Wise  committed 69baa7c

Too anxious... forgot a multiplication.

  • Participants
  • Parent commits c93b567

Comments (0)

Files changed (1)

File src/enzo/cool1d_sep.F

                metalc(i) = metalc(i) - metalc_cmb
 
                xi = min(3.d0, metal(i,j,k)/(d(i,j,k)*ZSOLAR))
-               edot(i,18) = -metalc(i) * d(i,j,k) * d(i,j,k)
+               edot(i,18) = -metalc(i) * d(i,j,k) * d(i,j,k) *
      $              (xi/JHW_METALS_NORMZ)
 #ifdef UNUSED
                if (xi .gt. 1e-06) then