norm(R,r)
i1 : norm(rootSystemF4,simpleRoot(rootSystemF4,2)) o1 = 2
The source of this document is in WeylGroups.m2:2301:0.