Checks whether a braid has only positive Artin generators.
isPositiveBraidWord(braid)
braid
a braid object
A Boolean value.
braid <- mkBraid(4, c(2, -3, 3)) isPositiveBraidWord(braid)