自编反应谱计算Fortran程序！ [复制链接]

谢谢了，谢谢楼主的分享！

感谢楼主分享，下载学习~~

优秀资料，感谢！

我拿你的程序试了一下，怎么数据点数少于1000的时候可以有结果 K=B[MT#V{2  
超过1000，就没有结果，这是什么怎么回事？

准确地说是，1000个数据点的时候可以， 0[hl&7 Ab@  
2000个就不行了，大于2000的更不行 1-qQp.Wj  
不明白到底是什么原因

仔细比较了一下，楼主的数据格式： }U#S*  
33.495    -0.3126 h{h=',o1  
33.500    -0.2890 $h$+EE!  
33.505    -0.1633 c/hml4  
33.510    -0.1043 n&Al~-Q:^  
33.515    -0.0415 xw=B4u'z  
33.520    -0.0533 @L~
y%#  
33.525    -0.1751

t>25IJG  
33.530    -0.1397 ^QnVYTM  
33.535    -0.0179 Xajjzl\b  
"@f`O  
我的数据格式： F^aD!O ~  
16.000000 -0.003220 fqr}tvMr=T  
16.004999 -0.041800 jf%Ydr}`  
16.010000 -0.076500 ae^xuM?7  
16.014999 -0.123000 (Ux%7H_d  
16.020000 -0.119000 a;h:o>Do5  
16.025000 -0.111000 )Z^(+  
16.030001 -0.064900 /g8yc'{p  
16.035000 -0.014800 d+IPa<N  
16.040001  0.016100 +V'Z%;/  
16.045000  0.046900 R]r~TJ o  
16.049999  0.035300 2N]y)S_<V  
16.055000  0.016100 =_UPZ]  
16.059999  0.008350 -~aVt~{k/  
16.065001  0.008350 #A))#sT'R  
16.070000  0.035300 M9N|Ql  
16.075001  0.058500 hm5<_(F!  
16.080000  0.054600 sVC5<?OW!p  
16.084999  0.031500 @vv`86bm  
16.090000 -0.014800 r*3;gyG.,#  
16.094999 -0.068800 LD6fi  
16.100000 -0.107000 Z@h]dU5%a  
16.105000 -0.127000 4s"HO/  
16.110001 -0.130000 59ivL6=3  
16.115000 -0.115000 &/zsIx+  
16.120001 -0.084200 'WOWm$2  
Jrffb=+b  
用楼主的数据就是可以的，用我的就是不行 3oIoQj+D  
看来就是我的数据格式的问题了 b"zq3$6*  
J L Z  
我应该怎样修改才可以用？ .58AXg  

解决了，修改了我的数据格式 QvqBT  
    0.0000   -0.0032 #._!.P  
    0.0050   -0.0418 dk.da&P  
    0.0100   -0.0765 9XoKOR(  
    0.0150   -0.1227 :l7\7IT  
    0.0200   -0.1189 q)%C
|  
    0.0250   -0.1112 >!oN+8[~  
    0.0300   -0.0649 Na`qAj}  
    0.0350   -0.0148 ~{N|("nB  
Ii K&v<(]  
数组维数若不够，调大 d- ]%  

谢谢啦~~~~~~~~~~~~

呵呵  我正在学习中

感谢楼主的无私奉献，大家一起进步

太好了！谢谢楼主！

好东西，下载