-- -*- M2-comint -*- hash: 16018918119744747085

i1 : R = ZZ/101[x]

o1 = R

o1 : PolynomialRing

i2 : p = map(R^1, R^1, {{x^4}})

o2 = | x4 |

             1      1
o2 : Matrix R  <-- R

i3 : isHomogeneous p

o3 = false

i4 : q = map(R^1, R^1, {{x^4}}, Degree => 4)

o4 = | x4 |

             1      1
o4 : Matrix R  <-- R

i5 : isHomogeneous q

o5 = true

i6 : 
