FUNCTION :  thetaids[lqdegree0] - power of q in a q-monomial              


CALLING SEQUENCE :  lqdegree0()     
                    lqdegree0(qmon)     
    
PARAMETERS :   qmon - a q-monomial

   
SYNOPSIS :   

     Returns power of q in the q-monomial.   
     Degrees in q are allowed to be negative and fractional. 
     Used by lqdegree, jacbase, and processjacid.
   
EXAMPLES :   

>  with(thetaids):

>  lqdegree0();
-------------------------------------------------------------
lqdegree0(qexp)                                       
   qexp is q-monomial.           
   This function returns the degree in q.
   It also handles fractional degrees.                       
-------------------------------------------------------------

>  B:=sqrt(q)*JAC(0,1,infinity);
                               1/2
                         B := q    JAC(0, 1, infinity)

>  lqdegree0(B);
                                      1/2

>  B1:=(q)*JAC(0,1,infinity);   
                          B1 := q JAC(0, 1, infinity)

>  lqdegree0(B1);            
                                       1

>  B2:=JAC(0,1,infinity);    
                           B2 := JAC(0, 1, infinity)

>  lqdegree0(B2);        
                                       0

>  B3:=JAC(0,1,infinity)/q^3;
                                 JAC(0, 1, infinity)
                           B3 := -------------------
                                          3
                                         q

>  lqdegree0(B3);            
                                       -3

>  B4:=JAC(0,1,infinity)/q^(1/3);
                                 JAC(0, 1, infinity)
                           B4 := -------------------
                                         1/3
                                        q

>  lqdegree0(B4);                
                                      -1/3

>  lqdegree0(B1+B4);
                                      FAIL

SEE ALSO: lqdegree, jacbase, processjacid