260216.154120.CET [skip ci] revise SYMTOL_DFT for ARM ATfL Flang

Author: zaikunzhang

fortran/common/consts.F90

@@ -8,7 +8,7 @@ module consts_mod
 !
 ! Started: July 2020
 !
-! Last Modified: Wed 04 Feb 2026 07:27:34 AM CET
+! Last Modified: Mon 16 Feb 2026 03:39:56 PM CET
 !--------------------------------------------------------------------------------------------------!
 
 !--------------------------------------------------------------------------------------------------!
@@ -194,11 +194,11 @@ module consts_mod
 ! optimization options
 real(RP), parameter :: SYMTOL_DFT = REALMAX
 #elif defined __FLANG && PRIMA_REAL_PRECISION < 64 && PRIMA_AGGRESSIVE_OPTIONS == 1
-! HUAWEI BiSheng Compiler or ARM Compiler with aggressive optimization options and single precision
+! HUAWEI BiSheng Compiler with aggressive optimization options and single precision
 real(RP), parameter :: SYMTOL_DFT = max(5.0E3_RP * EPS, TEN**max(-10, -MAXPOW10))
 #elif defined __flang__ && PRIMA_REAL_PRECISION < 64 && PRIMA_AGGRESSIVE_OPTIONS == 1
-! LLVM Flang with aggressive optimization options and single precision
-real(RP), parameter :: SYMTOL_DFT = max(5.0E2_RP * EPS, TEN**max(-10, -MAXPOW10))
+! LLVM Flang or ARM ATfL Flang with aggressive optimization options and single precision
+real(RP), parameter :: SYMTOL_DFT = max(5.0E3_RP * EPS, TEN**max(-10, -MAXPOW10))
 #elif defined __INTEL_COMPILER && PRIMA_REAL_PRECISION < 64
 ! ifx with single precision
 real(RP), parameter :: SYMTOL_DFT = max(5.0E1_RP * EPS, TEN**max(-10, -MAXPOW10))