!
!
!##################################################################
!##################################################################
!######                                                      ######
!######                SUBROUTINE WIRFRM                     ######
!######                                                      ######
!######                     Developed by                     ######
!######     Center for Analysis and Prediction of Storms     ######
!######                University of Oklahoma                ######
!######                                                      ######
!##################################################################
!##################################################################
!


SUBROUTINE wirfrm 3,1
!
!
!-----------------------------------------------------------------------
!
!  PURPOSE:
!
!  A dummy routine to be called instead of the functional routine
!  wrifrm when NCAR graphics library is not available.
!
!-----------------------------------------------------------------------
!
!  AUTHOR: Ming Xue
!  7/30/92
!
!  MODIFICATION HISTORY:
!
!-----------------------------------------------------------------------
!

!
!@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
!
!  Beginning of executable code...
!
!@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
!

  RETURN
END SUBROUTINE wirfrm