PROGRAM noco 
      a = 20
      b = 30
      c = 50
      if (a .LT. b) then
      if (a .LT. c) then
      PRINT*," a is lesser then b and c"
      elif ( a .GT. b ) then 
      PRINT*," a is greater then b"
      else
      PRINT*," no conclisiv"
      elif a==b==c then
      PRINT*," try again"
      END PROGRAM noco