hfields_zero

INTERFACE:

   subroutine hfields_zero (t)

DESCRIPTION:

   Zero out accumulation and history buffers for a given history tape.
   Loop through fields on the tape.
   !USES

ARGUMENTS:

     implicit none
     integer, intent(in) :: t     ! tape index
   !REVISION HISTORY
   Created by Mariana Vertenstein