%%HP: T(3)A(D)F(.);
\<< FD 'R' STO A1 SIN INV R * DF "SLOPE" \->TAG
\>>