1 |
|
2 |
c ================================================================== |
3 |
c HEADER MINIMIZATION |
4 |
c ================================================================== |
5 |
c |
6 |
c o Header for the minimization algorithm. |
7 |
c |
8 |
c started: Christian Eckert eckert@mit.edu 07-Apr-2000 |
9 |
c |
10 |
c changed: Christian Eckert eckert@mit.edu |
11 |
c |
12 |
c |
13 |
c ================================================================== |
14 |
c HEADER MINIMIZATION |
15 |
c ================================================================== |
16 |
|
17 |
common /minimization_l/ |
18 |
& fileavailable, |
19 |
& tileavailable |
20 |
logical tileavailable( nsx*npx, nsy*npy ) |
21 |
logical fileavailable( nsx*npx, nsy*npy ) |
22 |
|
23 |
c ================================================================== |
24 |
c END OF HEADER MINIMIZATION |
25 |
c ================================================================== |