A=RPSRF(V,L)
[Rational polynomial special read, formula version.  V is a variable
list.  L is a list of terminator characters.]
     safe r.
(1)  r=LENGTH(V);  A=DRPSRF(V,L);  A=PFSDIP(r,A)..