1 |
C $Header$ |
2 |
C $Name$ |
3 |
|
4 |
C ================================================================== |
5 |
C HEADER FLT_SIZE |
6 |
C ================================================================== |
7 |
|
8 |
C== Size == |
9 |
|
10 |
C max_npart_tile :: maximum number of floats on a tile |
11 |
C normally npart_tile < max_npart, but could be the same |
12 |
C for safety |
13 |
C max_npart_exch :: maximum number of floats on a tile that can be |
14 |
C exchanged at one time |
15 |
C normally max_npart_exch < max_npart_tile, |
16 |
C but could be the same for safety |
17 |
C |
18 |
INTEGER max_npart_tile, max_npart_exch |
19 |
PARAMETER (max_npart_tile = 300) |
20 |
PARAMETER (max_npart_exch = 50) |
21 |
|
22 |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |