%%HP: T(3)A(R)F(.);
\<< CHK13 I\->R SWAP I\->R 0.
  \<< \<-y \<-m ROT 13. SWAP { HOME PRGM ML20 } SWAP + RCL EVAL
  \>> \-> cnt run
  \<<
    FOR \<-y 1. 12.
      FOR \<-m 'ML20FAC' run EVAL
        IF 7. MOD 6. ==
        THEN 'cnt' INCR DROP
          IF 20. FC?
          THEN 'ML20REQ' run EVAL
          ELSE \<-y \<-m
          END
        END
      NEXT
    NEXT cnt
  \>>
  IF 20. FS?
  THEN { 2. } + \->ARRY EDITB
  END
\>>
