Fix a bug with Comma.InducedFunctors

After    | File Name                             | Before
-----------------------------------------------------------
0m40.95s | Category/Equality                     | 0m40.95s
0m21.70s | NaturalTransformation/Equality        | 0m21.88s
0m17.52s | Functor/Equality                      | 0m17.19s
0m11.10s | UniversalProperties                   | 0m10.56s
0m10.48s | Comma/CommaCategory                   | 0m10.57s
0m10.27s | Comma/Duals                           | 0m10.78s
0m09.48s | Groupoid                              | 0m09.60s
0m09.20s | Comma/InducedFunctors                 | 0m08.93s
0m08.14s | Category/Morphisms                    | 0m07.95s
0m04.78s | Grothendieck/ToSet                    | 0m04.97s
0m04.05s | Groupoid/Functors                     | 0m03.96s
0m02.43s | SumPreCategory                        | 0m02.43s
0m02.34s | Groupoid/Duals                        | 0m02.33s
0m02.22s | Category/Product                      | 0m02.12s
0m02.13s | Functor/CompositionLaws               | 0m02.24s
0m01.75s | NaturalTransformation/Duals           | 0m01.77s
0m01.56s | Hom                                   | 0m01.68s
0m01.42s | NaturalTransformation/Composition     | 0m01.36s
0m01.21s | InitialTerminalCategory               | 0m01.14s
0m01.19s | NaturalTransformation/CompositionLaws | 0m01.21s
0m00.99s | NatCategory                           | 0m00.98s
0m00.98s | Comma/Projection                      | 0m01.00s
0m00.90s | NaturalTransformation/Product         | 0m00.96s
0m00.88s | Functor/Product                       | 0m00.97s
0m00.67s | BoolCategory                          | 0m00.64s
0m00.50s | SetCategory                           | 0m00.49s
0m00.47s | Cat                                   | 0m00.48s
0m00.44s | Discrete/Duals                        | 0m00.43s
0m00.43s | Common                                | 0m00.44s
0m00.38s | FunctorCategory                       | 0m00.39s
0m00.29s | IndiscreteCategory                    | 0m00.30s
0m00.27s | NaturalTransformation/Identity        | 0m00.26s
0m00.26s | Functor/Duals                         | 0m00.24s
0m00.25s | Adjoint/UnitCounit                    | 0m00.24s
0m00.24s | Category/Objects                      | 0m00.23s
0m00.22s | IsGroupoid                            | 0m00.22s
0m00.21s | Functor/Composition                   | 0m00.23s
0m00.20s | NaturalTransformation/Core            | 0m00.18s
0m00.19s | NatCategory/Duals                     | 0m00.24s
0m00.17s | Category/Core                         | 0m00.20s
0m00.16s | Functor/Core                          | 0m00.15s
0m00.15s | NaturalNumbersObject                  | 0m00.15s
0m00.14s | Category/Duals                        | 0m00.14s
0m00.13s | ComputableCat                         | 0m00.12s
0m00.12s | Peano                                 | 0m00.11s
0m00.11s | Category/Category                     | 0m00.08s
0m00.11s | DiscreteCategory                      | 0m00.08s
0m00.11s | Grothendieck                          | 0m00.08s
0m00.10s | NaturalTransformation                 | 0m00.09s
0m00.10s | Functor/Identity                      | 0m00.10s
0m00.09s | Utf8                                  | 0m00.08s
0m00.08s | Category/StrictCategory               | 0m00.07s
0m00.08s | Functor                               | 0m00.08s
0m00.05s | Notations                             | 0m00.05s
0m00.04s | NotationsUtf8                         | 0m00.04s
-----------------------------------------------------------
2m54.43s | Total                                 | 2m54.16s