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