write_b1rs Subroutine

public subroutine write_b1rs(b1rs, map)

writes mapping of magnetic field at a point to the solar surface

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(inout)			::	b1rs(0:N_R,0:N_THETA,0:N_PHI,2)
integer,	intent(in)			::	map(0:N_R,0:N_THETA,0:N_PHI)