************************************************************************
* File: endif.for
************************************************************************
* Scopo: Dimostra che l'ENDIF e' necessario
************************************************************************

      PROGRAM prova
      IF (10 .GT. 30) then
          write (*,*) 'LO FA!'
* Errore di compilazione
* ..\PROGfort\prova.for(7) : error F2812: ENDIF missing
      STOP
      END
