diff options
| author | HEBERT Alain <alain.hebert@polymtl.ca> | 2025-10-19 07:29:26 -0400 |
|---|---|---|
| committer | HEBERT Alain <alain.hebert@polymtl.ca> | 2025-10-19 07:29:26 -0400 |
| commit | 46a6e3604f7ea10bd35d032bc282c6e031da0779 (patch) | |
| tree | 446377010774826f3d24fa3e8f52905a14c0a7ea /Dragon/src/SAL_TRAJECTORY_MOD.f90 | |
| parent | f00eea9ff4dd094374672f5ef73939ed6a4dd9d5 (diff) | |
| parent | fd2671c00d2aa6659d51cd676d9d0a01016cd248 (diff) | |
Merge branch '8-improve-epsilon-tests-and-error-detection-in-module-salt' into 'main'
#8: Improve epsilon tests and error detection in module SALT:
See merge request dragon/5.1!14
Diffstat (limited to 'Dragon/src/SAL_TRAJECTORY_MOD.f90')
| -rw-r--r-- | Dragon/src/SAL_TRAJECTORY_MOD.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Dragon/src/SAL_TRAJECTORY_MOD.f90 b/Dragon/src/SAL_TRAJECTORY_MOD.f90 index e108fcb..ac1714d 100644 --- a/Dragon/src/SAL_TRAJECTORY_MOD.f90 +++ b/Dragon/src/SAL_TRAJECTORY_MOD.f90 @@ -110,7 +110,7 @@ CONTAINS ELSE WRITE(*,*) 'PPERIM_MAC2(N_AXIS+1),PPERIM_MAC2(N_AXIS) :',PPERIM_MAC2(N_AXIS+1),PPERIM_MAC2(N_AXIS) WRITE(*,*) 'DIST_AXIS(PPERIM_MAC2(N_AXIS+1)-1) :',DIST_AXIS(PPERIM_MAC2(N_AXIS+1)-1) - WRITE(*,*) 'DELX :',DELX + WRITE(*,*) 'DELX :',DELX,' RADIA=',RADIA CALL XABORT('SALTRA: Cant find entry point') ENDIF ENDIF |