Example

Example: ELSE IF:

       READ (*,*) N 
       IF ( N .LT. 0 ) THEN 
              WRITE(*,*) 'N<0'
       ELSE IF ( N .EQ. 0) THEN
              WRITE(*,*) 'N=0' 
       ELSE
              WRITE(*,*) 'N>0'
       END IF