name adjustment for internal global attrs

Author: mjreno

src/Utilities/Export/DisNCStructured.f90

@@ -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', &

src/Utilities/Export/MeshNCModel.f90

@@ -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', &

src/Utilities/Idm/netcdf/NCContextBuild.f90

@@ -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)
@@ -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)