250831.102300.CST update test_ifx.yml

Author: zaikunzhang

.github/workflows/test_ifx.yml

@@ -78,20 +78,23 @@ jobs:
         if: startsWith(matrix.os, 'macos')
         run: bash .github/scripts/install_oneapi_macos.sh
 
-      - name: Revise Makefile.common to exclude r16 tests when the dimension is big or the solver is cobyla
+      - name: Revise Makefile.common to exclude r16 and _d0 tests when the dimension is big or the solver is cobyla
         shell: bash
         if: ${{ matrix.testdim == 'big' || matrix.solver == 'cobyla' }}
         run: |
           cd fortran/tests/makefiles || exit 42
-          $SEDI 's|\$(TST)_.*r16_d[0,1]_tst||g' Makefile.common && cat Makefile.common
+          $SEDI 's|\$(TST)_.*r16_d[0,1]_tst||g' Makefile.common  # Skip r16 tests
+          $SEDI 's|\$(TESTDIM)\ =\ "big"|true|' Makefile.common  # Skip _d0 tests even if TESTDIM is "small"
+          $SEDI 's| since we are testing a BIG problem||' Makefile.common  # Revise the message accordingly
+          cat Makefile.common
 
       - name: Revise bign
         shell: bash  # N.B.: We must use bash and use [[:space:]] instead of \s for compatibility with macOS.
         run: |
           cd fortran/tests || exit 42
           $SEDI 's|::[[:space:]]*bign[[:space:]]*=.*$|:: bign = 200_IK|' test_bobyqa.f90
           $SEDI 's|::[[:space:]]*bign[[:space:]]*=.*$|:: bign = 150_IK|' test_lincoa.f90
-          $SEDI 's|::[[:space:]]*NRAND_DFT[[:space:]]*=.*$|:: NRAND_DFT = 1|g' testsuite/param.f90
+          $SEDI 's|::[[:space:]]*NRAND_DFT[[:space:]]*=.*$|:: NRAND_DFT = 1|g' testsuite/param.f90  # Number of random tests when the dimension is small
           cat test_bobyqa.f90 test_lincoa.f90 testsuite/param.f90
 
       - name: Conduct the test

fortran/tests/testsuite/param.f90

@@ -6,7 +6,7 @@ module param_mod
 !
 ! Started: September 2021
 !
-! Last Modified: Wed 20 Aug 2025 05:52:21 PM CST
+! Last Modified: Sun 31 Aug 2025 10:18:53 AM CST
 !--------------------------------------------------------------------------------------------------!
 
 use, non_intrinsic :: consts_mod, only : RP, IK, TENTH
@@ -17,7 +17,7 @@ module param_mod
 ! Testing univariate problems can help us to uncover some bugs that can only occur in extreme cases.
 integer(IK), parameter :: MINDIM_DFT = 1
 integer(IK), parameter :: MAXDIM_DFT = 20
-integer(IK), parameter :: NRAND_DFT = 3
+integer(IK), parameter :: NRAND_DFT = 3  ! Default number of random tests when the dimension is small
 integer, parameter :: RANDSEED_DFT = 42
 real(RP), parameter :: NOISE_LEVEL_DFT = TENTH
 character(len=*), parameter :: NOISE_TYPE_DFT = 'gaussian'