dat1=[0.0000,0.6845,0.9980,0.7705,0.1253,-0.5878,-0.9823,-0.8443,-0.2487,0.4818,0.9511,0.9048,0.3681,-0.3681,-0.9048,-0.9511,-0.4818,0.2487,0.8443,0.9823,0.5878,-0.1253,-0.7705,-0.9980,-0.6845];