################################################################################
#                                                                              #
# DO NOT MODIFY this file (unless you are sure what you are doing).            #
# This is only a helper file!                                                  #
#                                                                              #
################################################################################
#                                                                              #
# This file interpolates raw 3D magnetic field data (all three components) to  #
# the calculation grids (p/lat/lon_grid) for 1D or 3D atmosphere output.       #
#                                                                              #
# This file expects the following input parameters:                            #
#   p_grid             as the WSV                                              #
#   lat_true           as the WSV                                              #
#   lon_true           as the WSV                                              #
#   mag_u/v/w_raw      (GriddedField3) raw versions of mag_u/v/w_field         #
#   interp_order       (Index)         Grid interpolation order                #
#   auxfield_zeropad   (Index)         Flag, whether to fill magfield at       #
#                                       non-covered profile regions with zeros #
#                                                                              #
# Output:                                                                      #
#   mag_u/v/w_field    as the WSV                                              #
#                                                                              #
################################################################################

Arts2 {

# do the interpolation/regridding separately for each magfield component
GriddedFieldLatLonRegrid( out=mag_u_raw, in=mag_u_raw )
GriddedFieldPRegrid( out=mag_u_raw, in=mag_u_raw, zeropadding=auxfield_zeropad )
FieldFromGriddedField( out=mag_u_field, in=mag_u_raw )

GriddedFieldLatLonRegrid( out=mag_v_raw, in=mag_v_raw )
GriddedFieldPRegrid( out=mag_v_raw, in=mag_v_raw, zeropadding=auxfield_zeropad )
FieldFromGriddedField( out=mag_v_field, in=mag_v_raw )

GriddedFieldLatLonRegrid( out=mag_w_raw, in=mag_w_raw )
GriddedFieldPRegrid( out=mag_w_raw, in=mag_w_raw, zeropadding=auxfield_zeropad )
FieldFromGriddedField( out=mag_w_field, in=mag_w_raw )

}