62 |
#ifdef ALLOW_TAMC_CHECKPOINTING |
#ifdef ALLOW_TAMC_CHECKPOINTING |
63 |
|
|
64 |
integer nchklev_1 |
integer nchklev_1 |
65 |
parameter( nchklev_1 = 24 ) |
parameter( nchklev_1 = 2 ) |
66 |
integer nchklev_2 |
integer nchklev_2 |
67 |
parameter( nchklev_2 = 3330 ) |
parameter( nchklev_2 = 2 ) |
68 |
integer nchklev_3 |
integer nchklev_3 |
69 |
parameter( nchklev_3 = 40 ) |
parameter( nchklev_3 = 4 ) |
70 |
|
cph integer nchklev_4 |
71 |
|
cph parameter( nchklev_4 = 4 ) |
72 |
|
|
73 |
c-- Note always check for the correct sizes of the common blocks! |
c-- Note always check for the correct sizes of the common blocks! |
74 |
|
|