Testing if two ellipsoids is not intersecting

Input: Ell1[c1,cov1],Ell2[c2,cov2];
Output: True (not intersecting)or False (intersecting)
Submodules: None

IntersectTest[c1_,cov1_,c2_,cov2_]:=Module[{FF,max},
FF[lambda_]:=lambda (1-lambda) (c2-c1).Inverse[lambda cov2+(1-lambda) cov1].(c2-c1);
max=First[FindMaximum[{FF[x],0<x<1},x]];
max>1
]