Skip to content

Commit

Permalink
name adjustment for internal global attrs
Browse files Browse the repository at this point in the history
  • Loading branch information
mjreno authored and mjreno committed Feb 3, 2025
1 parent fb55626 commit 15ad874
Show file tree
Hide file tree
Showing 3 changed files with 6 additions and 6 deletions.
4 changes: 2 additions & 2 deletions src/Utilities/Export/DisNCStructured.f90
Original file line number Diff line number Diff line change
Expand Up @@ -640,10 +640,10 @@ subroutine add_global_att(this)
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'source', &
this%annotation%source), this%nc_fname)
! export type (MODFLOW 6)
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'modflow6_grid', &
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'modflow_grid', &
this%annotation%grid), this%nc_fname)
! MODFLOW 6 model type
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'modflow6_model', &
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'modflow_model', &
this%annotation%model), this%nc_fname)
! generation datetime
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'history', &
Expand Down
4 changes: 2 additions & 2 deletions src/Utilities/Export/MeshNCModel.f90
Original file line number Diff line number Diff line change
Expand Up @@ -158,10 +158,10 @@ subroutine add_global_att(this)
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'source', &
this%annotation%source), this%nc_fname)
! export type (MODFLOW 6)
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'modflow6_grid', &
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'modflow_grid', &
this%annotation%grid), this%nc_fname)
! MODFLOW 6 model type
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'modflow6_model', &
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'modflow_model', &
this%annotation%model), this%nc_fname)
! generation datetime
call nf_verify(nf90_put_att(this%ncid, NF90_GLOBAL, 'history', &
Expand Down
4 changes: 2 additions & 2 deletions src/Utilities/Idm/netcdf/NCContextBuild.f90
Original file line number Diff line number Diff line change
Expand Up @@ -116,7 +116,7 @@ subroutine add_package_var(modeltype, modelname, nc_vars, input_name, varid, &
end if
end subroutine add_package_var

!> @brief verify global attribute modflow6_grid is present and return value
!> @brief verify global attribute modflow_grid is present and return value
!<
function verify_global_attr(modeltype, modelname, input_name, nc_fname, ncid) &
result(grid)
Expand All @@ -132,7 +132,7 @@ function verify_global_attr(modeltype, modelname, input_name, nc_fname, ncid) &
grid = ''

! verify expected mf6_modeltype file attribute
if (nf90_get_att(ncid, NF90_GLOBAL, "modflow6_grid", &
if (nf90_get_att(ncid, NF90_GLOBAL, "modflow_grid", &
grid) == NF90_NOERR) then
! set grid to upper case
call upcase(grid)
Expand Down

0 comments on commit 15ad874

Please sign in to comment.