MODULE Pow_Module USE Narran_Module SAVE INTEGER :: npow(narran) = 0 ! number of term to include in the vibration expansion of the potential. END MODULE Pow_Module