anchor.diff:  deallocate(phiMin)
   call Delete(timekeeper)
   call Delete(remesh)
  -if ( procrank == 0 ) call Delete(vtkOut)
  +if ( procrank == 0 ) then
  +	call Delete(vtkOut)
  +	call Delete(vtkMeshOut)
  +endif
   call Delete(sphere)
   call Delete(testCaseTracer)
   call Delete(exeLog)
  
positive.code: 		call LogMessage(exelog, TRACE_LOGGING_LEVEL, 'day = ', t/ONE_DAY)
  
  		write(vtkFile, '(A,I0.4,A)') trim(vtkRoot), frameCounter, '.vtk'
  		call UpdateFilename(vtkOut, vtkFile)
  		call VTKOutput(vtkOut, sphere)
  
  		frameCounter = frameCounter + 1
  	endif
  
negative.code: !
  ! output variables
  !
  type(VTKSource) :: vtkOut, vtkMeshOut
  character(len = MAX_STRING_LENGTH) :: vtkRoot, vtkFile, vtkMeshFile, outputDir, jobPrefix, dataFile, summaryFile
  character(len = 56) :: amrString
  integer(kint) :: frameCounter, frameOut, readWriteStat
  type(OutputWriter) :: writer
  