将实数写入字符串时记录结束答案

【问题标题】：End of record when writing real to a string将实数写入字符串时记录结束
【发布时间】：2017-01-08 22:14:07
【问题描述】：

我在使用 Fortran 95 时遇到运行时错误：

At line 73 of file calcCenterOfMass.f95
Fortran runtime error: End of record

第 73 行的代码是

WRITE(TIMEDIR, '(f10.2)') CURRENTTIME

其中TIMEDIR 是一个字符串，CURRENTTIME 是一个实数。

我猜问题是TIMEDIR 的长度为 4，因为字符串的形状必须为 0.00、0.01 等。但默认长度 real 比四个字符长。

是这个问题，然后，如何解决？

【问题讨论】：

【解决方案1】：

f10.2 格式表示长度为 10 个字符，包含 2 个小数。（所以会是xxxxxxx.xx）

如果要0.01左右，需要格式f4.2

【讨论】：