Skip to content

Commit

Permalink
[skip ci]
Browse files Browse the repository at this point in the history
Small change to tolerances.
  • Loading branch information
Juha Ruokolainen committed Jan 27, 2025
1 parent 1b8d20e commit 67e23c6
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions fem/tests/SD_P2ndDerivatives/P2ndDerivativesTest.f90
Original file line number Diff line number Diff line change
Expand Up @@ -244,12 +244,12 @@ SUBROUTINE LocalMatrix( Element, n, nd, qp )
CALL CheckValue(ddiff(2,3),SUM(ddBasisddx(1:nd,2,3)*f), 5.0d-7, 'dyz')
CALL CheckValue(ddiff(3,3),SUM(ddBasisddx(1:nd,3,3)*f), 5.0d-7, 'dzz')

CALL CheckValue(ddiff(1,1),SUM(ddxFromNodaldx(1:nd,1,1)*f), 5.0d-7, 'dfxx')
CALL CheckValue(ddiff(1,2),SUM(ddxFromNodaldx(1:nd,1,2)*f), 5.0d-7, 'dfxy')
CALL CheckValue(ddiff(1,3),SUM(ddxFromNodaldx(1:nd,1,3)*f), 5.0d-7, 'dfxz')
CALL CheckValue(ddiff(2,2),SUM(ddxFromNodaldx(1:nd,2,2)*f), 5.0d-7, 'dfyy')
CALL CheckValue(ddiff(2,3),SUM(ddxFromNodaldx(1:nd,2,3)*f), 5.0d-7, 'dfyz')
CALL CheckValue(ddiff(3,3),SUM(ddxFromNodaldx(1:nd,3,3)*f), 5.0d-7, 'dfzz')
CALL CheckValue(ddiff(1,1),SUM(ddxFromNodaldx(1:nd,1,1)*f), 7.5d-7, 'dfxx')
CALL CheckValue(ddiff(1,2),SUM(ddxFromNodaldx(1:nd,1,2)*f), 7.5d-7, 'dfxy')
CALL CheckValue(ddiff(1,3),SUM(ddxFromNodaldx(1:nd,1,3)*f), 7.5d-7, 'dfxz')
CALL CheckValue(ddiff(2,2),SUM(ddxFromNodaldx(1:nd,2,2)*f), 7.5d-7, 'dfyy')
CALL CheckValue(ddiff(2,3),SUM(ddxFromNodaldx(1:nd,2,3)*f), 7.5d-7, 'dfyz')
CALL CheckValue(ddiff(3,3),SUM(ddxFromNodaldx(1:nd,3,3)*f), 7.5d-7, 'dfzz')
END DO
!------------------------------------------------------------------------------
END SUBROUTINE LocalMatrix
Expand Down

0 comments on commit 67e23c6

Please sign in to comment.