resi_rou.dat

用FORTRAN语言实现二维欧拉方程的求解

 time    Resi_rou     
           1  0.1192851    
           2  8.4663153E-02
           3  7.0840359E-02
           4  7.2303176E-02
           5  7.5371981E-02
           6  7.4776292E-02
           7  7.1799159E-02
           8  6.8485022E-02
           9  7.0847154E-02
          10  7.2395086E-02
          11  7.2718143E-02
          12  7.2089553E-02
          13  7.1022511E-02
          14  7.0708513E-02
          15  7.1873546E-02
          16  7.1991324E-02
          17  7.1700692E-02
          18  7.1258426E-02
          19  7.0899963E-02
          20  7.0271492E-02
          21  7.0251346E-02
          22  7.0417285E-02
          23  7.0278525E-02
          24  6.9574356E-02
          25  6.8285108E-02
          26  6.8189025E-02
          27  6.7050576E-02
          28  6.7469835E-02
          29  6.6769958E-02
          30  6.5882206E-02
          31  6.5626264E-02
          32  6.4766765E-02
          33  6.5420389E-02
          34  7.3062062E-02
          35  8.4525585E-02
          36  9.1885090E-02
          37  9.5016003E-02
          38  9.7289801E-02
          39  9.7166419E-02
          40  9.6883535E-02
          41  9.5402598E-02
          42  9.1145992E-02
          43  8.4237456E-02
          44  8.1706882E-02
          45  8.2115650E-02
          46  8.1489325E-02
          47  7.9741836E-02
          48  7.7178240E-02
          49  7.3263764E-02
          50  7.1001291E-02
          51  7.1061015E-02
          52  6.9222808E-02
          53  6.5415978E-02
          54  6.4628005E-02
          55  6.1274767E-02
          56  6.2773466E-02
          57  6.0967922E-02
          58  5.8535814E-02
          59  6.0213089E-02
          60  5.8551550E-02
          61  5.7919741E-02
          62  5.7501078E-02
          63  6.2235594E-02
          64  6.9169283E-02
          65  7.4299455E-02
          66  7.9263449E-02
          67  8.1552744E-02
          68  8.2400203E-02
          69  8.5284352E-02
          70  8.4710240E-02
          71  8.3981395E-02
          72  8.6558700E-02
          73  8.5432887E-02
          74  8.1623316E-02
          75  8.2120538E-02
          76  7.9630733E-02
          77  7.3810697E-02
          78  7.0052385E-02
          79  7.0617914E-02
          80  7.5353503E-02
          81  7.7272654E-02
          82  7.9432249E-02
          83  8.1437826E-02
          84  8.1699252E-02
          85  7.9907894E-02
          86  7.9637408E-02
          87  8.0146313E-02
          88  8.4094405E-02
          89  8.2848549E-02
          90  7.9896569E-02
          91  8.1460238E-02
          92  8.5021138E-02
          93  8.4645033E-02
          94  8.7561011E-02
          95  8.7423801E-02
          96  8.4696770E-02
          97  8.4128857E-02
          98  8.6242199E-02
          99  8.8343740E-02
         100  8.8814855E-02
         101  8.9632750E-02
         102  9.8898411E-02
         103  0.1051223    
         104  0.1091608    
         105  0.1115232    
         106  0.1171838    
         107  0.1198032    
         108  0.1228905    
         109  0.1223458    
         110  0.1192932    
         111  0.1158834    
         112  0.1168832    
         113  0.1183718    
         114  0.1178874    
         115  0.1158954    
         116  0.1122074    
         117  0.1074498    
         118  0.1023825    
         119  9.8170161E-02
         120  9.9138737E-02
         121  9.9199891E-02
         122  9.7879410E-02
         123  9.5407724E-02
         124  9.2449427E-02
         125  8.8966489E-02
         126  8.5068464E-02
         127  8.2546234E-02
         128  8.1253767E-02
         129  7.9821944E-02
         130  7.8654289E-02
         131  8.4101915E-02
         132  9.5813274E-02
         133  9.9155307E-02
         134  0.1016853    
         135  0.1075141    
         136  0.1126012    
         137  0.1132590    
         138  0.1139646    
         139  0.1166954    
         140  0.1154552    
         141  0.1130155    
         142  0.1124300    
         143  0.1109192    
         144  0.1075324    
         145  0.1024084    
         146  0.1023381    
         147  0.1024877    
         148  0.1021652    
         149  0.1008149    
         150  9.7319961E-02
         151  9.2270017E-02
         152  8.6864710E-02
         153  8.6404920E-02
         154  8.5918427E-02
         155  8.4022284E-02
         156  8.1375241E-02
         157  7.7679276E-02
         158  7.2972298E-02
         159  7.2048426E-02
         160  7.1362257E-02
         161  7.0035577E-02
         162  6.8758011E-02
         163  6.6422820E-02
         164  6.3308954E-02
         165  6.2611580E-02
         166  6.4745069E-02
         167  7.4885368E-02
         168  8.0006361E-02
         169  8.0251813E-02
         170  8.5168481E-02
         171  8.9346528E-02
         172  9.2345238E-02
         173  9.5382810E-02
         174  0.1000671    
         175  0.1002109    
         176  9.9477530E-02
         177  9.9283338E-02
         178  9.9133372E-02
         179  9.8583698E-02
         180  9.7751498E-02
         181  9.6428752E-02
         182  9.6877813E-02
         183  9.6394420E-02
         184  9.4910622E-02
         185  9.4716311E-02
         186  9.4944358E-02
         187  9.3445182E-02
         188  9.0256810E-02
         189  8.8837385E-02
         190  8.8544965E-02
         191  8.7856889E-02
         192  8.6508512E-02
         193  8.4259629E-02
         194  8.1780672E-02
         195  8.0556870E-02
         196  8.0987096E-02
         197  8.0331683E-02
         198  8.2337141E-02
         199  8.6674333E-02
         200  9.1170788E-02
         201  9.3997598E-02
         202  9.5516086E-02
         203  9.5710397E-02
         204  9.5945597E-02
         205  9.6427083E-02
         206  9.6297026E-02
         207  9.4988108E-02
         208  9.2602134E-02
         209  8.8549495E-02
         210  8.6735845E-02
         211  8.8527441E-02
         212  8.7956548E-02
         213  9.0220690E-02
         214  9.1834664E-02
         215  9.4743848E-02
         216  9.6573830E-02
         217  9.6884012E-02
         218  9.6438408E-02
         219  9.5083594E-02
         220  9.2483044E-02
         221  8.9053392E-02
         222  8.8516831E-02
         223  8.7148547E-02
         224  8.6598158E-02
         225  8.6640358E-02
         226  8.5956097E-02
         227  8.2886815E-02
         228  8.1443429E-02
         229  8.0598712E-02
         230  7.8915477E-02
         231  8.5272908E-02
         232  9.4401717E-02
         233  9.1597557E-02
         234  9.2080832E-02
         235  9.4457507E-02
         236  9.3623042E-02
         237  9.3668461E-02
         238  9.4970465E-02
         239  0.1004132    
         240  0.1032406    
         241  0.1033109    
         242  0.1017123    
         243  9.9745274E-02
         244  9.8883510E-02
         245  9.9452853E-02
         246  0.1004469    
         247  0.1007073    
         248  9.9846244E-02
         249  9.7584367E-02
         250  9.6226454E-02
         251  9.5721006E-02
         252  9.6695304E-02
         253  9.9112749E-02
         254  0.1020827    
         255  0.1042775    
         256  0.1046720    
         257  0.1014682    
         258  9.3448997E-02
         259  9.7714782E-02
         260  0.1036243    
         261  0.1041985    
         262  9.6932888E-02
         263  9.2656732E-02
         264  0.1014041    
         265  0.1026115    
         266  9.4762564E-02
         267  8.8716984E-02
         268  9.7138882E-02
         269  9.8286152E-02
         270  0.1012875    
         271  9.9163175E-02
         272  0.1020365    
         273  0.1033386    
         274  0.1026970    
         275  0.1002797    
         276  9.6640825E-02
         277  9.8609209E-02
         278  0.1001773    
         279  0.1003048    
         280  9.7221971E-02
         281  9.0149879E-02
         282  9.2529893E-02
         283  9.1888189E-02
         284  8.6442709E-02
         285  8.3709359E-02
         286  8.6496949E-02
         287  8.4370971E-02
         288  8.1194282E-02
         289  8.4796429E-02
         290  8.1531882E-02
         291  8.2678914E-02
         292  8.5377216E-02
         293  8.4350824E-02
         294  7.7748656E-02
         295  8.4567904E-02
         296  8.6825132E-02
         297  8.2794070E-02
         298  7.6853037E-02
         299  8.2960248E-02
         300  8.3337426E-02
         301  8.5635424E-02
         302  8.6283803E-02
         303  8.6398125E-02
         304  8.2792282E-02
         305  7.6143026E-02
         306  7.7727199E-02
         307  7.1822762E-02
         308  7.2251916E-02
         309  7.4990392E-02
         310  7.2832227E-02
         311  7.5957298E-02
         312  7.7922225E-02
         313  7.9434156E-02
         314  7.8713179E-02
         315  7.8382373E-02
         316  7.6662183E-02
         317  7.3516011E-02
         318  7.0789814E-02
         319  7.7396274E-02
         320  8.0069065E-02
         321  8.1357360E-02
         322  8.5696220E-02
         323  8.8564277E-02
         324  9.1032624E-02
         325  9.2414618E-02
         326  9.1339231E-02
         327  8.6763620E-02
         328  8.5863352E-02
         329  8.7583065E-02
         330  8.8819027E-02
         331  8.6521268E-02
         332  7.9955935E-02
         333  9.0281129E-02
         334  9.4270468E-02
         335  9.0063334E-02
         336  8.1135869E-02
         337  7.4980855E-02
         338  7.8895569E-02
         339  7.4094176E-02
         340  7.8763485E-02
         341  8.3128572E-02
         342  7.7728510E-02
         343  7.5234890E-02
         344  8.0907822E-02
         345  8.0630779E-02
         346  7.5610280E-02
         347  7.6986551E-02
         348  7.5042963E-02
         349  6.9891453E-02
         350  7.1177602E-02
         351  7.2227240E-02
         352  7.1190834E-02
         353  7.3510051E-02
         354  7.5334787E-02
         355  7.6037765E-02
         356  7.7694654E-02
         357  7.4216366E-02
         358  6.5404534E-02
         359  6.6161275E-02
         360  6.4722300E-02
         361  6.3258290E-02
         362  6.2710166E-02
         363  6.7676187E-02
         364  7.2857380E-02
         365  7.4023485E-02
         366  6.8443894E-02
         367  6.7773819E-02
         368  6.4179659E-02
         369  6.5176725E-02
         370  6.4892411E-02
         371  6.7194223E-02
         372  6.4889193E-02
         373  6.8425775E-02
         374  6.9288731E-02
         375  6.5958500E-02
         376  6.7184925E-02
         377  6.9615245E-02
         378  6.9561839E-02
         379  6.8534851E-02
         380  6.9218993E-02
         381  7.2893023E-02
         382  6.2293410E-02
         383  6.8778038E-02
         384  7.0854545E-02
         385  7.3186278E-02
         386  6.6941977E-02
         387  6.3667178E-02
         388  6.4822197E-02
         389  6.7983508E-02
         390  7.0521593E-02
         391  7.4209332E-02
         392  7.3904514E-02
         393  7.0381999E-02
         394  6.9834828E-02
         395  7.5917840E-02
         396  7.7089310E-02
         397  7.6497316E-02
         398  8.0989957E-02
         399  7.8900337E-02
         400  7.2973251E-02
         401  7.6071858E-02
         402  7.7178776E-02
         403  8.6276174E-02
         404  8.8430285E-02
         405  8.9687347E-02
         406  9.0873122E-02
         407  9.0057731E-02
         408  8.3293676E-02
         409  8.0714047E-02
         410  8.6636662E-02
         411  8.1721663E-02
         412  7.6660275E-02
         413  7.9692841E-02
         414  8.2467556E-02
         415  8.2281351E-02
         416  8.2496285E-02
         417  8.7288737E-02
         418  8.8386536E-02
         419  8.6054087E-02
         420  8.2523227E-02
         421  8.0061674E-02
         422  8.2167387E-02
         423  8.2928896E-02
         424  8.2471132E-02
         425  8.1270456E-02
         426  8.3142400E-02
         427  8.8422298E-02
         428  9.2567205E-02
         429  9.5040917E-02
         430  9.1451287E-02
         431  7.6985359E-02
         432  7.4658871E-02
         433  7.8788042E-02
         434  8.3035231E-02
         435  8.3479643E-02
         436  7.8214884E-02
         437  7.3785543E-02
         438  7.5136542E-02
         439  7.5976491E-02
         440  8.2213283E-02
         441  8.7448597E-02
         442  8.9676499E-02
         443  8.6080074E-02
         444  9.2408299E-02
         445  9.0508580E-02
         446  9.6212268E-02
         447  0.1004696    
         448  9.5547795E-02
         449  9.1059685E-02
         450  9.3573332E-02
         451  8.9996099E-02
         452  8.8557124E-02
         453  9.5738173E-02
         454  9.4663382E-02
         455  9.2453837E-02
         456  9.1499686E-02
         457  9.2587948E-02
         458  9.1864228E-02
         459  9.3352795E-02
         460  9.2805624E-02
         461  9.0593815E-02
         462  8.6255789E-02
         463  9.4228625E-02
         464  0.1006410    
         465  0.1024216    
         466  9.9992156E-02
         467  9.4747782E-02
         468  9.1814876E-02
         469  9.8569274E-02
         470  0.1028939    
         471  0.1015300    
         472  9.4461679E-02
         473  8.6707115E-02
         474  8.4889531E-02
         475  9.3306303E-02
         476  9.8423958E-02
         477  9.7885370E-02
         478  9.7968221E-02
         479  9.6435189E-02
         480  9.9999547E-02
         481  0.1009479    
         482  9.6884131E-02
         483  9.1540575E-02
         484  0.1047453    
         485  0.1123662    
         486  0.1135507    
         487  0.1089457    
         488  0.1018201    
         489  9.4889641E-02
         490  9.2582822E-02
         491  8.9583278E-02
         492  9.6266747E-02
         493  9.5585704E-02
         494  0.1002197    
         495  0.1110910    
         496  0.1176602    
         497  0.1191472    
         498  0.1165227    
         499  0.1096854    
         500  0.1003901