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

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
! the array STT_IC. (dkh, 9/16/04)
!
! 从缩放文件中获取状态向量的初始值
! NOTES:
! (1 ) Added ACTIVE_VARS == 'EMISSIONS' case. (dkh, 11/27/04)
! (2 ) Added ACTIVE_VARS == 'FDTEST' case. (dkh, 02/17/05)
@ -576,7 +576,7 @@
INTEGER :: OFFSET
!=================================================================
! GET_X_FROM_SF begins here!
! GET_X_FROM_SF begins here! 开始迭代
!=================================================================
IF ( LICS ) THEN
@ -590,10 +590,10 @@
I_DUM = I + ( IIPAR * ( J - 1) )
& + ( IIPAR * JJPAR * ( L - 1 ) )
& + ( IIPAR * JJPAR * LLPAR * ( N - 1 ) )
& + ( IIPAR * JJPAR * LLPAR * ( N - 1 ) ) ! 判断变量对应的状态向量位置
! 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