FORTRAN90で、

INTEGER :: ARRAY(5)
ARRAY(1) = 1
ARRAY(2) = 2
ARRAY(4) = 4
DO I = 1,5
WRITE(*,*) ARRAY(I)
END DO
END

のように、ところどころ値のない配列をＤＯループで出力
（値の無いときは空行）したいのですが、値のないところで
Reference to undefined character
のエラーを出さないように対処するにはどうしたらよいかどなたかご教授下さい。
コンパイラはSalfordのFTN95です。