module magfield

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

end module