FUNCTION: LieTools/IntegralRoots
USAGE: IntegralRoots(fwgt,Gt); IntegralRoots(fwgt); IntegralRoots(fwgt,Gtype,rnk);
SYNOPSIS: IntegralRoots(fwgt,Gt) yields the indices of the positive
  roots alpha of Gt such that 2*(alpha,fwgt)/(alpha,alpha) is an integer. 
  When called with a single argument fwgt, it is necessary to have previously 
  initialized a global Lie algebra environment via LieTools[gSetup].
EXAMPLE: 
with(LieTools):IntegralRoots([-1/2,-1/2],G2);

                                [3, 5]

SEE ALSO: LieTools[fwgtIWeylOrbit], LieTools[RtWgtOrder]
