The normal members of MacMahon's order-three family
ProvedMagicSquares.magic_three_normal_classifyCharacterization of the normal squares inside MacMahon's order-three family.
For ,
Here normal means the nine entries lie in and are pairwise distinct, i.e. they are a permutation of ; and
Proof. Normality forces and , since and are entries. This leaves pairs, each of which is a ground instance and is settled by evaluation. The eight surviving pairs are exactly those for which the corner entries and are distinct members of with ; the pairs with are excluded because then coincides with the centre.
Formalization Note IsNormal is stated with a Function.Injective, which is
not decidable as given, so it is first rewritten into an explicit conjunction of
entrywise bounds over Fin 3 and pairwise-distinctness of the nine positions.
The quantifiers over Fin 3 are then unfolded with Fin.forall_fin_succ before
norm_num decides the resulting ground instances. Because the parametrization
is over , entries such as and truncate at zero, and
each instance is evaluated with the truncation in place.
import Mathlib import Definitions.Def_MagicSquares import Definitions.Def_MagicSquaresParam3 open MagicSquares
namespace MagicSquares
theorem magic_three_normal_classify (a c : ℕ) (hac : (a, c) ∈ paramSet 5) :
IsNormal (mkMagic3 5 a c) ↔
(a = 2 ∧ c = 4) ∨ (a = 2 ∧ c = 6) ∨ (a = 4 ∧ c = 2) ∨ (a = 4 ∧ c = 8) ∨
(a = 6 ∧ c = 2) ∨ (a = 6 ∧ c = 8) ∨ (a = 8 ∧ c = 4) ∨ (a = 8 ∧ c = 6) := by sorry
end MagicSquares
Confirmed by the mission captain (proposal self-audit).