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

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

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

优秀资料，感谢！

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

准确地说是，1000个数据点的时候可以， N{yZk"fq:6  
2000个就不行了，大于2000的更不行 &Os Ritj  
不明白到底是什么原因

仔细比较了一下，楼主的数据格式： 1hWz%c|  
33.495    -0.3126 a40BisrD~6  
33.500    -0.2890 J_@4J7  
33.505    -0.1633 hH/O2  
33.510    -0.1043 T1&H!  
33.515    -0.0415
~] 2R+  
33.520    -0.0533 YLo$n  
33.525    -0.1751 WGx>{'LJ  
33.530    -0.1397 H%N+Vr3O,  
33.535    -0.0179 OEW,[d  
pAuwSn#i  
我的数据格式： >xKRU5  
16.000000 -0.003220 k]iS3+nD  
16.004999 -0.041800 QEKFuY<E+  
16.010000 -0.076500 ;gnr\C*G  
16.014999 -0.123000 z-G (!]:  
16.020000 -0.119000 /f<(K-o]  
16.025000 -0.111000 nL!@#{z  
16.030001 -0.064900 !y?hn$w0  
16.035000 -0.014800 -pu\p-Z  
16.040001  0.016100 sD+G+  
16.045000  0.046900 <UdD@(iZ#  
16.049999  0.035300 UGt7iT<`8  
16.055000  0.016100 %#a%Luq  
16.059999  0.008350 QO/7p]$_  
16.065001  0.008350 +GU16+w~E  
16.070000  0.035300 O$/swwB!  
16.075001  0.058500 cx(F,?SbS  
16.080000  0.054600 C>dJ:.K%H  
16.084999  0.031500 {;DZ@2|  
16.090000 -0.014800 y3]"H(  
16.094999 -0.068800 VH6|(=8  
16.100000 -0.107000 MlE~gCD  
16.105000 -0.127000 #UD  
16.110001 -0.130000 CD[=z)<z{  
16.115000 -0.115000 ;@ X  
16.120001 -0.084200 vh8Kd' y  
KBe {  
用楼主的数据就是可以的，用我的就是不行 %iC63)(M  
看来就是我的数据格式的问题了 >L`mF_WG  
D.R  
我应该怎样修改才可以用？ 3yB6]U  

解决了，修改了我的数据格式 8z8SwWS?  
    0.0000   -0.0032 )}\@BtcjA]  
    0.0050   -0.0418 @b\_696.  
    0.0100   -0.0765 .hNw1~Fj  
    0.0150   -0.1227 S{7ik,Gdg  
    0.0200   -0.1189 Rbc2g"]  
    0.0250   -0.1112 ={@ @`yP^$  
    0.0300   -0.0649 u!Nfoq&'u  
    0.0350   -0.0148 i=H>D  
^-*Tn  
数组维数若不够，调大 9Sl|l.;!  

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

呵呵  我正在学习中

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

太好了！谢谢楼主！

好东西，下载