250910.130109.CST [skip ci] update trbox.f

zaikunzhang · zaikunzhang · commit a3c3eae9466f · 2025-09-10T13:01:09.000+08:00
diff --git a/.github/actions/spelling/allow.txt b/.github/actions/spelling/allow.txt
@@ -2524,3 +2524,4 @@ YFITNE
 Qoro
 HHmm
 MMdd
+ZAMB
diff --git a/benchmark/rescue_idz/230406/norma/fortran/classical/bobyqa/trsbox.f b/benchmark/rescue_idz/230406/norma/fortran/classical/bobyqa/trsbox.f
@@ -105,7 +105,7 @@ SUBROUTINE TRSBOX (N,NPT,XPT,XOPT,GOPT,HQ,PQ,SL,SU,DELTA,
 C
 C     Multiply the search direction by the second derivative matrix of Q and
 C     calculate some scalars for the choice of steplength. Then set BLEN to
-C     the length of the the step to the trust region boundary and STPLEN to
+C     the length of the step to the trust region boundary and STPLEN to
 C     the steplength, ignoring the simple bounds.
 C
       GOTO 210

-Original file line number
+Diff line change
 Qoro
 HHmm
 MMdd
 +ZAMB
Original file line number	Diff line number	Diff line change
`@@ -105,7 +105,7 @@ SUBROUTINE TRSBOX (N,NPT,XPT,XOPT,GOPT,HQ,PQ,SL,SU,DELTA,`
`105`	`105`	`C`
`106`	`106`	`C Multiply the search direction by the second derivative matrix of Q and`
`107`	`107`	`C calculate some scalars for the choice of steplength. Then set BLEN to`
`108`		`-C the length of the the step to the trust region boundary and STPLEN to`
	`108`	`+C the length of the step to the trust region boundary and STPLEN to`
`109`	`109`	`C the steplength, ignoring the simple bounds.`
`110`	`110`	`C`
`111`	`111`	`GOTO 210`