MODULE Chltot_Module USE Narran_Module SAVE INTEGER nchanl(narran) ! nchanl Number of coupled-channels in each arrangement channel. NAMELIST/chltot/ nchanl END MODULE Chltot_Module