3600 RAD2DEG*acos($psp_xyz_hee[0]/sqrt($psp_xyz_hee[0]*$psp_xyz_hee[0]+$psp_xyz_hee[1]*$psp_xyz_hee[1]))*Sign(-$psp_xyz_hee[1])