Why do I get 'no space left on device' error when writing from Fortran?

Your Fortran program seems to be writing a large file of stripe size 1, resulting in an error like:

forrtl: No space left on device, forrtl: severe (38): error during write, unit 12, file /lustre/scratch/$USER/...

Move the partially transferred file elsewhere or delete it. Then, cd to the directory where the partially transferred file once was. Issue the following command to change the striping of the directory:

lfs setstripe . -c 8