Plot[(4Sin[2x]-Tan[x])^2-7,{x,0,Pi}]