plot[arccos(|sin(|x|)|)/arcsin(cos(x)),{x,-4,4}]