%%HP: T(3)A(R)F(.);
\<< 1000000. / 1.13 + 13.
  FOR d 6.133 d DDAYS 7. MOD NOT d IFT
  NEXT
\>>