求助：一个解微分方程的问题

[babylonia]

挺久没用mathematica了，生疏的紧，请勿拍。
要解这样的微分方程组：
paa'[x]=a paa[x]+I (pp e[x] pba[x]-Conjugate[pp e[x] pba[x]]);
pbb'[x]=b pbb[x]-I (pp e[x] pba[x]-Conjugate[pp e[x] pba[x]]);
pab'[x]=c pab[x]-I pp e[x] (paa[x]-pbb[x]);
pba[x]=Conjugate[pab[x]]; a,b,c,x,pp都是实数，e[x]是形式未定的x的复函数。
不知道这样涉及到求共轭以及含有未定形式参数的方程该怎么解？
谢谢