Skip to content

Commit 7e8c354

Browse files
ldfowler58amstokely
authored andcommitted
* In ./src/core_init_atmosphere/mpas_init_atm_thompson_aerosols.F, changed print statements
"enter/end subroutine init_atm_gocart" with "enter/end subroutine init_atm_thompson_aerosols.
1 parent a9a4902 commit 7e8c354

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/core_init_atmosphere/mpas_init_atm_thompson_aerosols.F

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -52,7 +52,7 @@ subroutine init_atm_thompson_aerosols(block,mesh,configs,diag,state)
5252
logical:: lexist
5353

5454
!-----------------------------------------------------------------------------------------------------------------
55-
!call mpas_log_write('--- enter subroutine init_atm_gocart:')
55+
!call mpas_log_write('--- enter subroutine init_atm_thompson_aerosols:')
5656

5757
!inquire if the GOCART input file exists:
5858
lexist = .false.
@@ -75,7 +75,7 @@ subroutine init_atm_thompson_aerosols(block,mesh,configs,diag,state)
7575
call mpas_log_write('nwfa and nifa are set to zero and not interpolated from climatological data.')
7676
endif
7777

78-
!call mpas_log_write('--- end subroutine init_atm_gocart.')
78+
!call mpas_log_write('--- end subroutine init_atm_thompson_aerosols.')
7979
call mpas_log_write(' ')
8080

8181
end subroutine init_atm_thompson_aerosols

0 commit comments

Comments
 (0)