      INTEGER*2 IDM_ABOUT
      PARAMETER (IDM_ABOUT=100)

      INTEGER*2 HINST ! Instance of this application

      COMMON /FORTWIN_HINST/HINST
