Separated wrap option to reduce opy and pasted code. Fixed warnings and added wrapping when inserting a dislocation or loop

This commit is contained in:
Alex 2020-01-29 10:25:33 -05:00
parent 636ae9421b
commit dc42b7b925
11 changed files with 55 additions and 46 deletions

View file

@ -7,7 +7,7 @@ module parameters
!Parameters for floating point tolerance
real(kind=dp), parameter :: lim_zero = epsilon(1.0_dp), &
lim_large = huge(1.0_dp)
logical, save :: lmpcac
logical, save :: lmpcac
!Numeric constants
real(kind=dp), parameter :: pi = 3.14159265358979323846_dp