S kernel bugfix

[kasra-hosseini]

@EoghanTotten reported the following fixes: (@harriet-godwin and @sstaehler, would you please confirm these changes?)

mc_kernel/src/readfields.f90

Lines 1294 to 1296 in 9c534a9

	load_fw_points(:,:,ipoint) = rotate_symm_tensor_voigt_src_to_xyz( &
	load_fw_points(:,:,ipoint), &
	source_params%lon, this%ndumps )

should be changed to:

load_fw_points(:,:,ipoint) = rotate_symm_tensor_voigt_src_to_xyz( &
                                          load_fw_points(:,:,ipoint),        &
                                          rotmesh_phi(ipoint), this%ndumps    )

and

mc_kernel/src/readfields.f90

Lines 1456 to 1457 in 9c534a9

	load_bw_points(:,:,ipoint) = rotate_symm_tensor_voigt_src_to_xyz(load_bw_points(:,:,ipoint), &
	receiver%lon, this%ndumps)

to:

load_bw_points(:,:,ipoint) = rotate_symm_tensor_voigt_src_to_xyz(load_bw_points(:,:,ipoint), &
                                          rotmesh_phi(ipoint), this%ndumps)

[sstaehler]

Yes, sounds reasonable to me. @harriet-godwin, do you agree?

[harriet-godwin]

Yes this is the rotation fix that I found a while ago and is correct

[esleokan]

I tested a simple SKS kernel at 100º distance in radial component. Now the S kernel shows the expected negative sensitivity in the first Fresnel zone.