perfectlist:=[ MatrixAlgebra(QuadraticField(-15), 2) | [ QuadraticField(-15) | [ RationalField() | 1, 0 ], [ RationalField() | 1/2, 1/10 ], [ RationalField() | 1/2, -1/10 ], [ RationalField() | 1/2, 0 ] ] ];