dianshuju.dat

用fortran编写的长波传播计算程序

  -0.39939
  -0.40066
  -0.40192
  -0.40317
  -0.40442
  -0.40565
  -0.40688
  -0.40811
  -0.40932
  -0.41053
  -0.41174
  -0.41293
  -0.41412
  -0.41530
  -0.41647
  -0.41763
  -0.41879
  -0.41994
  -0.42108
  -0.42222
  -0.42334
  -0.42446
  -0.42558
  -0.42668
  -0.42778
  -0.42887
  -0.42995
  -0.43102
  -0.43209
  -0.43315
  -0.43420
  -0.43524
  -0.43628
  -0.43731
  -0.43833
  -0.43934
  -0.44034
  -0.44134
  -0.44233
  -0.44331
  -0.44428
  -0.44524
  -0.44620
  -0.44715
  -0.44809
  -0.44902
  -0.44995
  -0.45087
  -0.45177
  -0.45267
  -0.45357
  -0.45445
  -0.45533
  -0.45620
  -0.45706
  -0.45791
  -0.45875
  -0.45959
  -0.46042
  -0.46124
  -0.46205
  -0.46285
  -0.46364
  -0.46443
  -0.46521
  -0.46598
  -0.46674
  -0.46749
  -0.46824
  -0.46897
  -0.46970
  -0.47042
  -0.47113
  -0.47184
  -0.47253
  -0.47322
  -0.47389
  -0.47456
  -0.47522
  -0.47588
  -0.47652
  -0.47716
  -0.47778
  -0.47840
  -0.47901
  -0.47961
  -0.48020
  -0.48079
  -0.48136
  -0.48193
  -0.48249
  -0.48304
  -0.48358
  -0.48411
  -0.48463
  -0.48515
  -0.48566
  -0.48615
  -0.48664
  -0.48712
  -0.48760
  -0.48806
  -0.48851
  -0.48896
  -0.48940
  -0.48982
  -0.49024
  -0.49065
  -0.49106
  -0.49145
  -0.49183
  -0.49221
  -0.49258
  -0.49293
  -0.49328
  -0.49362
  -0.49396
  -0.49428
  -0.49459
  -0.49490
  -0.49519
  -0.49548
  -0.49576
  -0.49603
  -0.49629
  -0.49654
  -0.49679
  -0.49702
  -0.49725
  -0.49746
  -0.49767
  -0.49787
  -0.49806
  -0.49824
  -0.49842
  -0.49858
  -0.49873
  -0.49888
  -0.49902
  -0.49914
  -0.49926
  -0.49937
  -0.49947
  -0.49957
  -0.49965
  -0.49972
  -0.49979
  -0.49985
  -0.49989
  -0.49993
  -0.49996
  -0.49998
  -0.50000
  -0.50000
  -0.49999
  -0.49998
  -0.49996
  -0.49992
  -0.49988
  -0.49983
  -0.49977
  -0.49970
  -0.49963
  -0.49954
  -0.49945
  -0.49934
  -0.49923
  -0.49911
  -0.49898
  -0.49884
  -0.49869
  -0.49853
  -0.49837
  -0.49819
  -0.49801
  -0.49782
  -0.49761
  -0.49740
  -0.49718
  -0.49696
  -0.49672
  -0.49647
  -0.49622
  -0.49595
  -0.49568
  -0.49540
  -0.49511
  -0.49481
  -0.49450
  -0.49419
  -0.49386
  -0.49353
  -0.49318
  -0.49283
  -0.49247
  -0.49210
  -0.49172
  -0.49134
  -0.49094
  -0.49054
  -0.49012
  -0.48970
  -0.48927
  -0.48883
  -0.48838
  -0.48793
  -0.48746
  -0.48699
  -0.48650
  -0.48601
  -0.48551
  -0.48500
  -0.48448
  -0.48396
  -0.48342
  -0.48288
  -0.48233
  -0.48177
  -0.48120
  -0.48062
  -0.48003
  -0.47944
  -0.47883
  -0.47822
  -0.47760
  -0.47697
  -0.47633
  -0.47569
  -0.47503
  -0.47437
  -0.47370
  -0.47302
  -0.47233
  -0.47163
  -0.47093
  -0.47021
  -0.46949
  -0.46876
  -0.46802
  -0.46728
  -0.46652
  -0.46576
  -0.46498
  -0.46420
  -0.46342
  -0.46262
  -0.46181
  -0.46100
  -0.46018
  -0.45935
  -0.45851
  -0.45766
  -0.45681
  -0.45595
  -0.45508
  -0.45420
  -0.45331
  -0.45242
  -0.45151
  -0.45060
  -0.44968
  -0.44875
  -0.44782
  -0.44688
  -0.44593
  -0.44497
  -0.44400
  -0.44302
  -0.44204
  -0.44105
  -0.44005
  -0.43905
  -0.43803
  -0.43701
  -0.43598
  -0.43494
  -0.43390
  -0.43284
  -0.43178
  -0.43071
  -0.42964
  -0.42855
  -0.42746
  -0.42636
  -0.42526
  -0.42414
  -0.42302
  -0.42189
  -0.42075
  -0.41961
  -0.41846
  -0.41730
  -0.41613
  -0.41496
  -0.41377
  -0.41258
  -0.41139
  -0.41018
  -0.40897
  -0.40776
  -0.40653
  -0.40530
  -0.40406
  -0.40281
  -0.40155
  -0.40029
  -0.39902
  -0.39775
  -0.39646
  -0.39517
  -0.39388
  -0.39257
  -0.39126
  -0.38994
  -0.38862
  -0.38729
  -0.38595
  -0.38460
  -0.38325
  -0.38189
  -0.38052
  -0.37915
  -0.37777
  -0.37638
  -0.37499
  -0.37359
  -0.37218
  -0.37077
  -0.36935
  -0.36792
  -0.36649
  -0.36505
  -0.36360
  -0.36215
  -0.36069
  -0.35923
  -0.35776
  -0.35628
  -0.35479
  -0.35330
  -0.35180
  -0.35030
  -0.34879
  -0.34727
  -0.34575
  -0.34422
  -0.34269
  -0.34115
  -0.33960
  -0.33805
  -0.33649
  -0.33493
  -0.33335
  -0.33178
  -0.33020
  -0.32861
  -0.32701
  -0.32541
  -0.32381
  -0.32219
  -0.32058
  -0.31895
  -0.31732
  -0.31569
  -0.31405
  -0.31240
  -0.31075
  -0.30910
  -0.30743
  -0.30576
  -0.30409
  -0.30241
  -0.30073
  -0.29904
  -0.29734
  -0.29564
  -0.29394
  -0.29223
  -0.29051
  -0.28879
  -0.28706
  -0.28533
  -0.28360
  -0.28185
  -0.28011
  -0.27836
  -0.27660
  -0.27484
  -0.27307
  -0.27130
  -0.26952
  -0.26774
  -0.26596
  -0.26417
  -0.26237
  -0.26057
  -0.25877
  -0.25696
  -0.25514
  -0.25333
  -0.25150
  -0.24968
  -0.24785
  -0.24601
  -0.24417
  -0.24232
  -0.24047
  -0.23862
  -0.23676
  -0.23490
  -0.23304
  -0.23117
  -0.22929
  -0.22741
  -0.22553
  -0.22364
  -0.22175
  -0.21986
  -0.21796
  -0.21606
  -0.21415
  -0.21224
  -0.21033
  -0.20841
  -0.20649
  -0.20456
  -0.20264
  -0.20070
  -0.19877
  -0.19683
  -0.19489
  -0.19294
  -0.19099
  -0.18904
  -0.18708
  -0.18512
  -0.18316
  -0.18119
  -0.17922
  -0.17725
  -0.17527
  -0.17329
  -0.17131
  -0.16932
  -0.16734
  -0.16535
  -0.16335
  -0.16135
  -0.15935
  -0.15735
  -0.15535
  -0.15334
  -0.15133
  -0.14931
  -0.14730
  -0.14528
  -0.14325
  -0.14123
  -0.13920
  -0.13717
  -0.13514
  -0.13311
  -0.13107
  -0.12903
  -0.12699
  -0.12495
  -0.12290
  -0.12085
  -0.11880
  -0.11675
  -0.11470
  -0.11264
  -0.11058
  -0.10852
  -0.10646
  -0.10440
  -0.10233
  -0.10026
  -0.09819
  -0.09612
  -0.09405
  -0.09197
  -0.08990
  -0.08782
  -0.08574
  -0.08366
  -0.08158
  -0.07949
  -0.07741
  -0.07532
  -0.07323
  -0.07114
  -0.06905
  -0.06696
  -0.06487
  -0.06277
  -0.06068
  -0.05858
  -0.05648
  -0.05439
  -0.05229
  -0.05019
  -0.04808
  -0.04598
  -0.04388
  -0.04178
  -0.03967
  -0.03757
  -0.03546
  -0.03335
  -0.03125
  -0.02914
  -0.02703
  -0.02492
  -0.02281
  -0.02070
  -0.01859
  -0.01648
  -0.01437
  -0.01226
  -0.01015
  -0.00804
  -0.00593
  -0.00382
  -0.00170
   0.00041
   0.00252
   0.00463
   0.00674
   0.00885
   0.01096
   0.01308
   0.01519
   0.01730
   0.01941
   0.02152
   0.02363
   0.02573
   0.02784
   0.02995
   0.03206
   0.03417
   0.03627
   0.03838
   0.04048
   0.04259
   0.04469
   0.04679
   0.04889
   0.05100
   0.05310
   0.05519
   0.05729
   0.05939
   0.06149
   0.06358
   0.06568
   0.06777
   0.06986
   0.07195
   0.07404
   0.07613
   0.07821
   0.08030
   0.08238
   0.08446
   0.08654
   0.08862
   0.09070
   0.09277
   0.09485
   0.09692
   0.09899
   0.10106
   0.10313
   0.10519
   0.10726
   0.10932
   0.11138
   0.11344
   0.11549
   0.11754
   0.11960
   0.12164
   0.12369
   0.12574
   0.12778
   0.12982
   0.13186
   0.13389
   0.13593
   0.13796
   0.13999
   0.14201
   0.14403
   0.14606
   0.14807
   0.15009
   0.15210
   0.15411
   0.15612
   0.15812
   0.16013
   0.16212
   0.16412
   0.16611
   0.16810
   0.17009
   0.17207
   0.17406
   0.17603
   0.17801
   0.17998
   0.18195
   0.18391
   0.18588
   0.18783
   0.18979
   0.19174
   0.19369
   0.19563
   0.19758
   0.19951
   0.20145
   0.20338
   0.20531
   0.20723
   0.20915
   0.21107
   0.21298
   0.21489
   0.21679
   0.21869
   0.22059
   0.22248
   0.22437
   0.22626
   0.22814
   0.23001
   0.23189
   0.23376
   0.23562
   0.23748
   0.23934
   0.24119
   0.24304
   0.24488
   0.24672
   0.24855
   0.25038
   0.25221
   0.25403
   0.25584
   0.25766
   0.25946
   0.26127
   0.26306
   0.26486
   0.26665
   0.26843
   0.27021
   0.27198
   0.27375
   0.27552
   0.27728
   0.27903
   0.28078
   0.28253
   0.28427
   0.28600
   0.28773
   0.28945
   0.29117
   0.29289
   0.29460
   0.29630
   0.29800
   0.29969
   0.30138
   0.30306
   0.30474
   0.30641
   0.30807
   0.30973
   0.31139
   0.31304
   0.31468
   0.31632
   0.31795
   0.31958
   0.32120
   0.32282
   0.32443
   0.32603
   0.32763
   0.32922
   0.33081
   0.33239
   0.33396
   0.33553
   0.33709
   0.33865
   0.34020
   0.34174
   0.34328
   0.34481
   0.34634
   0.34786
   0.34937
   0.35088
   0.35238
   0.35388
   0.35537
   0.35685
   0.35832
   0.35979
   0.36126
   0.36271
   0.36416
   0.36561
   0.36704
   0.36847
   0.36990
   0.37132
   0.37273
   0.37413
   0.37553
   0.37692
   0.37830
   0.37968
   0.38105
   0.38241
   0.38377
   0.38512
   0.38646
   0.38780
   0.38913
   0.39045
   0.39177
   0.39308
   0.39438
   0.39567
   0.39696
   0.39824
   0.39951
   0.40078
   0.40204
   0.40329
   0.40454
   0.40577
   0.40700
   0.40823
   0.40944
   0.41065
   0.41185
   0.41304
   0.41423
   0.41541
   0.41658
   0.41774
   0.41890
   0.42005
   0.42119
   0.42233
   0.42345
   0.42457
   0.42568
   0.42679
   0.42788
   0.42897
   0.43005
   0.43113
   0.43219
   0.43325
   0.43430
   0.43534
   0.43638
   0.43740
   0.43842
   0.43943
   0.44044
   0.44143
   0.44242
   0.44340
   0.44437
   0.44534
   0.44629
   0.44724
   0.44818
   0.44911
   0.45004
   0.45095
   0.45186
   0.45276
   0.45365
   0.45454
   0.45541
   0.45628
   0.45714
   0.45799
   0.45883
   0.45967
   0.46050
   0.46131
   0.46212
   0.46293
   0.46372
   0.46451
   0.46528
   0.46605
   0.46681
   0.46757
   0.46831
   0.46904
   0.46977
   0.47049
   0.47120
   0.47190
   0.47260
   0.47328
   0.47396
   0.47463
   0.47529
   0.47594
   0.47658
   0.47722
   0.47784
   0.47846
   0.47907
   0.47967
   0.48026
   0.48084
   0.48142
   0.48198
   0.48254
   0.48309
   0.48363
   0.48416
   0.48468
   0.48520
   0.48570
   0.48620
   0.48669
   0.48717
   0.48764
   0.48810
   0.48856
   0.48900
   0.48944
   0.48986
   0.49028
   0.49069
   0.49109
   0.49149
   0.49187
   0.49225
   0.49261
   0.49297
   0.49332
   0.49366
   0.49399
   0.49431
   0.49462
   0.49493
   0.49522
   0.49551
   0.49579
   0.49606
   0.49632
   0.49657
   0.49681
   0.49704
   0.49727
   0.49749
   0.49769
   0.49789
   0.49808
   0.49826
   0.49843
   0.49859
   0.49875
   0.49889
   0.49903
   0.49916
   0.49927
   0.49938
   0.49948
   0.49958
   0.49966
   0.49973
   0.49980
   0.49985
   0.49990
   0.49994
   0.49997
   0.49999
   0.50000
   0.50000
   0.49999
   0.49998
   0.49995
   0.49992
   0.49988
   0.49983
   0.49977
   0.49970
   0.49962
   0.49953
   0.49944
   0.49933
   0.49922
   0.49910
   0.49896
   0.49882
   0.49868
   0.49852
   0.49835
   0.49817
   0.49799
   0.49780
   0.49759
   0.49738
   0.49716
   0.49693
   0.49669
   0.49645
   0.49619
   0.49593
   0.49565
   0.49537
   0.49508
   0.49478
   0.49447
   0.49416
   0.49383
   0.49349
   0.49315
   0.49280
   0.49244
   0.49207
   0.49169
   0.49130
   0.49090
   0.49050
   0.49008
   0.48966
   0.48923
   0.48879
   0.48834
   0.48788
   0.48741
   0.48694
   0.48646
   0.48596
   0.48546
   0.48495
   0.48443
   0.48391
   0.48337
   0.48283
   0.48227