1 2 3
program demo write(*, '(a)') "This is a simple example program, but not a real application" end program demo