MODULE module_ra_rrtmg_lwf
      CONTAINS
      SUBROUTINE RRTMG_LWRAD_FAST
         REAL :: dummy 
         dummy = 1
      END SUBROUTINE RRTMG_LWRAD_FAST
      END MODULE module_ra_rrtmg_lwf