INTEGER N_TRK_MAX,BUFF_LENGTH,FPL_LNG_MAX
PARAMETER (FPL_LNG_MAX=25000)
PARAMETER (BUFF_LENGTH=10000)
PARAMETER (N_TRK_MAX=1000)
INTEGER LAYER_GAP,
& inddat_dhre, dhre_e_size,phi_dir_cur_1,phi_dir_cur_2,
& first_itr2,last_itr2,inddat_dprs_array(N_TRK_MAX),
& merge_buff(BUFF_LENGTH),n_itr1_checked,n_itr2_checked
REAL COMBINING_GAP
COMMON /merge_internals/ LAYER_GAP,COMBINING_GAP,
& inddat_dhre, dhre_e_size, phi_dir_cur_1,phi_dir_cur_2,
& first_itr2,last_itr2,n_itr1_checked,n_itr2_checked,
& inddat_dprs_array,merge_buff
[KLOE]
[Offline Doc]
[TRK Files]
Generated with Light on Thu Apr 8 13:00:16 MET DST 1999
.
Mail comments and suggestions.