Basic bitmap storage/Fortran

From Rosetta Code