Skip to content

Commit

Permalink
add filename to warnings
Browse files Browse the repository at this point in the history
  • Loading branch information
mjreno authored and mjreno committed Feb 20, 2025
1 parent b288064 commit 5c80ce2
Show file tree
Hide file tree
Showing 2 changed files with 7 additions and 4 deletions.
8 changes: 5 additions & 3 deletions src/Utilities/Export/DisNCStructured.f90
Original file line number Diff line number Diff line change
Expand Up @@ -145,7 +145,7 @@ subroutine dis_export_init(this, modelname, modeltype, modelfname, nc_fname, &
this%chunk_x = -1
write (warnmsg, '(a)') 'Ignoring user provided NetCDF chunking &
&parameters. Define chunk_time, chunk_x, chunk_y and chunk_z input &
&parameters to see an effect.'
&parameters to see an effect in file "'//trim(nc_fname)//'".'
call store_warning(warnmsg)
end if

Expand All @@ -156,7 +156,8 @@ subroutine dis_export_init(this, modelname, modeltype, modelfname, nc_fname, &
this%latlon = .true.
if (this%wkt /= '') then
write (warnmsg, '(a)') 'Ignoring user provided NetCDF wkt parameter &
&as longitude and latitude arrays have been provided.'
&as longitude and latitude arrays have been provided. &
&Applies to file "'//trim(nc_fname)//'".'
call store_warning(warnmsg)
this%wkt = ''
this%gridmap_name = ''
Expand All @@ -168,7 +169,8 @@ subroutine dis_export_init(this, modelname, modeltype, modelfname, nc_fname, &
if (this%wkt /= '') then
if (this%dis%angrot /= DZERO) then
write (warnmsg, '(a)') 'WKT parameter set with structured rotated &
&grid. Projected coordinates will have grid local values.'
&grid. Projected coordinates will have grid local values. &
&Applies to file "'//trim(nc_fname)//'".'
call store_warning(warnmsg)
end if
end if
Expand Down
3 changes: 2 additions & 1 deletion src/Utilities/Export/MeshNCModel.f90
Original file line number Diff line number Diff line change
Expand Up @@ -128,7 +128,8 @@ subroutine mesh_init(this, modelname, modeltype, modelfname, nc_fname, &
this%chunk_face = -1
this%chunk_time = -1
write (warnmsg, '(a)') 'Ignoring user provided NetCDF chunking parameter. &
&Define chunk_time and chunk_face input parameters to see an effect.'
&Define chunk_time and chunk_face input parameters to see an effect in &
&file "'//trim(nc_fname)//'".'
call store_warning(warnmsg)
end if

Expand Down

0 comments on commit 5c80ce2

Please sign in to comment.