-- -*- M2-comint -*- {* hash: -934923519 *}

i1 : R = ZZ[a..z];

i2 : M = genericSymmetricMatrix(R,a,3)

o2 = | a b c |
     | b d e |
     | c e f |

             3       3
o2 : Matrix R  <--- R

i3 : transpose(M) - M == 0

o3 = true

i4 : genericSymmetricMatrix(R,d,5)

o4 = | d e f g h |
     | e i j k l |
     | f j m n o |
     | g k n p q |
     | h l o q r |

             5       5
o4 : Matrix R  <--- R

i5 : genericSymmetricMatrix(R,3)

o5 = | a b c |
     | b d e |
     | c e f |

             3       3
o5 : Matrix R  <--- R

i6 : genericSymmetricMatrix(R,5)

o6 = | a b c d e |
     | b f g h i |
     | c g j k l |
     | d h k m n |
     | e i l n o |

             5       5
o6 : Matrix R  <--- R

i7 :