
SNC[k10 ,k20,k30,A11, A12, A21,k11,
k21,k31, k12,k22,k32, 
A22,B1,B2,M1,M2, R, G1, G2, G0,
N0 ,M0 ,A0 ,B0 ,R0, F0, L ];


k12relation = 
    k12**F0 + tp[F0]**k12 - k11**B0**tp[Inv[R0]]**tp[B0]**k11 - 
    k11**A0**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    k11**F0**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k11**F0 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**tp[A0]**k11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**tp[F0]**k11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**A21**F0 + 
    tp[F0]**k11**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[F0]**tp[A21]**k31**Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**A21 - 
    k11**A0**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    k11**F0**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**B2**G1**
     F0 + tp[F0]**k11**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[F0]**tp[A21]**k31**Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[F0]**tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**
     A21 + tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**
     k11**F0 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[A12]**tp[A0]**k11 + tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[A12]**tp[F0]**k11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**
     A21**F0 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**A21**A11**F0 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[A12]**k10**A11**F0 - tp[A21]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11**F0 - 
    tp[F0]**tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**A21 - tp[F0]**tp[A11]**tp[A21]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**A21 - 
    tp[F0]**tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**A21 + tp[F0]**tp[G1]**tp[B2]**k31**
     Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**B2**
     G1**F0 + k10**F0**A12**Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**
     k11 - k11**A0**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**
     Inv[A22 + B2**G2]**A21 + k11**A0**B0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    k11**B0**tp[Inv[R0]]**tp[B0]**tp[A21]**tp[Inv[A22]]**k30**
     Inv[A22 + B2**G2]**A21 - k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**k30**A21**
     F0 - k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**
     tp[A12]**k10**F0 - k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**
     tp[Inv[A22]]**tp[M2]**M1**F0 + 
    k11**B0**tp[Inv[R0]]**tp[N0]**M0**A12**Inv[A22]**Inv[A22 + B2**G2]**
     A21 + k11**F0**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**
     Inv[A22 + B2**G2]**A21 - k11**F0**B0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A0]**k10**A12**Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[A0]**tp[A21]**k30**Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**
     k11 + tp[A0]**tp[A21]**tp[Inv[A22]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
     tp[B0]**k11 - tp[A0]**tp[M0]**M2**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 + 
    tp[A0]**tp[M1]**M2**Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**k31**
     Inv[A22 + B2**G2]**A21 - tp[A21]**k31**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**A21**B0**tp[Inv[R0]]**
     tp[B0]**k11 + tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11**F0 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**
     tp[A0]**k11 + tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**tp[F0]**k11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**k31**
     Inv[A22 + B2**G2]**A21 - tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**tp[M0]**N0**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M0**B0**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**tp[Inv[R0]]**
     tp[B0]**k11**F0 + tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[M2]**N0**tp[Inv[R0]]**tp[B0]**tp[A0]**k11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**tp[Inv[R0]]**
     tp[B0]**tp[F0]**k11 - tp[A21]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1**F0 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     k30**B2**G1**A11**F0 - tp[A21]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1**F0 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[M2]**M1**B1**G1**F0 - tp[F0]**k10**A12**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 + 
    tp[F0]**k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**
     Inv[A22 + B2**G2]**A21 - tp[F0]**k11**B0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[F0]**tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[F0]**tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[F0]**tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**A21 - tp[F0]**tp[A11]**tp[M1]**M2**Inv[A22]**
     Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[F0]**tp[A21]**k30**Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**
     k11 - tp[F0]**tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**A21 - tp[F0]**tp[G1]**tp[B1]**tp[A21]**k30**
     Inv[A22]**Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**A21 - 
    tp[F0]**tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**A21 - tp[F0]**tp[M1]**M2**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**A21**A11**F0 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[A12]**k10**A11**F0 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[M2]**M1**A11**F0 + 
    tp[M0]**M0**A12**Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**k11 - 
    k11**A0**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**
     Inv[A22 + B2**G2]**B2**G1 + 
    k11**A0**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     G1 + k11**B0**tp[Inv[R0]]**tp[B0]**tp[A21]**tp[Inv[A22]]**k30**
     Inv[A22 + B2**G2]**B2**G1 - 
    k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**M2**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**
     k30**B2**G1**F0 + k11**B0**tp[Inv[R0]]**tp[N0]**M0**A12**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 + 
    k11**F0**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**
     Inv[A22 + B2**G2]**B2**G1 - 
    k11**F0**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     G1 + tp[A0]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**
     tp[B0]**k11 - tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**k31**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     k30**B2**G1**B1**G1**F0 + 
    tp[F0]**k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[F0]**k11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[F0]**tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[F0]**tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[F0]**tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[F0]**tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**A21 - 
    tp[F0]**tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[F0]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**
     tp[B0]**k11 - tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**A21**B0**
     tp[Inv[R0]]**tp[B0]**k11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
     tp[B0]**k11**F0 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**
     Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**tp[A0]**k11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
     tp[B0]**tp[F0]**k11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**
     B2**tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**tp[M0]**
     N0**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M0**B0**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
     tp[Inv[R0]]**tp[B0]**k11**F0 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
     tp[Inv[R0]]**tp[B0]**tp[A0]**k11 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
     tp[Inv[R0]]**tp[B0]**tp[F0]**k11 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**A21**B1**G1**F0 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**B2**G1**A11**F0 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[A12]**k10**B1**G1**F0 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[M2]**M1**B1**G1**F0 + 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     k31**Inv[A22 + B2**G2]**A21 + 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**A12**
     Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[A21]**k30**
     Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[M1]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**k10**A12**
     Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**tp[A21]**
     k30**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**tp[M1]**
     M2**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 - 
    tp[F0]**tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**k31**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     k31**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**B2**G1**B1**G1**F0 + 
    k10**F0**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    k10**F0**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[B2]**
     tp[Inv[A22]]**k30**Inv[A22 + B2**G2]**A21 + 
    k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    k11**B0**tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[B2]**
     tp[Inv[A22]]**k30**Inv[A22 + B2**G2]**A21 - 
    k11**B0**tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A0]**tp[M0]**N0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**Inv[A22]**
     B2**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[A0]**tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 + 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**A12**
     Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[A21]**k30**
     Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[G1]**
     tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[M1]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**
     tp[M0]**N0**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**tp[N0]**
     M0**B0**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**k10**A12**
     Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**tp[A21]**
     k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**tp[G1]**
     tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**tp[M1]**
     M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**tp[Inv[R0]]**
     tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**tp[Inv[R0]]**
     tp[N0]**M0**B0**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**
     A12**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
     k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
     tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
     tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[M0]**M0**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**M0**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**N0**tp[Inv[R0]]**tp[B0]**k10**A12**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**N0**tp[Inv[R0]]**tp[B0]**tp[A21]**k30**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**N0**tp[Inv[R0]]**tp[B0]**tp[A21]**tp[Inv[A22]]**k30**Inv[A22]**
     B2**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[M0]**N0**tp[Inv[R0]]**tp[B0]**tp[M0]**M2**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**N0**tp[Inv[R0]]**tp[B0]**tp[M1]**M2**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M0**A12**Inv[A22]**Inv[A22]**B2**
     tp[Inv[R0]]**tp[B0]**k11 - 
    k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[B2]**
     tp[Inv[A22]]**k30**Inv[A22 + B2**G2]**B2**G1 + 
    k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    k11**B0**tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[B2]**
     tp[Inv[A22]]**k30**Inv[A22 + B2**G2]**B2**G1 - 
    k11**B0**tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 + 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[G1]**
     tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**tp[G1]**
     tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     A11 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     A11 + tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**
     A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
     tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
     tp[N0]**M0**B0**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
     k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
     tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
     tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
     tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**A21 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
     tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
     tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**N0**tp[Inv[R0]]**tp[B0]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 - 
    tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 - 
    tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 - 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     A11 - tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 - 
    tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     A11 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     A11 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**
     M1**B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     B1**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     A11 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     B1**G1 - tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     A11 + tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**
     B2**G1 + tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     k31**B2**G1 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**
     Inv[A22 + B2**G2]**A21 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**A21 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**
     Inv[A22 + B2**G2]**A21 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**A21**A11 - 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     A11 + tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
     tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
     tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**
     B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**
     M1**A11 + tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**
     B2**G1**B1**tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**G1 + 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**
     k10**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[M2]**M1**A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[M2]**M1**B1**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**
     Inv[A22 + B2**G2]**A21 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[M2]**M1**B1**tp[Inv[R]]**tp[B1]**tp[A21]**k30**
     Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**
     M1**A11 - tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     A11 - tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     B1**G1 - tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**
     M1**B1**G1 - tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     A11 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**
     M1**B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**
     k10**B1**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1 - 
    tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
     tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     A11 - tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     B1**G1 - tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**
     M1**B1**G1 - tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**
     Inv[A22 + B2**G2]**A21 - tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**
     Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[A21]**k30**
     Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[M2]**M1**A11 - 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     A11 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     B1**G1 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**
     A21**B1**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**
     A21**B1**tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**
     B1**tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**
     B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**
     A21**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[A12]**k10**B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**A21**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[M2]**M1**B1**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**A21 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**A11 \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[M2]**M1**A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[A12]**k10**B1**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**
     k10**B1**tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**
     k10**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**
     A21**B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[A12]**k10**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**B2**G1**A11 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
     B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**
     k10**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[M2]**M1**B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[M2]**M1**B1**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     B1**tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**
     M1**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[A12]**k10**B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[M2]**M1**B1**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 + 
    tp[M0]**N0**tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[B2]**
     tp[Inv[A22]]**k30**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**N0**tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[B2]**
     tp[Inv[A22]]**k30**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**k11 + 
    tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[N0]**M2**
     Inv[A22]**Inv[A22]**B2**tp[Inv[R0]]**tp[B0]**k11 - 
    tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**B1**G1 - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**B1**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     A21 - tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**A11 - tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**tp[A12]**k10**B1**G1 - 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**
     B1**G1 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**
     A21**B1**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**B1**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
     G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**A21 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**B2**G1**B1**tp[Inv[R]]**tp[B1]**tp[M1]**M2**
     Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
     G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**A11 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**
     B2**G1**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[A12]**k10**B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
     tp[Inv[A22]]**k30**B2**G1**B1**tp[Inv[R]]**tp[B2]**
     tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
     tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
     B2**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**
     k10**B1**tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**
     B2**G1**B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
     tp[M2]**M1**B1**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**
     Inv[A22]**Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**
     G1**B1**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
     Inv[A22 + B2**G2]**B2**G1 - 
    tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
     tp[Inv[R]]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**
     B1**G1 ;

k22relation = 
- k22  -k12**A12**Inv[A22] + tp[A21]**tp[Inv[A22 + B2**G2]]**k32 + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k32 - 
     k11**A0**A12**Inv[A22]**Inv[A22 + B2**G2] + 
     k11**F0**A12**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[F0]**k11**A12**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[F0]**tp[A21]**k31**Inv[A22 + B2**G2]**Inv[A22 + B2**G2] - 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k31 - 
     k12**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     k12**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[F0]**tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k11**A12**
      Inv[A22] - tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      k31**A21**A12**Inv[A22] - 
     tp[F0]**tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**
      Inv[A22 + B2**G2] - tp[F0]**tp[A11]**tp[A21]**k30**Inv[A22]**
      Inv[A22 + B2**G2]**Inv[A22 + B2**G2] - 
     tp[F0]**tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**
      Inv[A22 + B2**G2] - k11**A0**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**
      k30**Inv[A22 + B2**G2] + 
     k11**A0**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22]**Inv[A22 + B2**G2] + 
     k11**B0**tp[Inv[R0]]**tp[B0]**tp[A21]**tp[Inv[A22]]**k30**
      Inv[A22 + B2**G2] - k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**M2**
      Inv[A22]**Inv[A22 + B2**G2] + 
     k11**B0**tp[Inv[R0]]**tp[N0]**M0**A12**Inv[A22]**Inv[A22 + B2**G2] + 
     k11**F0**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**
      Inv[A22 + B2**G2] - k11**F0**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22]**
      Inv[A22 + B2**G2] - tp[A21]**k31**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**k31**
      Inv[A22 + B2**G2] - tp[A21]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**k31**B2**G1**A12**Inv[A22] + 
     tp[F0]**k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30**
      Inv[A22 + B2**G2] - tp[F0]**k11**B0**tp[Inv[R0]]**tp[N0]**M2**
      Inv[A22]**Inv[A22 + B2**G2] - 
     tp[F0]**tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**
      Inv[A22 + B2**G2] - tp[F0]**tp[G1]**tp[B1]**k10**A12**Inv[A22]**
      Inv[A22 + B2**G2]**Inv[A22 + B2**G2] - 
     tp[F0]**tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**
      Inv[A22 + B2**G2] - tp[F0]**tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**
      Inv[A22 + B2**G2]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k11**
      A12**Inv[A22] - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**k31**A21**A12**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**A21**A11**A12**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[A12]**k10**A11**A12**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[M2]**M1**A11**A12**Inv[A22] - 
     tp[F0]**tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
      Inv[A22 + B2**G2]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B2]**
      k31**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B2]**
      k31**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**
      B2**G1**A12**Inv[A22] + k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**
      tp[Inv[A22]]**k30**A21**A12**Inv[A22] + 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**tp[A12]**
      k10**A12**Inv[A22] + k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**
      tp[Inv[A22]]**tp[A12]**tp[A21]**k30**Inv[A22] + 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**tp[A12]**
      tp[A21]**tp[Inv[A22]]**k30 - 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**tp[A12]**
      tp[M0]**M2**Inv[A22] + k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**
      tp[Inv[A22]]**tp[A12]**tp[M1]**M2**Inv[A22] + 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**tp[M2]**
      M1**A12**Inv[A22] + tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**
      B2**tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**A12**
      Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[A21]**
      k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[M1]**M2**
      Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
      tp[B0]**k11**A12**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**k10**
      A12**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
      tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**tp[M1]**
      M2**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k11**B0**
      tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k11**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
      tp[Inv[R0]]**tp[B0]**k11**A12**Inv[A22] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**A21**B0**
      tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**A21**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**A21**B1**G1**A12**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**B2**G1**A11**A12**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[A12]**k10**B1**G1**A12**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[M2]**M1**B1**G1**A12**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**A21**A11**A12**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[A12]**k10**A11**A12**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[M2]**M1**A11**A12**Inv[A22] - 
     k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30**Inv[A22 + B2**G2] + 
     k11**B0**tp[Inv[R0]]**tp[B0]**tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M2**
      Inv[A22]**Inv[A22 + B2**G2] + 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**k30**B2**
      G1**A12**Inv[A22] + k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**
      tp[Inv[A22]]**tp[A12]**tp[G1]**tp[B2]**k30**Inv[A22] + 
     k11**B0**tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30**Inv[A22 + B2**G2] - 
     k11**B0**tp[Inv[R0]]**tp[N0]**M0**B0**tp[Inv[R0]]**tp[N0]**M2**
      Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[A21]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**tp[G1]**
      tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**tp[G1]**
      tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**B2**G1**
      B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**B2**G1**
      B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**B2**G1**B1**G1**A12**Inv[A22] + 
     tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**k10**
      A12**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
      tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
      tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**
      tp[Inv[R0]]**tp[B0]**k11**A12**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
      k10**A12**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
      tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
      tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
      B1**tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k11**
      B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k11**
      B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
      tp[Inv[R0]]**tp[B0]**k11**A12**Inv[A22] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**
      A21**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**
      A21**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**A21**B1**G1**A12**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**B2**G1**A11**A12**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[A12]**k10**B1**G1**A12**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[M2]**M1**B1**G1**A12**Inv[A22] - 
     tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**A21**A11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**A21**A11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[A12]**k10**A11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[A12]**k10**A11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[M2]**M1**A11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[M2]**M1**A11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**k31**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**tp[B1]**
      tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k31**B2**tp[Inv[R]]**tp[B1]**
      tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B2]**k31**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**
      B2**G1**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**k31**
      B2**G1**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**B2**G1**B1**G1**A12**Inv[A22] + 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**k30**A21**
      B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**k30**A21**
      B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] - 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**tp[A12]**
      tp[M0]**N0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**tp[A12]**
      tp[M0]**N0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**tp[M2]**
      M1**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**tp[M2]**
      M1**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] - 
     tp[A11]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A11]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**tp[Inv[R]]**
      tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
      tp[B0]**k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
      tp[B0]**k11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
- tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
- tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
+ tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**tp[Inv[R0]]**
      tp[B0]**k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
      tp[Inv[R0]]**tp[B0]**k11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**A21**B1**G1**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**A21**B1**G1**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**B2**G1**A11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**B2**G1**A11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[A12]**k10**B1**G1**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[A12]**k10**B1**G1**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[M2]**M1**B1**G1**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      tp[M2]**M1**B1**G1**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] - 
     tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
      B1**tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
      B1**tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
      B1**tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**A21**A11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**
      k30 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**A21**A11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[A12]**k10**A11**B0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**A11**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[M2]**M1**A11**B0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**A11**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**k30**B2**
      G1**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**tp[Inv[A22]]**k30**B2**
      G1**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] - 
     tp[A11]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
- tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
+ tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**B2**G1**B1**G1**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 - 
     tp[A21]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**
      k30**B2**G1**B1**G1**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] - 
     tp[G1]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
- tp[G1]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
- tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**tp[Inv[R0]]**
      tp[B0]**k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**k30**Inv[A22]**B2**
      tp[Inv[R0]]**tp[B0]**k11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B1]**k10**A12**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B1]**tp[A21]**k30**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B1]**tp[M1]**M2**Inv[A22]**Inv[A22 + B2**G2] - 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**
      B1**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**
      Inv[A22 + B2**G2] - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[M2]**M1**B1**tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**
      k30**Inv[A22]**Inv[A22 + B2**G2] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
      tp[Inv[R0]]**tp[B0]**k11**B0**tp[Inv[R0]]**tp[B2]**tp[Inv[A22]]**k30 \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**N0**
      tp[Inv[R0]]**tp[B0]**k11**B0**tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**A21**B1**G1**B0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**A21**B1**G1**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**B2**G1**A11**B0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**A11**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[A12]**k10**B1**G1**B0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[A12]**k10**B1**G1**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] + 
     tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**tp[M2]**M1**B1**G1**B0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**tp[M2]**M1**B1**G1**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] - 
     tp[G1]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2]**B2**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
- tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**
      tp[Inv[R]]**tp[B1]**tp[G1]**tp[B2]**k30**Inv[A22]**Inv[A22 + B2**G2] \
+ tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22]]**k30**B2**G1**B1**G1**B0**tp[Inv[R0]]**tp[B2]**
      tp[Inv[A22]]**k30 - tp[G1]**tp[B2]**tp[Inv[A22 + B2**G2]]**
      tp[Inv[A22 + B2**G2]]**tp[Inv[A22]]**k30**B2**G1**B1**G1**B0**
      tp[Inv[R0]]**tp[N0]**M2**Inv[A22] ;

k32relation = 
   k32**A22 + tp[A12]**k21 + tp[A22]**k32 + tp[k21]**A12 - 
   k30**B2**Inv[R]**tp[B1]**k21 - k30**B2**Inv[R]**tp[B2]**k32 - 
   k31**B2**Inv[R]**tp[B1]**k20 - k31**B2**Inv[R]**tp[B2]**k31 - 
   k32**B2**Inv[R]**tp[B2]**k30 - tp[k20]**B1**Inv[R]**tp[B1]**k20 - 
   tp[k20]**B1**Inv[R]**tp[B2]**k31 - tp[k21]**B1**Inv[R]**tp[B2]**k30;

