- integer idfadis_start,idfadis_end,
- & idfaphi_start,idfaphi_end,
- & idfathe_start,idfathe_end,
- & idfanei_start,idfanei_end
+ integer idfadis_start,idfadis_end,idfaphi_start,idfaphi_end,
+ & idfathe_start,idfathe_end,idfanei_start,idfanei_end,
+ & idfadis_start_all(0:max_fg_procs-1),
+ & idfadis_end_all(0:max_fg_procs-1),
+ & idfaphi_start_all(0:max_fg_procs-1),
+ & idfaphi_end_all(0:max_fg_procs-1),
+ & idfathe_start_all(0:max_fg_procs-1),
+ & idfathe_end_all(0:max_fg_procs-1),
+ & idfanei_start_all(0:max_fg_procs-1),
+ & idfanei_end_all(0:max_fg_procs-1)