sas 运算问题

想对数据集做以下处理：新增一列距离，由sqrt(（第二行X1-第一行X0）^2+（第二行y1-第一行y0）^2)得，该如何得到呢？

/*原始数据*/
DATA TEST;
        INPUT X Y;
        DATALINES;
        1 2
        3 4
        4 5
        2 1
        ;
RUN;
/*滞后一阶*/
DATA TEST1;
        SET TEST;
        X1=LAG(X);
        Y1=LAG(Y);
RUN;
/*计算距离*/
DATA FINAL;
        SET TEST1;
        LEN=SQRT((X1-X)**2+(Y1-Y)**2);
RUN;

/*原始数据*/
DATA TEST;
        INPUT X Y;
        DATALINES;
        1 2
        3 4
        4 5
        2 1
        ;
RUN;
/*滞后一阶*/
DATA TEST1;
        SET TEST;
        X1=LAG(X);
        Y1=LAG(Y);
RUN;
/*计算距离*/
DATA FINAL;
        SET TEST1;
        LEN=SQRT((X1-X)**2+(Y1-Y)**2);
RUN;