It seems that the results are more colser to the goal, however, the emit direction is not the tangent direction of the arc. I attched my .inp and source.f file, any suggestions are warmly welcomed. Thank you.
ArcSource.inp (1.1 KB) source_arc.f (7.4 KB)
