tx2.in

利用fortran写的实现2D射线追踪的源代码！运行于linux下！

     4.600     0.815     0.010         2
     4.650     0.820     0.010         2
     4.700     0.841     0.010         2
     4.750     0.838     0.010         2
     4.800     0.867     0.010         2
     4.850     0.885     0.010         2
     4.900     0.914     0.010         2
     4.950     0.937     0.010         2
     5.000     0.945     0.010         2
     5.050     0.953     0.010         2
     5.100     0.986     0.010         2
     5.150     1.014     0.010         2
     5.200     1.003     0.010         2
     5.250     0.999     0.010         2
     5.300     1.051     0.010         2
     5.350     1.058     0.010         2
     5.400     1.070     0.010         2
     5.450     1.084     0.010         2
     5.500     1.108     0.010         2
     5.550     1.115     0.010         2
     5.600     1.140     0.010         2
     5.650     1.155     0.010         2
     5.700     1.156     0.010         2
     5.750     1.160     0.010         2
     5.800     1.211     0.010         2
     5.850     1.213     0.010         2
     5.900     1.239     0.010         2
     5.950     1.248     0.010         2
     6.000     1.262     0.010         2
     4.000    -1.000     0.000         0
     1.050     1.557     0.010         1
     1.100     1.515     0.010         1
     1.150     1.484     0.010         1
     1.200     1.466     0.010         1
     1.250     1.441     0.010         1
     1.300     1.418     0.010         1
     1.350     1.386     0.010         1
     1.400     1.354     0.010         1
     1.450     1.318     0.010         1
     1.500     1.308     0.010         1
     1.550     1.281     0.010         1
     1.600     1.240     0.010         1
     1.650     1.216     0.010         1
     1.700     1.208     0.010         1
     1.750     1.163     0.010         1
     1.800     1.161     0.010         1
     1.850     1.098     0.010         1
     1.900     1.088     0.010         1
     1.950     1.075     0.010         1
     2.000     1.051     0.010         1
     2.050     1.025     0.010         1
     2.100     0.984     0.010         1
     2.150     0.958     0.010         1
     2.200     0.928     0.010         1
     2.250     0.897     0.010         1
     2.300     0.880     0.010         1
     2.350     0.842     0.010         1
     2.400     0.826     0.010         1
     2.450     0.790     0.010         1
     2.500     0.776     0.010         1
     2.550     0.739     0.010         1
     2.600     0.729     0.010         1
     2.650     0.689     0.010         1
     2.700     0.666     0.010         1
     2.750     0.652     0.010         1
     2.800     0.618     0.010         1
     2.850     0.577     0.010         1
     2.900     0.557     0.010         1
     2.950     0.541     0.010         1
     3.000     0.504     0.010         1
     3.050     0.495     0.010         1
     3.100     0.448     0.010         1
     3.150     0.442     0.010         1
     3.200     0.424     0.010         1
     3.250     0.383     0.010         1
     3.300     0.360     0.010         1
     3.350     0.335     0.010         1
     3.400     0.320     0.010         1
     3.450     0.288     0.010         1
     3.500     0.251     0.010         1
     3.550     0.245     0.010         1
     3.600     0.208     0.010         1
     3.650     0.197     0.010         1
     3.700     0.166     0.010         1
     3.750     0.138     0.010         1
     3.800     0.132     0.010         1
     3.850     0.107     0.010         1
     3.900     0.058     0.010         1
     3.950     0.038     0.010         1
     1.000     1.189     0.010         2
     1.050     1.170     0.010         2
     1.100     1.155     0.010         2
     1.150     1.137     0.010         2
     1.200     1.120     0.010         2
     1.250     1.116     0.010         2
     1.300     1.078     0.010         2
     1.350     1.075     0.010         2
     1.400     1.051     0.010         2
     1.450     1.054     0.010         2
     1.500     1.036     0.010         2
     1.550     1.016     0.010         2
     1.600     1.002     0.010         2
     1.650     0.983     0.010         2
     1.700     0.978     0.010         2
     1.750     0.962     0.010         2
     1.800     0.936     0.010         2
     1.850     0.929     0.010         2
     1.900     0.935     0.010         2
     1.950     0.897     0.010         2
     2.000     0.872     0.010         2
     2.050     0.873     0.010         2
     2.100     0.857     0.010         2
     2.150     0.832     0.010         2
     2.200     0.811     0.010         2
     2.250     0.786     0.010         2
     2.300     0.798     0.010         2
     2.350     0.780     0.010         2
     2.400     0.771     0.010         2
     2.450     0.746     0.010         2
     2.500     0.723     0.010         2
     2.550     0.716     0.010         2
     2.600     0.706     0.010         2
     2.650     0.671     0.010         2
     2.700     0.648     0.010         2
     2.750     0.647     0.010         2
     2.800     0.632     0.010         2
     2.850     0.604     0.010         2
     2.900     0.600     0.010         2
     2.950     0.585     0.010         2
     3.000     0.573     0.010         2
     3.050     0.549     0.010         2
     3.100     0.518     0.010         2
     3.150     0.524     0.010         2
     3.200     0.483     0.010         2
     3.250     0.499     0.010         2
     3.300     0.476     0.010         2
     3.350     0.458     0.010         2
     4.000     1.000     0.000         0
     4.050     0.053     0.010         1
     4.100     0.090     0.010         1
     4.150     0.086     0.010         1
     4.200     0.112     0.010         1
     4.250     0.131     0.010         1
     4.300     0.162     0.010         1
     4.350     0.191     0.010         1
     4.400     0.206     0.010         1
     4.450     0.223     0.010         1
     4.500     0.254     0.010         1
     4.550     0.293     0.010         1
     4.600     0.314     0.010         1
     4.650     0.342     0.010         1
     4.700     0.359     0.010         1
     4.750     0.386     0.010         1
     4.800     0.413     0.010         1
     4.850     0.453     0.010         1
     4.900     0.462     0.010         1
     4.950     0.485     0.010         1
     5.000     0.523     0.010         1
     5.050     0.533     0.010         1
     5.100     0.564     0.010         1
     5.150     0.580     0.010         1
     5.200     0.617     0.010         1
     5.250     0.642     0.010         1
     5.300     0.679     0.010         1
     5.350     0.705     0.010         1
     5.400     0.728     0.010         1
     5.450     0.727     0.010         1
     5.500     0.766     0.010         1
     5.550     0.803     0.010         1
     5.600     0.795     0.010         1
     5.650     0.843     0.010         1
     5.700     0.869     0.010         1
     5.750     0.890     0.010         1
     5.800     0.908     0.010         1
     5.850     0.938     0.010         1
     5.900     0.977     0.010         1
     5.950     1.005     0.010         1
     6.000     1.006     0.010         1
     6.050     1.060     0.010         1
     6.100     1.066     0.010         1
     6.150     1.104     0.010         1
     6.200     1.105     0.010         1
     6.250     1.131     0.010         1
     6.300     1.156     0.010         1
     6.350     1.174     0.010         1
     6.400     1.197     0.010         1
     6.450     1.215     0.010         1
     6.500     1.253     0.010         1
     6.550     1.269     0.010         1
     6.600     1.294     0.010         1
     6.650     1.303     0.010         1
     6.700     1.339     0.010         1
     6.750     1.368     0.010         1
     6.800     1.407     0.010         1
     6.850     1.425     0.010         1
     6.900     1.427     0.010         1
     6.950     1.458     0.010         1
     4.900     0.635     0.010         2
     4.950     0.639     0.010         2
     5.000     0.652     0.010         2
     5.050     0.662     0.010         2
     5.100     0.682     0.010         2
     5.150     0.680     0.010         2
     5.200     0.727     0.010         2
     5.250     0.732     0.010         2
     5.300     0.761     0.010         2
     5.350     0.750     0.010         2
     5.400     0.785     0.010         2
     5.450     0.789     0.010         2
     5.500     0.809     0.010         2
     5.550     0.820     0.010         2
     5.600     0.842     0.010         2
     5.650     0.861     0.010         2
     5.700     0.859     0.010         2
     5.750     0.904     0.010         2
     5.800     0.915     0.010         2
     5.850     0.939     0.010         2
     5.900     0.959     0.010         2
     5.950     0.951     0.010         2
     6.000     0.967     0.010         2
     6.050     1.007     0.010         2
     6.100     1.032     0.010         2
     6.150     1.041     0.010         2
     6.200     1.060     0.010         2
     6.250     1.093     0.010         2
     6.300     1.115     0.010         2
     6.350     1.138     0.010         2
     6.400     1.138     0.010         2
     6.450     1.178     0.010         2
     6.500     1.184     0.010         2
     6.550     1.201     0.010         2
     6.600     1.248     0.010         2
     6.650     1.283     0.010         2
     6.700     1.269     0.010         2
     6.750     1.281     0.010         2
     6.800     1.306     0.010         2
     6.850     1.339     0.010         2
     6.900     1.346     0.010         2
     6.950     1.372     0.010         2
     7.000     1.396     0.010         2
     5.000    -1.000     0.000         0
     2.050     1.496     0.010         1
     2.100     1.480     0.010         1
     2.150     1.457     0.010         1
     2.200     1.419     0.010         1
     2.250     1.406     0.010         1
     2.300     1.369     0.010         1
     2.350     1.348     0.010         1
     2.400     1.329     0.010         1
     2.450     1.305     0.010         1
     2.500     1.271     0.010         1
     2.550     1.246     0.010         1
     2.600     1.223     0.010         1
     2.650     1.195     0.010         1
     2.700     1.148     0.010         1
     2.750     1.139     0.010         1
     2.800     1.114     0.010         1
     2.850     1.084     0.010         1
     2.900     1.079     0.010         1
     2.950     1.020     0.010         1
     3.000     1.003     0.010         1
     3.050     1.010     0.010         1
     3.100     0.967     0.010         1
     3.150     0.948     0.010         1
     3.200     0.921     0.010         1
     3.250     0.900     0.010         1
     3.300     0.852     0.010         1
     3.350     0.849     0.010         1
     3.400     0.808     0.010         1
     3.450     0.780     0.010         1
     3.500     0.763     0.010         1
     3.550     0.756     0.010         1
     3.600     0.719     0.010         1
     3.650     0.674     0.010         1
     3.700     0.658     0.010         1
     3.750     0.631     0.010         1
     3.800     0.616     0.010         1
     3.850     0.595     0.010         1
     3.900     0.559     0.010         1
     3.950     0.537     0.010         1
     4.000     0.505     0.010         1
     4.050     0.509     0.010         1
     4.100     0.476     0.010         1
     4.150     0.440     0.010         1
     4.200     0.417     0.010         1
     4.250     0.391     0.010         1
     4.300     0.363     0.010         1
     4.350     0.355     0.010         1
     4.400     0.324     0.010         1
     4.450     0.284     0.010         1
     4.500     0.270     0.010         1
     4.550     0.229     0.010         1
     4.600     0.222     0.010         1
     4.650     0.191     0.010         1
     4.700     0.162     0.010         1
     4.750     0.153     0.010         1
     4.800     0.123     0.010         1
     4.850     0.099     0.010         1
     4.900     0.061     0.010         1
     4.950     0.043     0.010         1
     2.000     1.278     0.010         2
     2.050     1.271     0.010         2
     2.100     1.248     0.010         2
     2.150     1.235     0.010         2
     2.200     1.198     0.010         2
     2.250     1.188     0.010         2
     2.300     1.177     0.010         2
     2.350     1.161     0.010         2
     2.400     1.154     0.010         2
     2.450     1.128     0.010         2
     2.500     1.115     0.010         2
     2.550     1.113     0.010         2
     2.600     1.078     0.010         2
     2.650     1.060     0.010         2
     2.700     1.055     0.010         2
     2.750     1.025     0.010         2
     2.800     1.033     0.010         2
     2.850     1.001     0.010         2
     2.900     1.000     0.010         2
     2.950     0.968     0.010         2