acor0300.08n

计算卫星位置的fortran程序

23 08  1 29 22  0  0.0 3.301464021206D-04 2.955857780762D-12 0.000000000000D+00
    2.700000000000D+01-4.618750000000D+01 4.171602174807D-09 8.034851353981D-01
   -2.540647983551D-06 5.198563914746D-03 6.793066859245D-06 5.153574707031D+03
    2.520000000000D+05 1.043081283569D-07-2.218317116418D+00-1.490116119385D-08
    9.713131352966D-01 2.498750000000D+02 2.749634216593D+00-8.036406207168D-09
   -1.860791798425D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-2.002343535423D-08 2.700000000000D+01
    2.592000000000D+05
24 08  1 30  0  0  0.0 6.643263623118D-05 3.069544618484D-12 0.000000000000D+00
    1.900000000000D+01 6.553125000000D+01 4.718053503439D-09-2.204245959875D+00
    3.509223461151D-06 8.037249324843D-03 7.608905434608D-06 5.153665536880D+03
    2.592000000000D+05-1.657754182816D-07 2.019723868852D+00 1.378357410431D-07
    9.535215864357D-01 2.307187500000D+02-7.259072538194D-01-8.050335509324D-09
    1.857220280344D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-1.396983861923D-09 1.900000000000D+01
    2.592000000000D+05
25 08  1 29 23 59 44.0 5.055502988398D-04 4.092726157978D-12 0.000000000000D+00
    2.000000000000D+00-2.618750000000D+01 4.342680881564D-09-1.849448178792D+00
   -1.292675733566D-06 1.194200804457D-02 7.906928658485D-06 5.153364990234D+03
    2.591840000000D+05-3.725290298462D-08-1.268373477966D+00 3.334134817123D-07
    9.628706365240D-01 2.268750000000D+02-1.271970549216D+00-7.948544933356D-09
    1.578637220945D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-7.450580596924D-09 2.000000000000D+00
    2.592000000000D+05
26 08  1 29 23 59 44.0 1.693135127425D-04 1.034550223267D-11 0.000000000000D+00
    1.500000000000D+01-3.353125000000D+01 3.853732000181D-09 1.135713326493D+00
   -1.572072505951D-06 1.862344122492D-02 7.225200533867D-06 5.153584579468D+03
    2.591840000000D+05-2.384185791016D-07-2.178623297891D+00 1.210719347000D-07
    9.932749237846D-01 2.641562500000D+02 8.996432878797D-01-7.997833506579D-09
   -2.671539933718D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-6.519258022308D-09 1.500000000000D+01
    2.592000000000D+05
27 08  1 30  0  0  0.0 1.642145216465D-04 2.501110429876D-12 0.000000000000D+00
    8.500000000000D+01-2.268750000000D+01 4.184459889700D-09-1.685777402938D+00
   -9.816139936447D-07 2.112341136672D-02 7.443130016327D-06 5.153608259201D+03
    2.592000000000D+05 3.911554813385D-07-1.234109818245D+00 3.725290298462D-07
    9.674538871834D-01 2.343750000000D+02-1.743070234215D+00-7.755680542232D-09
    1.892935946879D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.800000000000D+00 0.000000000000D+00-4.190951585770D-09 8.500000000000D+01
    2.592000000000D+05
28 08  1 30  0  0  0.0-1.442106440663D-05-5.684341886081D-13 0.000000000000D+00
    7.100000000000D+01-3.806250000000D+01 4.409826726004D-09-2.861667632766D+00
   -2.073124051094D-06 1.341639261227D-02 7.087364792824D-06 5.153705684662D+03
    2.592000000000D+05 7.823109626770D-08-1.002301425306D-01-1.192092895508D-07
    9.633802323336D-01 2.436875000000D+02-2.138257464538D+00-7.706034921284D-09
    1.407201438708D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.800000000000D+00 0.000000000000D+00-1.024454832077D-08 7.100000000000D+01
    2.592000000000D+05
29 08  1 29 22  0  0.0-6.904639303684D-05 7.162270776462D-12 0.000000000000D+00
    8.500000000000D+01 6.343750000000D+00 4.500544825703D-09-1.754001795935D+00
    4.507601261139D-07 3.571936045773D-03 9.035691618919D-06 5.153735282898D+03
    2.520000000000D+05-1.862645149231D-09 9.393446418976D-01 1.341104507446D-07
    9.596324117647D-01 2.039687500000D+02-1.418404706387D+00-7.892471565185D-09
   -5.035924108276D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.800000000000D+00 0.000000000000D+00-8.381903171539D-09 8.500000000000D+01
    2.592000000000D+05
30 08  1 29  9 59 44.0 6.176345050335D-05 1.477928890381D-12 0.000000000000D+00
    2.200000000000D+01-3.796875000000D+01 5.009851644644D-09 2.753594294872D+00
   -1.976266503334D-06 1.036102313083D-02 6.133690476418D-06 5.153673490524D+03
    2.087840000000D+05 9.499490261078D-08-1.646097659146D-01-1.657754182816D-07
    9.481929087949D-01 2.497500000000D+02 1.370006333646D+00-8.112123417447D-09
   -1.046472145050D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-7.916241884232D-09 2.200000000000D+01
    2.592000000000D+05
31 08  1 29 17 59 44.0-7.220543920994D-06-1.477928890381D-12 0.000000000000D+00
    2.700000000000D+01-2.715625000000D+01 4.297322053759D-09-3.092024704177D+00
   -1.324340701103D-06 6.783363991417D-03 7.258728146553D-06 5.153661849976D+03
    2.375840000000D+05 1.080334186554D-07-1.177187201795D+00 5.029141902924D-08
    9.659313273969D-01 2.414062500000D+02-1.289332180101D+00-7.853541816871D-09
    3.593006725477D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-1.303851604462D-08 2.700000000000D+01
    2.592000000000D+05
12 08  1 30  2  0  0.0-3.553922288120D-04-9.094947017729D-13 0.000000000000D+00
    6.100000000000D+01-3.168750000000D+01 4.572333178743D-09 1.524758612294D+00
   -1.750886440277D-06 3.257987787947D-03 6.832182407379D-06 5.153680124283D+03
    2.664000000000D+05 1.024454832077D-07-1.252339521311D-01-2.421438694000D-08
    9.634649821038D-01 2.475937500000D+02-1.067269507487D+00-7.988903760747D-09
    4.250176946496D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-1.164153218269D-08 6.100000000000D+01
    2.592180000000D+05
 8 08  1 30  2  0  0.0-1.389649696648D-04-1.477928890381D-12 0.000000000000D+00
    6.100000000000D+01-2.828125000000D+01 4.051954327622D-09 5.637067091728D-01
   -1.668930053711D-06 1.009099779185D-02 7.390975952148D-06 5.153645795822D+03
    2.664000000000D+05 1.639127731323D-07-1.122629254906D+00-1.303851604462D-08
    9.816279687908D-01 2.440312500000D+02 2.863857095943D+00-7.916043820444D-09
    1.689356016188D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    4.000000000000D+00 0.000000000000D+00-4.190951585770D-09 6.100000000000D+01
    2.592180000000D+05
 9 08  1 30  2  0  0.0 1.080646179616D-04 1.818989403546D-12 0.000000000000D+00
    4.700000000000D+01-3.093750000000D+01 4.413041043705D-09 2.275414500376D-01
   -1.454725861549D-06 1.945970172528D-02 7.452443242073D-06 5.153682327271D+03
    2.664000000000D+05-2.663582563400D-07-1.210525289340D+00 5.960464477539D-08
    9.694436298584D-01 2.436875000000D+02 1.384991904689D+00-8.306417775827D-09
    1.139333141720D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.800000000000D+00 0.000000000000D+00-5.587935447693D-09 4.700000000000D+01
    2.592180000000D+05
15 08  1 30  2  0  0.0-7.357029244304D-05-2.046363078989D-12 0.000000000000D+00
    1.030000000000D+02-4.175000000000D+01 4.609477688433D-09-1.599404058490D+00
   -2.125278115273D-06 8.788023842499D-04 6.206333637238D-06 5.153616725922D+03
    2.664000000000D+05 2.048909664154D-08-2.231714665017D+00 2.793967723846D-08
    9.576405639505D-01 2.590312500000D+02-1.722868090406D+00-8.159982911593D-09
   -9.393248678879D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.800000000000D+00 0.000000000000D+00-9.778887033463D-09 1.030000000000D+02
    2.592180000000D+05
18 08  1 30  2  0  0.0-2.084323205054D-04 2.955857780762D-12 0.000000000000D+00
    2.000000000000D+00 2.728125000000D+01 4.958777832798D-09-9.448188959794D-01
    1.499429345131D-06 8.888945565559D-03 4.440546035767D-06 5.153661186218D+03
    2.664000000000D+05 1.844018697739D-07 3.053325566077D+00 1.266598701477D-07
    9.498001539831D-01 2.871562500000D+02-2.516986288616D+00-8.384278160634D-09
   -7.536028051591D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-1.071020960808D-08 2.000000000000D+00
    2.592180000000D+05
21 08  1 30  2  0  0.0 7.269950583577D-05-7.958078640513D-13 0.000000000000D+00
    5.700000000000D+01 5.971875000000D+01 5.182358542299D-09 3.360137534873D-01
    3.246590495110D-06 1.325254153926D-02 7.221475243568D-06 5.153747003555D+03
    2.664000000000D+05 1.285225152969D-07 1.995685940673D+00 1.993030309677D-07
    9.368556286888D-01 2.275312500000D+02-2.772123479213D+00-8.485353752974D-09
    1.392915123521D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-1.210719347000D-08 5.700000000000D+01
    2.592180000000D+05
24 08  1 30  2  0  0.0 6.645498797297D-05 3.069544618484D-12 0.000000000000D+00
    2.000000000000D+01 6.871875000000D+01 4.768412775746D-09-1.154007580819D+00
    3.447756171227D-06 8.037443272769D-03 7.795169949532D-06 5.153666259766D+03
    2.664000000000D+05-7.078051567078D-08 2.019664146684D+00-1.043081283569D-07
    9.535214576989D-01 2.274687500000D+02-7.259574362983D-01-8.253200789454D-09
    1.485776224275D-10 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-1.396983861923D-09 2.000000000000D+01
    2.592180000000D+05
26 08  1 30  2  0  0.0 1.693884842098D-04 1.034550223267D-11 0.000000000000D+00
    1.600000000000D+01-4.909375000000D+01 3.705511453234D-09 2.188168623309D+00
   -2.818182110786D-06 1.862367999274D-02 6.956979632378D-06 5.153588262558D+03
    2.664000000000D+05-1.676380634308D-07-2.178681081692D+00-3.669410943985D-07
    9.932753056062D-01 2.645000000000D+02 8.997509922975D-01-7.596387519015D-09
   -8.393206962776D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-6.519258022308D-09 1.600000000000D+01
    2.592180000000D+05
28 08  1 30  2  0  0.0-1.442525535822D-05-5.684341886081D-13 0.000000000000D+00
    7.200000000000D+01-3.343750000000D+01 4.451971236108D-09-1.811571273798D+00
   -1.782551407814D-06 1.341713732108D-02 6.625428795815D-06 5.153703554153D+03
    2.664000000000D+05 2.663582563400D-07-1.002852096929D-01-1.378357410431D-07
    9.633809359972D-01 2.506250000000D+02-2.138192929369D+00-7.772824162089D-09
    4.357324223658D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.800000000000D+00 0.000000000000D+00-1.024454832077D-08 7.200000000000D+01
    2.592180000000D+05
17 08  1 30  2  0  0.0 4.345318302512D-05-6.821210263297D-13 0.000000000000D+00
    8.400000000000D+01 6.625000000000D+00 4.384111296218D-09-2.146200258290D+00
    3.185123205185D-07 3.221948514692D-03 9.573996067047D-06 5.153713659286D+03
    2.664000000000D+05-1.303851604462D-08 9.310405381012D-01-4.470348358154D-08
    9.595642939102D-01 1.948750000000D+02-2.927324622089D+00-7.801038925948D-09
   -5.607376368788D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.800000000000D+00 0.000000000000D+00-9.778887033463D-09 8.400000000000D+01
    2.592480000000D+05
10 08  1 30  2  0  0.0-2.283174544573D-04-1.409716787748D-11 0.000000000000D+00
    3.800000000000D+01 2.287500000000D+01 4.643764928147D-09-2.425473007829D+00
    9.592622518539D-07 8.007878204808D-03 4.500150680542D-06 5.153769226074D+03
    2.664000000000D+05 3.166496753693D-08 3.040626777373D+00-1.825392246246D-07
    9.657023543850D-01 2.962812500000D+02 5.205350311277D-01-8.200341738984D-09
   -2.607251393949D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.800000000000D+00 1.000000000000D+00-2.328306436539D-09 3.800000000000D+01
    2.593080000000D+05
22 08  1 30  2  0  0.0 2.077599056065D-04 5.684341886081D-13 0.000000000000D+00
    3.700000000000D+01 2.496875000000D+01 4.925205132622D-09-2.345929783586D+00
    1.311302185059D-06 4.837353713810D-03 4.392117261887D-06 5.153677738190D+03
    2.664000000000D+05 6.891787052155D-08 3.060074352425D+00 8.381903171539D-08
    9.474261144320D-01 2.861250000000D+02-1.733545692474D+00-8.286416885994D-09
   -3.285851105095D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    2.000000000000D+00 0.000000000000D+00-1.816079020500D-08 3.700000000000D+01
    2.598660000000D+05
10 08  1 30  1 59 44.0-2.283225767314D-04-1.421085471520D-11 0.000000000000D+00
    4.300000000000D+01 2.287500000000D+01 4.645193563135D-09-2.419736628086D+00
    9.573996067047D-07 7.960842573084D-03 4.502013325691D-06 5.153568399429D+03
    2.663840000000D+05 2.980232238770D-08 3.040627532239D+00-1.825392246246D-07
    9.657024377713D-01 2.962812500000D+02 5.128084815373D-01-8.203556056685D-09
   -2.607251393949D-11 1.000000000000D+00 1.464000000000D+03 0.000000000000D+00
    4.000000000000D+00 0.000000000000D+00-2.328306436539D-09 4.300000000000D+01
    2.607780000000D+05
 5 08  1 30  2  0  0.0 6.681350059807D-04 1.591615728103D-11 0.000000000000D+00
    2.300000000000D+01-2.756250000000D+01 5.108784062458D-09-9.559863283707D-01
   -1.385807991028D-06 8.512774948031D-03 6.673857569695D-06 5.153654756546D+03
    2.664000000000D+05-7.450580596924D-09-2.158312955198D-01 1.844018697739D-07