# Program to overwrite an existing file

open(11,FILE="file.txt")
101 format(A)
write(11,101) "Hello World"
close(11)

end