In which years does the feast of St. Frances of Rome occur in the Passion Week?

frances_of_rome_in_passion_week.rb

require 'calendarium-romanum'

CR = CalendariumRomanum

def passion_week(liturgical_year)
  easter = CR::Temporale::Dates.easter_sunday liturgical_year

  ((easter - 7) .. (easter - 1))
end

frances_of_rome = CR::AbstractDate.new 3, 9

years = (1800..3000)

frances_of_rome_in_passion_week = proc do |year|
  liturgical_year = year - 1
  date = frances_of_rome.concretize(year)

  passion_week(liturgical_year).include? date
end

p years.select(&frances_of_rome_in_passion_week)