anchor.diff:  ! File: anaxv.f90
   !
   ! This file is part of the SpanLib library.
  -! Copyright (C) 2012  Stephane Raynaud
  +! Copyright (C) 2012-2015  Stephane Raynaud
   ! Contact: stephane dot raynaud at gmail dot com
   !
   ! This library is free software; you can redistribute it and/or
  
positive.code:         write(11) t(it), igap, zx
      end do
      close(11)
      
  end subroutine write_anaxv_field
  
  
  subroutine read_anaxv_field(fname, t, x, ns, nt, mv)
  
      implicit none
      
      ! Declarations
      ! - external
      integer, intent(in) ::  ns, &       ! Spatial (channel) dim
  
negative.code:         end if
      end do
      close(11)
  
  end subroutine read_anaxv_field
  
  
  