c c***controls printing of the progress of iterations: ipr inorm 1 250 c c***the maximum no. of pseudo-time steps to be performed: nitmax 250 c c***magnitude of the time step: dt 2.0e+00 c c***relaxation factor for SSOR iterations: omega 1.2 c c***tolerance levels for steady-state residuals: tolnwt(m),m=1,5 1.0e-08 1.0e-08 1.0e-08 1.0e-08 1.0e-08 c c***number of grid points in xi and eta and zeta directions: nx ny nz 64 64 64 c