module radstub

      contains

      subroutine radial

      write(*,*) 'This option is not available.'
      write(*,*) 'Stopping in radstub'
      stop


      end subroutine radial


      subroutine nt_init


      end subroutine nt_init

      end module radstub