主题:fortran输出格式求教
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
1,4hs/r=,e13.6//3x,3hmw=,e13.6,3x,5hcp/r=,e13.6,3x,6hdlvpt=,f13.6,3
2x,6=hdlvtp=,e13.6,3x,9hgamma(s)=,e13.6,3x,2hv=,e13.6)
上面这段格式是在固定格式下编写,编译过程中出错,请高手指教,具体什么问题。如下:
E:\TEST\nasa\test.for(470) : Error: This character is not valid in a format list. [=]
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
^
E:\TEST\nasa\test.for(470) : Error: This character is not valid in a format list. [h]
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
^
E:\TEST\nasa\test.for(470) : Error: This character is not valid in a format list. [v]
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
^
E:\TEST\nasa\test.for(470) : Error: This character is not valid in a format list. [=]
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
^
E:\TEST\nasa\test.for(472) : Error: This format list edit descriptor must not be repeated. [9Hgamma(s)=]
2x,6=hdlvtp=,e13.6,3x,9hgamma(s)=,e13.6,3x,2hv=,e13.6)
---------------------------^
Error executing df.exe.
test.obj - 5 error(s), 0 warning(s)
1,4hs/r=,e13.6//3x,3hmw=,e13.6,3x,5hcp/r=,e13.6,3x,6hdlvpt=,f13.6,3
2x,6=hdlvtp=,e13.6,3x,9hgamma(s)=,e13.6,3x,2hv=,e13.6)
上面这段格式是在固定格式下编写,编译过程中出错,请高手指教,具体什么问题。如下:
E:\TEST\nasa\test.for(470) : Error: This character is not valid in a format list. [=]
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
^
E:\TEST\nasa\test.for(470) : Error: This character is not valid in a format list. [h]
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
^
E:\TEST\nasa\test.for(470) : Error: This character is not valid in a format list. [v]
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
^
E:\TEST\nasa\test.for(470) : Error: This character is not valid in a format list. [=]
201 format(7h0point=,i3,3x,2hp=,e13.6,3x,2ht=,e13.6,3x,4hh/r=,e13.6,3x
^
E:\TEST\nasa\test.for(472) : Error: This format list edit descriptor must not be repeated. [9Hgamma(s)=]
2x,6=hdlvtp=,e13.6,3x,9hgamma(s)=,e13.6,3x,2hv=,e13.6)
---------------------------^
Error executing df.exe.
test.obj - 5 error(s), 0 warning(s)