Dear @Kitonum 

Greetings.

How to change x and y coordinate labels.
η and r instead of x and y.

A3 := .25*y*(-6*x^2+6*x-2.477250468*x*(x-1)^2-2.477250468*x^2*(x-1)-1.476663599*x*(x-1)^3-2.214995399*x^2*(x-1)^2+.3837076420*x*(x-1)^4+.7674152840*x^2*(x-1)^3+1.049305257*x*(x-1)^5+2.623263142*x^2*(x-1)^4+1.470504325*x*(x-1)^6+4.411512974*x^2*(x-1)^5+2.062933702*x*(x-1)^7+7.220267957*x^2*(x-1)^6+1.610136961*x*(x-1)^8+6.440547843*x^2*(x-1)^7+.6577852166*x*(x-1)^9+2.960033475*x^2*(x-1)^8);

ContoursWithLabels(A3, 0 .. 1, 0 .. 10, {seq(0.1..5,0.2)}, [color = black,thickness = 2, axes = box, size=[450,450]], Coloring = [colorstyle = HUE, style = surface],[labels = ["eta", "r"],labeldirections = [horizontal, vertical], labelfont = ['TIMES', 'BOLDOBLIQUE', 16]]);
 

Dear @Carl Love 

The plot has come.

Thanks for your reply.

Dear @Kitonum 

Thanks for your reply.

And thanks for your support.

Dear @Carl Love 

This stream function has obtained from an analytical solution of blood flow velocity.

This contour should show that the blood flow in a tube.

So, the graph shown above does not give a sense of blood flow in a tube.

Therefore, we need to provide proper blood flow coloring for this contour.

like below mentioned:

Dear @Carl Love 

How to provide a coloring as a blood flow color and label.

A3 := 0.1098129220e-1*x-0.1864590943e-1*x^4-0.3780537764e-1+0.5300456762e-1*x^2-0.2252843255e-4*x^7*sin(6.280000000*y-.2083809520)-0.9011373022e-5*x^7*sin(6.280000000*y-1.256000000)-0.1569010873e-4*x^6*sin(6.280000000*y-.2083809520)-0.6276043495e-5*x^6*sin(6.280000000*y-1.256000000)-0.1462906959e-2*x^5*sin(6.280000000*y-1.256000000)-0.3657267398e-2*x^5*sin(6.280000000*y-.2083809520)-0.7271311325e-3*x^4*sin(6.280000000*y-1.256000000)-0.1817827831e-2*x^4*sin(6.280000000*y-.2083809520)-0.8684412118e-1*x^3*sin(6.280000000*y-1.256000000)-.2171103030*x^3*sin(6.280000000*y-.2083809520)-0.2589262297e-1*x^2*sin(6.280000000*y-1.256000000)-0.6473155744e-1*x^2*sin(6.280000000*y-.2083809520)+.3752380081*x*sin(6.280000000*y-1.256000000)+.9380950203*x*sin(6.280000000*y-.2083809520)+0.3750477138e-1*sin(6.280000000*y-1.256000000)+0.9376192845e-1*sin(6.280000000*y-.2083809520)-0.3550918239e-3*x^6-0.760666870e-4*x^5+0.1713654921e-5*x^7-0.7811069699e-2*x^3-3.822344860*10^(-8)*x^8;

plots:-contourplot(A3, x = -2.0 .. 2.0, y = -1 .. 2, axes = boxed, filledregions = true, contours = [seq(-2 .. 2, .2)], grid = [80, 80], coloring = ["Niagara Azure", "red"]);

Waiting for a response.

Dear @dharr 

Thanking you.

Dear @tomleslie 

Here you have plotted h curve.

Where the curves are a straight line(-2..2), that value (eg. h=(-1) in hh) we can take for velocity plot.

My question was, how to find a residual error.

In Mathematica code, they compute solution interval and integral interval to find a residual error.

Is this possible in maple?

Waiting for your response.

Thanks for the support.

Dear maple users @Preben Alsholm @acer @Carl Love @Kitonum
greeting.

For my new project, I need this residual error tolerance to validate my obtained result.

waiting for your reply.

Dear maple users  @Preben Alsholm  @acer @Carl Love @Kitonum
Good morning.

Here I solved some set equations in the homotopy method.
How to fix a residual error and absolute error.
How to plot residual error vs order of iteration(N is the order of interaction in our code)
How to plot residual error vs "h" curve

Have a good day

code:BAHAM.mw

"h"-curve

some examples figures to help the maple user for finding error:

residual error vs "h-curve"

Dear @Preben Alsholm 

Is there any possibility to plot residual error vs iterations.

instead of residual error vs eta.

Have a good day.

Dear maple users, @Preben Alsholm @acer @Carl Love @Kitonum

Is there any possibility to plot residual error vs iterations.

Dear @Preben Alsholm 
I have tried the same way for another problem,
But I have got this.

Download AP.mw

Dear @Preben Alsholm 
Thanks for your response.
Have a good day.

Respected @tomleslie @Carl Love @acer @Kitonum

 code: jbs.mw

How to display a value for  diff(f, `$`(x, 2)), p, x = 0

I tried a print comment maple shows 

                                                         
     -2.277141067 + 0.1456822830 x + 1.371481838 x *x, x = 0
                                                    
     -2.445405258 + 0.2657744995 x + 2.140882549 x *x, x = 0
                                                       
     -2.630934764 + 0.4257676173 x + 2.934073350 x*x , x = 0
                                                         
     -2.835347980 + 0.6332784948 x + 3.745530890 x *x, x = 0

Thanking you,

Waiting for replay.

Respected @tomleslie 

I've got what to expect, thank you.
Thanks for the support.