Question: how to plot a nested for loop ?

i want to generate grid for a C_D nozzle but i dont know ho to plot it. please help me how to plot.

restart;
alpha := 0;
beta := 2;
Imax := 11;
Jmax := 11;
L := 10;
`Δζ` := L/(Imax-1);

`Δx` := `Δζ`;
`Δη` := 1/(Jmax-1);

printlevel := 2;
for i to Imax do for j to Jmax do x[i] := `Δζ`*(i-1); eta[j] := `Δη`*(j-1); z := (eta[j]-alpha)*ln((beta+1)/(beta-1))/(1-alpha); H[i] := 3+2*tanh(x[i]-6); H1[i] := 0; H2[i] := -H[i]; y[i, j] := -H[i]*(2*beta/(exp(z)+1)-beta-2*alpha)/(2*alpha+1); Y[i, j] := (H1[i]+(-H1[i]*x[i]+H2[i])/L)*eta[j] end do end do;

 

 

Please Wait...