Message Boards

WOLFRAM COMMUNITY

4207 Views

4 Replies

2 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Turn symbolic eq1 into eq2 using patterns?

Jacques Ou

Posted 5 years ago

eq1 = Derivative[1][H][t] == H[t] (-\[Mu] B[t] - Subscript[d, e] + ( Subscript[r, e] (H[t] (Subscript[d, e] - Subscript[r, e]) + Subscript[K1, e] Subscript[r, e] + L[t] Subscript[k, e] (-Subscript[d, e] + Subscript[r, e])))/( Subscript[K1, e] Subscript[r, e] + L[t] Subscript[k, e] (-Subscript[d, e] + Subscript[r, e]))) eq2 = Derivative[1][H][t] == H[t] (-\[Mu] B[t] - Subscript[d, e] + Subscript[r, e] + ( Subscript[r, e] H[t] (Subscript[d, e] - Subscript[r, e]))/( Subscript[K1, e] Subscript[r, e] + L[t] Subscript[k, e] (-Subscript[d, e] + Subscript[r, e])))

enter image description here

eq1 = Derivative[1][H][t] == 
  H[t] (-\[Mu] B[t] - Subscript[d, e] + (
     Subscript[r, 
      e] (H[t] (Subscript[d, e] - Subscript[r, e]) + 
        Subscript[K1, e] Subscript[r, e] + 
        L[t] Subscript[k, e] (-Subscript[d, e] + Subscript[r, e])))/(
     Subscript[K1, e] Subscript[r, e] + 
      L[t] Subscript[k, e] (-Subscript[d, e] + Subscript[r, e])))

eq2 = Derivative[1][H][t] == 
  H[t] (-\[Mu] B[t] - Subscript[d, e] + Subscript[r, e] + (
     Subscript[r, e] H[t] (Subscript[d, e] - Subscript[r, e]))/(
     Subscript[K1, e] Subscript[r, e] + 
      L[t] Subscript[k, e] (-Subscript[d, e] + Subscript[r, e])))

POSTED BY: Jacques Ou