{--------------------------------------------------------------------------
  Source from range
--------------------------------------------------------------------------}
sourceFromRanges :: [Range] -> [String]
sourceFromRanges ranges
  = [sourceFromRange range | range <- ranges]
sourceFromRanges :: [Range] -> [String]
sourceFromRanges ranges
  = [sourceFromRange range | range <- ranges]
sourceFromRanges ranges
  = [sourceFromRange range | range <- ranges]