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

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

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

优秀资料，感谢！

我拿你的程序试了一下，怎么数据点数少于1000的时候可以有结果 N!af1zj  
超过1000，就没有结果，这是什么怎么回事？

准确地说是，1000个数据点的时候可以， +JBYGYN&K  
2000个就不行了，大于2000的更不行 nTXM/  
不明白到底是什么原因

仔细比较了一下，楼主的数据格式： C'//(gjQ-G  
33.495    -0.3126 1ml{oqNj  
33.500    -0.2890 ,~xX[uB  
33.505    -0.1633 [=KA
5c<  
33.510    -0.1043 gK"E4{y_@  
33.515    -0.0415 ]bb`6 \h  
33.520    -0.0533 wWUt44:0O  
33.525    -0.1751 gJI(d6  
33.530    -0.1397 3%SwCYd  
33.535    -0.0179 km#Rh^  
]$a,/Jt  
我的数据格式： Nm=\~LP90  
16.000000 -0.003220 &o*f*(C2  
16.004999 -0.041800 .UJjB}4$f  
16.010000 -0.076500 d+:pZ  
16.014999 -0.123000 dWAKIBe  
16.020000 -0.119000 #1` lJ  
16.025000 -0.111000 ){{]3r  
16.030001 -0.064900 :f58JLX  
16.035000 -0.014800 .6nNqGua1  
16.040001  0.016100 lip1wR7  
16.045000  0.046900 /\1MG>#K  
16.049999  0.035300 k'$
UA$2d  
16.055000  0.016100 75t5:>"[  
16.059999  0.008350 /tGj`C&qtw  
16.065001  0.008350 )'gO
?cN  
16.070000  0.035300  } h0 )  
16.075001  0.058500 1K'.QRZMb9  
16.080000  0.054600 ZSg["`  
16.084999  0.031500 V$XCe  
16.090000 -0.014800 7IH^5r  
16.094999 -0.068800 8'X:}O/  
16.100000 -0.107000 ]f"l4ay@M  
16.105000 -0.127000 PE-P(T3s[8  
16.110001 -0.130000 $Sfx0?'  
16.115000 -0.115000 c|^#v8x^/  
16.120001 -0.084200 H+ Y+8   
XQ]5W(EP  
用楼主的数据就是可以的，用我的就是不行 v"dj%75O?e  
看来就是我的数据格式的问题了 m"Y|xvIA  
AmmUoS\
 
我应该怎样修改才可以用？ }vLK-Vv  

解决了，修改了我的数据格式 [:!D.@h|  
    0.0000   -0.0032 L:g!f  
    0.0050   -0.0418 ]M;aVw<!  
    0.0100   -0.0765 H,!3s<1  
    0.0150   -0.1227 >b.wk3g@>  
    0.0200   -0.1189 DxLN{
g]B  
    0.0250   -0.1112 $`&uu  
    0.0300   -0.0649 wKq-|yf,  
    0.0350   -0.0148 aI6fPQe  
=fZ)2q  
数组维数若不够，调大 ,\BGxGNAmV  

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

呵呵  我正在学习中

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

太好了！谢谢楼主！

好东西，下载