312 |
ENDDO ! bi |
ENDDO ! bi |
313 |
ENDDO ! bj |
ENDDO ! bj |
314 |
|
|
|
write(0,*) ' yC=', (yC(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'dxF=', (dXF(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'dyF=', (dYF(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'dxG=', (dXG(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'dyG=', (dYG(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'dxC=', (dXC(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'dyC=', (dYC(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'dxV=', (dXV(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'dyU=', (dYU(1,j,1,1),j=1,sNy) |
|
|
write(0,*) ' rA=', (rA(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'rAw=', (rAw(1,j,1,1),j=1,sNy) |
|
|
write(0,*) 'rAs=', (rAs(1,j,1,1),j=1,sNy) |
|
|
|
|
315 |
RETURN |
RETURN |
316 |
END |
END |