CVS log for pol_hms_single/Attic/gen_track.f
	Help

Request diff between arbitrary revisions / Display revisions graphically

Replaced by track_to_target and trakc_from_target in new trg_track.f

1) Changed from real to real*8
2) Updated all use of constants to have d00 after the constant.
3) In subroutine genRecon
    a) Comment out calls to hmsReconOutOfPlane .
    b) In call simc_hms_recon switched ut(4) and ut(3) in argument list
       since they were in the wrong place.
    c) set ut(1) = xx after call simc_hms_recon
    d) Add variables dx_save, vt_save(6), used_save. When going through loop
        I found that sometimes the x position returned by tracktoplane
        gets farther away from the known raster position instead of closer.
        So I modified the code so that if the difference (dx) between
        the x positions gets larger, then the values for the previous
        iteration are used.

Update to work with g77 ( P. McKee)

Initial revision