Add filter to the CalculateArea Subroutine