how many celestial objects can be considered a comets?
(COUNT (AND astronomy.celestial_object (JOIN (R astronomy.celestial_object_category.objects) m.01srj)))