RHGRD.f

    module rhgrd_mod
!-----------------------------------------------------------------------
    implicit none
!
      real :: rhgrd
!-----------------------------------------------------------------------
    end module rhgrd_mod