Changes the length of input variable

bishtgautam · bishtgautam · commit 429d9db59b9b · 2025-10-24T09:05:51.000-07:00
diff --git a/components/elm/src/data_types/MOABGridType.F90 b/components/elm/src/data_types/MOABGridType.F90
@@ -153,7 +153,7 @@ subroutine elm_moab_load_grid_file(meshfile)
     !
     use elm_varctl  ,  only : iulog  ! for messages and domain file name
     !
-    character(1024), intent(in)   :: meshfile
+    character(len=*), intent(in)  :: meshfile
     !
     integer                 :: tagtype, numco
     integer                 :: num_components

Original file line number	Diff line number	Diff line change
`@@ -153,7 +153,7 @@ subroutine elm_moab_load_grid_file(meshfile)`
`153`	`153`	`!`
`154`	`154`	`use elm_varctl , only : iulog ! for messages and domain file name`
`155`	`155`	`!`
`156`		`- character(1024), intent(in) :: meshfile`
	`156`	`+ character(len=*), intent(in) :: meshfile`
`157`	`157`	`!`
`158`	`158`	`integer :: tagtype, numco`
`159`	`159`	`integer :: num_components`