plot[y=1/2(1+x)+1/2|(1-x)|*sin(pi/(x+1))), y=-(1/2)(1+x)+1/2|(1-x)|*sin(pi/(x+1)), {x,-1,1}]