Last change
on this file since 4 was
4,
checked in by xlvlod, 17 years ago
|
import initial des vraies codes.
|
File size:
1.0 KB
|
Rev | Line | |
---|
[4] | 1 | ! header file containing problem size information |
---|
| 2 | integer :: nx,ny,nz ! basic problem dimensions |
---|
| 3 | integer :: num_scalars ! can be 1 or 2 currently |
---|
| 4 | integer :: numprocs,locnz |
---|
| 5 | integer :: bytesperword,numbufs,numbytes |
---|
| 6 | integer :: AB_order ! # of time levels required |
---|
| 7 | real, allocatable :: mpi_buffer_space(:) |
---|
| 8 | |
---|
| 9 | parameter(nx=1+16,ny=1+16,nz=32) |
---|
| 10 | parameter(num_scalars=2) ! 1-->Temp, 2-->Salinity |
---|
| 11 | parameter(numprocs=01) ! must match specification in machfile |
---|
| 12 | parameter(locnz=nz/numprocs) |
---|
| 13 | parameter(AB_order=3) ! {2,3,4} |
---|
| 14 | parameter(bytesperword=8,numbufs=2) |
---|
| 15 | |
---|
| 16 | ! mpirun command must actually use numprocs processors |
---|
| 17 | ! i.e. mpirun -np 4 where 4 matches numprocs parameter |
---|
| 18 | ! |
---|
| 19 | ! Choose nz such that locnz is an integer. The partitioning |
---|
| 20 | ! logic requires this condition load balancing is optimized. |
---|
| 21 | ! |
---|
| 22 | ! nx/numprocs must be an integer in the data partitioning scheme |
---|
| 23 | |
---|
Note: See
TracBrowser
for help on using the repository browser.