restart_accum

INTERFACE:

   subroutine restart_accum (nio, flag)

DESCRIPTION:

   Read/write accumulation restart data

USES:

     use decompMod, only : get_proc_bounds, get_proc_global
     use iobinary
 #if (defined SPMD)
     use spmdMod, only : mpicom, MPI_CHARACTER, MPI_INTEGER
 #endif

ARGUMENTS:

     implicit none
     integer, intent(in) :: nio             !restart unit
     character(len=*), intent(in) :: flag   !'read' or 'write'

REVISION HISTORY:

   Created by Mariana Vertenstein