Skip to content

Commit 9f1f669

Browse files
committed
Fix compile error with tropopause_find and CCPP fortran parser
The CCPP Fortran parser is not able to read module variables of character type defined with the shr_kind_cl parameter size. The tropopause_climo_file variable does not need to be a CCPP variable so it has been removed. This will fix the build process again.
1 parent d8f13a5 commit 9f1f669

File tree

2 files changed

+3
-10
lines changed

2 files changed

+3
-10
lines changed

src/physics/utils/tropopause_climo_read.F90

Lines changed: 3 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -17,6 +17,9 @@ module tropopause_climo_read
1717
public :: tropopause_climo_readnl
1818
public :: tropopause_climo_read_file
1919

20+
! Private module data
21+
character(len=shr_kind_cl) :: tropopause_climo_file = unset_str
22+
2023
!> \section arg_table_tropopause_climo_read Argument Table
2124
!! \htmlinclude tropopause_climo_read.html
2225
! months in year for climatological tropopause pressure data
@@ -28,9 +31,6 @@ module tropopause_climo_read
2831
! monthly day-of-year times corresponding to climatological data (12)
2932
real(kind_phys), public, allocatable :: tropp_days(:)
3033

31-
! Private module data
32-
character(len=shr_kind_cl) :: tropopause_climo_file = unset_str
33-
3434
contains
3535
! Read namelist variable tropopause_climo_file.
3636
! Containing this within CAM-SIMA instead of within scheme as otherwise the climo filepath
@@ -235,7 +235,6 @@ subroutine tropopause_climo_read_file()
235235
!--------------------------------------------------------
236236
call mark_as_initialized('tropopause_air_pressure_from_climatology_dataset')
237237
call mark_as_initialized('tropopause_calendar_days_from_climatology')
238-
call mark_as_initialized('filename_of_tropopause_climatology')
239238

240239
end subroutine tropopause_climo_read_file
241240
end module tropopause_climo_read

src/physics/utils/tropopause_climo_read.meta

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -21,9 +21,3 @@
2121
units = 1
2222
type = real | kind = kind_phys
2323
dimensions = (number_of_months_in_year)
24-
[ tropopause_climo_file ]
25-
standard_name = filename_of_tropopause_climatology
26-
long_name = File path to tropopause climatology file
27-
units = none
28-
type = character | kind = len=256
29-
dimensions = ()

0 commit comments

Comments
 (0)