%%HP: T(3)A(D)F(.);
\<< \-> PD PL PST W
  \<< 1.4 PD * 1.7 PL *
+ PST
    IF W
    THEN 1.1 *
    END DUP 1.7 * 3.
PICK + .75 * SWAP 1.3
* PD .9 * + MAX MAX
  \>>
\>>