11 |
|
|
12 |
! Time variables |
! Time variables |
13 |
INTEGER, SAVE:: itau0(nb_files_max)=0 |
INTEGER, SAVE:: itau0(nb_files_max)=0 |
|
REAL, DIMENSION(nb_files_max), SAVE::date0, deltat |
|
14 |
|
|
15 |
! Counter of elements |
! Counter of elements |
16 |
INTEGER, DIMENSION(nb_files_max), SAVE:: nb_var=0, nb_tax=0 |
INTEGER, DIMENSION(nb_files_max), SAVE:: nb_var=0, nb_tax=0 |
47 |
scsize, zorig, zsize |
scsize, zorig, zsize |
48 |
! Sizes for the data as it goes through the various math operations |
! Sizes for the data as it goes through the various math operations |
49 |
INTEGER, SAVE:: datasz_in(nb_files_max, nb_var_max, 3) = -1 |
INTEGER, SAVE:: datasz_in(nb_files_max, nb_var_max, 3) = -1 |
|
INTEGER, SAVE:: datasz_max(nb_files_max, nb_var_max) = -1 |
|
50 |
|
|
51 |
INTEGER, DIMENSION(nb_files_max, nb_var_max), SAVE:: var_haxid, var_zaxid, & |
INTEGER, DIMENSION(nb_files_max, nb_var_max), SAVE:: var_haxid, var_zaxid, & |
52 |
var_axid, ncvar_ids |
var_axid |
53 |
|
|
54 |
REAL, SAVE:: minmax(nb_files_max, nb_var_max, 2) |
REAL, SAVE:: minmax(nb_files_max, nb_var_max, 2) |
55 |
|
|
56 |
REAL, DIMENSION(nb_files_max, nb_var_max), SAVE:: & |
REAL, DIMENSION(nb_files_max, nb_var_max), SAVE:: freq_opp, freq_wrt |
57 |
freq_opp, freq_wrt |
INTEGER, DIMENSION(nb_files_max, nb_var_max), SAVE:: last_opp, last_wrt, & |
58 |
INTEGER, DIMENSION(nb_files_max, nb_var_max), SAVE:: & |
last_opp_chk, last_wrt_chk, nb_opp, nb_wrt |
|
last_opp, last_wrt, last_opp_chk, last_wrt_chk, nb_opp, nb_wrt, point |
|
59 |
|
|
60 |
! Book keeping for the buffers |
! Book keeping for the buffers |
61 |
INTEGER:: buff_pos = 0 |
LOGICAL:: zoom(nb_files_max) = .FALSE. |
|
REAL, ALLOCATABLE, SAVE:: buffer(:) |
|
|
LOGICAL:: zoom(nb_files_max) = .FALSE., regular(nb_files_max) = .TRUE. |
|
62 |
|
|
63 |
! Book keeping of the axes |
! Book keeping of the axes |
64 |
|
|