module magfield

   use bmad
   type magfield_struct 
      real(rp) x(3), B(3), H
   end type

end module