########################################## **The mag_common modules and programs** ########################################## **Module mag_transform** ====================================== **Module : mag_transform** **Purpose : coordinate transformations** .. function:: rotate_x (theta) result (M) Set up the matrix for rotating about the x axis function :param theta: rotation angle about the x axis -- real(WP), intent(in) :rtype M(3,3): rotation matrix -- real(WP) .. function:: rotate_y (theta) result (M) Set up the matrix for rotating about the y axis function :param theta: rotation angle about the y axis -- real(WP), intent(in) :rtype M(3,3): rotation matrix -- real(WP) .. function:: rotate_z (theta) result (M) Set up the matrix for rotating about the z axis function :param theta: rotation angle about the z axis -- real(WP), intent(in) :rtype M(3,3): rotation matrix -- real(WP)