fixed bug so ejected melt fraction is actually written

MintonGroup · Mar 1, 2023 · 2213977 · 2213977
1 parent 84ae0d5
commit 2213977
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/io/io_write_regotrack.f90 b/src/io/io_write_regotrack.f90
@@ -109,7 +109,7 @@ subroutine io_write_regotrack(user,surf,domain)
          write(FAGE) age(:,:)
          write(FMD) distvol(:,:)
          write(FEJM) ejm(:)
-         !write(FEJMF) ejmf(:)
+         write(FEJMF) ejmf(:)
          write(FMF) meltfrac(:)
          write(FDF) meltdist(:,:)
          deallocate(meltvolume,thickness,comp,age,distvol,ejm,ejmf,meltfrac,meltdist)