Question: Error using dsolve

I am trying to solve the following bvp:

with*plots

Eq[1] := diff(f(eta), `$`(eta, 3))+3*f(eta)*(diff(f(eta), `$`(eta, 2)))-2*(diff(f(eta), eta))^2+theta(eta)

Eq[2] := diff(theta(eta), `$`(eta, 2))+3*Pr*f(eta)*(diff(theta(eta), eta))

Eq[3] := diff(phi(eta), `$`(eta, 2))+3*Sc*f(eta)*(diff(phi(eta), eta))-kappa*Sc*(phi(eta)*(diff(theta(eta), `$`(eta, 2)))+(diff(theta(eta), eta))*(diff(phi(eta), eta)))

BCs := [f(0), (D(f))(0), ((D@@2)(f))(0)-.6789, theta(0)-1, (D(theta))(0)+.4995, phi(0), phi(8.45)-lambda]

pars := {Pr = .7, Sc = 1000000, kappa = .1}

for i to 3 do eq[i] := subs(pars, Eq[i]) end do

eqs := eq[1], eq[2], eq[3]

vars := f(eta), theta(eta), phi(eta)

bcs := op(subs(pars, BCs))

sol := dsolve({bcs, eqs}, {vars}, type = numeric, continuation = lambda, maxmesh = 100000, abserr = 0.1e-9, output = array([seq((1/100)*i, i = 0 .. 845)]))

But MAPLE says:

Error, (in dsolve/numeric/bvp) unable to refine continuation solution for parameter value .20, suggest using a different continuation, or a finer mesh
When I increase maxmesh to 10e6 MAPLE says
Error, (in dsolve/numeric/bvp) not enough memory to allocate rtable
But I have 4 GB of RAM. I am working in XP platform with 32 bits. Only 501.78 MB of memory is used. So where in lies the problem?
Thanking you,Sc_1000000.mw
Please Wait...