FUNCTION :  latexprinttype4 - latex print of Type 4 identity
                

CALLING SEQUENCE :  latexprinttype4(L, EQNNAME, num, nL)

PARAMETERS :  L - list [p,a,c1,N,B]
            num - positive integer (no. of identity found by findtype4)
             nL - number of identities

GLOBAL VARIABLES : _F

SYNOPSIS :   
   Prints latex identity for
  G*(p) H*(a) + c1 G*(a) H*(p)                             
   

EXAMPLES :   

>  with(qseries):
>  with(thetaids):
>  with(ramarobinsids):
>  G:=j->1/GetaL([1],10,j):H:=j->1/GetaL([3],10,j):
>  GM:=j->1/MGetaL([1],10,j): HM:=j->1/MGetaL([3],10,j):
>  GE:=j->-GetaLEXP([1],10,j):HE:=j->-GetaLEXP([3],10,j):
>  latexprinttype4([6,1,-1,120,-128],RR54,1,1);
G^{*}(6)\,H^{*}(1) - G^{*}(1)\,H^{*}(6) = 
\frac{\eta(\tau)\eta(4\tau)^{3}\eta(6\tau)^{3}\eta(24\tau)}{\eta(2\tau)^{3}\eta(3\tau)\eta(8\tau)\eta(12\tau)^{3}},\quad \Gamma_1(120), \quad -B=128.
\mylabel{eq:RR541}


DISCUSSION :
This function is used by latexprinttypeL4.

SEE ALSO :  

findtype1,
latexprinttype1, latexprinttype2, latexprinttype3, latexprinttype4,
latexprinttype5, latexprinttype6, latexprinttype7, latexprinttype8,
latexprinttype9, latexprinttype10, latexprinttypeL1