Merge pull request #59 from adtzlr/sqrt-remove-unused-print

Sqrt remove unused print
adtzlr · Jan 3, 2024 · c8f3caf · c8f3caf
2 parents a80dc8c + 3b8afd1
commit c8f3caf
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 2 deletions.
diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -5,6 +5,7 @@ All notable changes to this project will be documented in this file. The format
 
 ### Changed
 - Rename internal matrix square-root from `stretch_2` and `stretch_2s` to `sqrt_2` and `sqrt_2s`. This does not affect the public API which remains unchanged as (matrix) square root `sqrt(T)`.
+- Remove unsed print statement in `sqrt_2()`.
 
 ### Fixed
 - Fix the orientation of `rotation_matrix(phi,2)` for a rotation matrix around axis 2. Also fix the docs for `rotation_matrix(phi,1)` and `rotation_matrix(phi,3)`.

diff --git a/ttb/libsqrt.f b/ttb/libsqrt.f
@@ -44,8 +44,6 @@ function sqrt_2(T)
         I_U = lam + dsqrt(-lam**2+I_T+2.*III_U/lam)
         II_U = (I_U**2-I_T)/2.
 
-        print *, 'test', l,k,1-l**2/k**3
-
         sqrt_2 = 1./(I_U*II_U-III_U)
      *           *(I_U*III_U*identity2(T) + (I_U**2-II_U)*T-T**2)