Skip to content

Commit

Permalink
comments
Browse files Browse the repository at this point in the history
  • Loading branch information
lfarv committed Mar 14, 2023
1 parent 7f9e208 commit 31e58ae
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions atintegrators/exactdrift.c
Original file line number Diff line number Diff line change
Expand Up @@ -5,6 +5,9 @@ static double get_pz(double *r6) {
return sqrt(SQR(1 + r6[4]) - SQR(r6[1]) - SQR(r6[3]));
}

/* Forest 10.23, exact drift
L: length [m]
*/
static void exact_drift(double *r6, double L) {
double NormL = L / get_pz(r6);
r6[0] += r6[1] * NormL;
Expand Down

0 comments on commit 31e58ae

Please sign in to comment.