double precision s,x,sx,sxp,y,ym,w2,als,alx,alm,aly,
     +     sqls,sqlx,sqly,sqlm,allm,an,tamin,tamax,xs,ys,tpl,tmi
      common/sxy/s,x,sx,sxp,y,ym,w2,als,alx,alm,aly,
     +     sqls,sqlx,sqly,sqlm,allm,an,tamin,tamax,xs,ys,tpl,tmi