Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

share, mksrfdata, mkinidata, main/HYDRO, main/DA and postprocess code… #241

Merged
merged 9 commits into from
Jan 29, 2024

Conversation

zhangsp8
Copy link
Contributor

… adjustment and optimization


INTEGER, INTENT(in) :: idate(3)
REAL(r8), INTENT(in) :: deltim
integer, intent(in) :: idate(3)
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Lines 26-27: Please delete three space.

Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Add some descriptions of DA module?

@@ -75,7 +75,7 @@ END SUBROUTINE allocate_1D_HydroFluxes

SUBROUTINE deallocate_1D_HydroFluxes

IMPLICIT NONE
IMPLICIT NONE
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Please delete one space

integer :: s_year ! starting date for run in year
integer :: s_month ! starting date for run in month
integer :: s_day ! starting date for run in day
integer :: s_julian ! starting date for run in julian day
integer :: s_seconds ! starting time of day for run in seconds
integer :: idate(3) ! starting date
INTEGER :: lc_year ! land cover year
integer :: lc_year ! land cover year
logical :: greenwich ! true: greenwich time, false: local time

integer*8 :: start_time, end_time, c_per_sec, time_used

Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Did the calculation processes in PROGRAM should intend three space?

@@ -112,20 +113,20 @@ PROGRAM CoLMINI
CAll Init_LC_Const
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Lines 113-114: CAll -> CALL

filename, dataname, dim1name, ndim1, &
vecname, pixelset, wdata, compress_level)

IMPLICIT NONE
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

same

filename, dataname, dim1name, ndim1, dim2name, ndim2, &
vecname, pixelset, wdata, compress_level)

IMPLICIT NONE
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

same

filename, dataname, dim1name, ndim1, dim2name, ndim2, dim3name, ndim3, &
vecname, pixelset, wdata, compress_level)

IMPLICIT NONE
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

same

END TYPE timestamp
type :: timestamp
integer :: year, day, sec
END type timestamp

INTERFACE ASSIGNMENT (=)
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

interface

@@ -59,22 +59,22 @@ MODULE MOD_TimeManager
MODULE procedure calendarday_stamp
END INTERFACE
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

interface

@CoLM-SYSU CoLM-SYSU merged commit b1c3473 into CoLM-SYSU:master Jan 29, 2024
24 checks passed
xuxh1 pushed a commit to xuxh1/CoLM202X that referenced this pull request Oct 26, 2024
share, mksrfdata, mkinidata, main/HYDRO, main/DA and postprocess code…
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

Successfully merging this pull request may close these issues.

3 participants