Sola/GEOS-Chem-adjoint-v35-note
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

add note 20251002

Browse Source
This commit is contained in:
Sola_MBA
2025-10-03 03:39:18 +08:00
parent 394e8d0d76
commit 3a904fc5d5
3 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
code/adjoint/inverse_driver.f
View File

@ -912,13 +912,13 @@
! Mare array of scaling factors into a vector for optimization ! Mare array of scaling factors into a vector for optimization
CALL GET_X_FROM_SF CALL GET_X_FROM_SF
! 是根据位置将其映射到状态向量上
!================================================================= !=================================================================
! OPTIMIZATION loop starts here! ! OPTIMIZATION loop starts here!
!================================================================= !=================================================================
IF ( ITERATE ) THEN IF ( ITERATE ) THEN
! Echo some input to the screen ! Echo some input to the screen 迭代标记默认为 True，在开始数为 0 时被设为 False
WRITE( 6, '(a)' ) REPEAT( '=', 79 ) WRITE( 6, '(a)' ) REPEAT( '=', 79 )
WRITE( 6, '(a,/)' ) 'S T A R T O P T I M I Z A T I O N' WRITE( 6, '(a,/)' ) 'S T A R T O P T I M I Z A T I O N'
WRITE (6,16) WRITE (6,16)
@ -970,7 +970,7 @@
LATF = .FALSE. LATF = .FALSE.
ENDIF ENDIF
! The minimization routine has returned to request the ! The minimization routine has returned to request the 如果为 FG，则表示最小化进程返回需求在当前 x 位置继续计算 f 和 g
! function f and gradient g values at the current x 相当于这里就直接让梯度为 0 了 ! function f and gradient g values at the current x 相当于这里就直接让梯度为 0 了
! Update iteration count 继续增加迭代次数 ! Update iteration count 继续增加迭代次数

8
code/adjoint/inverse_mod.f
View File

@ -545,7 +545,7 @@
!***************************************************************************** !*****************************************************************************
! Subroutine GET_X_FROM_ICS compiles the vector X of initial conditions from ! Subroutine GET_X_FROM_ICS compiles the vector X of initial conditions from
! the array STT_IC. (dkh, 9/16/04) ! the array STT_IC. (dkh, 9/16/04)
! ! 从缩放文件中获取状态向量的初始值
! NOTES: ! NOTES:
! (1 ) Added ACTIVE_VARS == 'EMISSIONS' case. (dkh, 11/27/04) ! (1 ) Added ACTIVE_VARS == 'EMISSIONS' case. (dkh, 11/27/04)
! (2 ) Added ACTIVE_VARS == 'FDTEST' case. (dkh, 02/17/05) ! (2 ) Added ACTIVE_VARS == 'FDTEST' case. (dkh, 02/17/05)
@ -576,7 +576,7 @@
INTEGER :: OFFSET INTEGER :: OFFSET
!================================================================= !=================================================================
! GET_X_FROM_SF begins here! ! GET_X_FROM_SF begins here! 开始迭代
!================================================================= !=================================================================
IF ( LICS ) THEN IF ( LICS ) THEN
@ -590,10 +590,10 @@
I_DUM = I + ( IIPAR * ( J - 1) ) I_DUM = I + ( IIPAR * ( J - 1) )
& + ( IIPAR * JJPAR * ( L - 1 ) ) & + ( IIPAR * JJPAR * ( L - 1 ) )
& + ( IIPAR * JJPAR * LLPAR * ( N - 1 ) ) & + ( IIPAR * JJPAR * LLPAR * ( N - 1 ) ) ! 判断变量对应的状态向量位置
! Load X from active tracer concentrations ! Load X from active tracer concentrations
X(I_DUM) = ICS_SF(I,J,L,N) X(I_DUM) = ICS_SF(I,J,L,N) ! 获取相关状态向量的缩放系数
ENDDO ENDDO
ENDDO ENDDO

2
code/new/routines.f
View File

@ -3452,7 +3452,7 @@ c stpmax is a double precision variable.
c On entry stpmax is a nonnegative upper bound for the step. c On entry stpmax is a nonnegative upper bound for the step.
c On exit stpmax is unchanged. c On exit stpmax is unchanged.
c c
c task is a character variable of length at least 60. c task is a character variable of length at least 60. 关于 task 变量的具体说明
c On initial entry task must be set to 'START'. c On initial entry task must be set to 'START'.
c On exit task indicates the required action: c On exit task indicates the required action:
c c