Commit 7d7e9ed8 authored by Dan Jabaay's avatar Dan Jabaay
Browse files

Removing unused variables for UM pipeline.

Description:

VERA-dev Issue # - ####
parent a1bab12b
Pipeline #155666 passed with stage
in 2 minutes and 9 seconds
......@@ -515,7 +515,6 @@ ENDSUBROUTINE testSOFTCompare
!
!-------------------------------------------------------------------------------
SUBROUTINE testisNAN()
LOGICAL(SBK) :: bool
CHARACTER(LEN=3) :: nanChar = 'NaN'
REAL(SDK) :: nanDouble
REAL(SSK) :: nanSingle
......@@ -532,7 +531,6 @@ ENDSUBROUTINE testisNAN
!
!-------------------------------------------------------------------------------
SUBROUTINE testisINF()
LOGICAL(SBK) :: bool
CHARACTER(LEN=3) :: infChar = 'Inf'
REAL(SDK) :: infDouble
REAL(SSK) :: infSingle
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment