&L(0,"*",1);
&LBAS(1,"%fs",STS$);