|
25 | 25 | [ "FinalizeCategory", true ], |
26 | 26 | ], |
27 | 27 | function( CAP_NAMED_ARGUMENTS, underlying_category ) |
28 | | - local name, freyd_category, commutative_ring; |
| 28 | + local name, freyd_category, commutative_semiring; |
29 | 29 |
|
30 | 30 | if (@not IsValidInputForFreydCategory( underlying_category )) |
31 | 31 | return false; |
|
54 | 54 |
|
55 | 55 | if (HasIsLinearCategoryOverCommutativeRing( underlying_category ) && |
56 | 56 | IsLinearCategoryOverCommutativeRing( underlying_category ) && |
57 | | - HasCommutativeRingOfLinearCategory( underlying_category )) |
| 57 | + HasCommutativeSemiringOfLinearCategory( underlying_category )) |
58 | 58 |
|
59 | 59 | SetIsLinearCategoryOverCommutativeRing( freyd_category, true ); |
60 | 60 |
|
61 | | - commutative_ring = CommutativeRingOfLinearCategory( underlying_category ); |
| 61 | + commutative_semiring = CommutativeSemiringOfLinearCategory( underlying_category ); |
62 | 62 |
|
63 | | - SetCommutativeRingOfLinearCategory( freyd_category, commutative_ring ); |
| 63 | + SetCommutativeSemiringOfLinearCategory( freyd_category, commutative_semiring ); |
64 | 64 |
|
65 | 65 | if (HasIsLinearCategoryOverCommutativeRingWithFinitelyGeneratedFreeExternalHoms( underlying_category ) && |
66 | 66 | IsLinearCategoryOverCommutativeRingWithFinitelyGeneratedFreeExternalHoms( underlying_category )) |
67 | 67 |
|
68 | | - if (HasIsFieldForHomalg( commutative_ring ) && IsFieldForHomalg( commutative_ring )) |
| 68 | + if (HasIsFieldForHomalg( commutative_semiring ) && IsFieldForHomalg( commutative_semiring )) |
69 | 69 |
|
70 | 70 | SetIsLinearCategoryOverCommutativeRingWithFinitelyGeneratedFreeExternalHoms( freyd_category, true ); |
71 | 71 |
|
@@ -730,13 +730,13 @@ end; ArgumentNumber = 2 ); |
730 | 730 |
|
731 | 731 | end ); |
732 | 732 |
|
733 | | - if (is_possible_to_install( "MultiplyWithElementOfCommutativeRingForMorphisms", |
734 | | - [ "MultiplyWithElementOfCommutativeRingForMorphisms" ] )) |
| 733 | + if (is_possible_to_install( "MultiplyWithElementOfCommutativeSemiringForMorphisms", |
| 734 | + [ "MultiplyWithElementOfCommutativeSemiringForMorphisms" ] )) |
735 | 735 |
|
736 | | - AddMultiplyWithElementOfCommutativeRingForMorphisms( category, |
| 736 | + AddMultiplyWithElementOfCommutativeSemiringForMorphisms( category, |
737 | 737 | ( cat, r, alpha ) -> FreydCategoryMorphism( cat, |
738 | 738 | Source( alpha ), |
739 | | - MultiplyWithElementOfCommutativeRingForMorphisms( underlying_category, r, MorphismDatum( cat, alpha ) ), |
| 739 | + MultiplyWithElementOfCommutativeSemiringForMorphisms( underlying_category, r, MorphismDatum( cat, alpha ) ), |
740 | 740 | Range( alpha ) |
741 | 741 | ) |
742 | 742 | ); |
|
0 commit comments