weight(R,L)
i1 : R=rootSystemB(3) o1 = RootSystem{...8...} o1 : RootSystem
i2 : weight(R,{1,2,1}) o2 = | 1 | | 2 | | 1 | 3 o2 : ZZ