Skip to content

Commit 7b01e0e

Browse files
jimmielinnusbaume
andauthored
Update src/physics/utils/physics_data.F90
Co-authored-by: Jesse Nusbaumer <nusbaume@ucar.edu>
1 parent a578c92 commit 7b01e0e

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/physics/utils/physics_data.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -345,7 +345,7 @@ subroutine read_constituent_dimensioned_field_2d(const_props, file, std_name, ba
345345

346346
! Dummy arguments
347347
type(ccpp_constituent_prop_ptr_t), intent(in) :: const_props(:) ! Constituent properties
348-
type(file_desc_t), intent(inout) :: file
348+
type(file_desc_t), intent(inout) :: file !Parallel I/O (PIO) file type.
349349
character(len=*), intent(in) :: std_name ! Standard name of base variable.
350350
character(len=*), intent(in) :: base_var_names(:) ! "Base" name(s) used to construct variable name (base_constname)
351351
integer, intent(in) :: timestep ! Timestep to read [count]

0 commit comments

Comments
 (0)