62 |
#ifdef ALLOW_TAMC_CHECKPOINTING |
#ifdef ALLOW_TAMC_CHECKPOINTING |
63 |
|
|
64 |
integer nchklev_1 |
integer nchklev_1 |
65 |
parameter( nchklev_1 = 5 ) |
parameter( nchklev_1 = 6 ) |
66 |
integer nchklev_2 |
integer nchklev_2 |
67 |
parameter( nchklev_2 = 2 ) |
parameter( nchklev_2 = 120 ) |
|
c parameter( nchklev_2 = 150 ) |
|
68 |
integer nchklev_3 |
integer nchklev_3 |
69 |
parameter( nchklev_3 = 3 ) |
parameter( nchklev_3 = 3 ) |
|
c parameter( nchklev_3 = 150 ) |
|
70 |
|
|
71 |
c-- Note always check for the correct sizes of the common blocks! |
c-- Note always check for the correct sizes of the common blocks! |
72 |
|
|