borehole.F90 File Reference

Computation of an arbitrary field quantity for a given borehole position x_pos, y_pos by weighed averaging of the corresponding gridded 2-d field. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	borehole (field, x_pos, y_pos, dxi, deta, ch_grid, field_val)
	Computation of an arbitrary field quantity for a given borehole position x_pos, y_pos by weighed averaging of the corresponding gridded 2-d field.

---

Detailed Description

Computation of an arbitrary field quantity for a given borehole position x_pos, y_pos by weighed averaging of the corresponding gridded 2-d field.

Copyright

Copyright 2009-2013 Ralf Greve

License

This file is part of SICOPOLIS.

SICOPOLIS is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.

SICOPOLIS is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License along with SICOPOLIS. If not, see http://www.gnu.org/licenses/.

Definition in file borehole.F90.

---

Function/Subroutine Documentation

subroutine borehole	(	real(dp), dimension(0:jmax,0:imax), intent(in)	field,
		real(dp), intent(in)	x_pos,
		real(dp), intent(in)	y_pos,
		real(dp), intent(in)	dxi,
		real(dp), intent(in)	deta,
		character (len=*), intent(in)	ch_grid,
		real(dp), intent(out)	field_val
	)

Computation of an arbitrary field quantity for a given borehole position x_pos, y_pos by weighed averaging of the corresponding gridded 2-d field.

Definition at line 39 of file borehole.F90.