gkowal/amun-code
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

COORDINATES: Fix grammar in initialize_coordinates().

Browse Source 
Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
Grzegorz Kowal 2013-12-19 15:03:33 -02:00
parent aaf75ab123
commit 5662c2e4b7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/coordinates.F90
View File

@ -342,7 +342,7 @@ module coordinates
write(*,"(4x,a, 1x,i6)" ) "refinement to level =", toplev write(*,"(4x,a, 1x,i6)" ) "refinement to level =", toplev
write(*,"(4x,a,3(1x,i6))") "base configuration =", ir, jr, kr write(*,"(4x,a,3(1x,i6))") "base configuration =", ir, jr, kr
write(*,"(4x,a,3(1x,i6))") "top level blocks =", dm(:) write(*,"(4x,a,3(1x,i6))") "top level blocks =", dm(:)
write(*,"(4x,a, 1x,i6)" ) "maxium cover blocks =", product(dm(:)) write(*,"(4x,a, 1x,i6)" ) "maximum cover blocks =", product(dm(:))
write(*,"(4x,a,3(1x,i6))") "base resolution =", cm(1:NDIMS) write(*,"(4x,a,3(1x,i6))") "base resolution =", cm(1:NDIMS)
write(*,"(4x,a,3(1x,i6))") "effective resolution =", rm(1:NDIMS) write(*,"(4x,a,3(1x,i6))") "effective resolution =", rm(1:NDIMS)