RosettaCodeData/Task/Hello-world-Line-printer/Fortran/hello-world-line-printer.f

      WRITE (6,1)
    1 FORMAT ("+HELLO WORLD!")
      END