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