SICOPOLIS V3.2
 All Classes Files Functions Variables Macros
Functions/Subroutines
topograd_1.F90 File Reference

Calculation of topography gradients on the staggered grid and on the grid points (the latter by second-order discretization). Length rescaling with the corresponding components of the metric tensor is already included. More...

Go to the source code of this file.

Functions/Subroutines

subroutine topograd_1 (dxi, deta, n_switch)
 Calculation of topography gradients on the staggered grid and on the grid points (the latter by second-order discretization). Length rescaling with the corresponding components of the metric tensor is already included. More...
 

Detailed Description

Calculation of topography gradients on the staggered grid and on the grid points (the latter by second-order discretization). Length rescaling with the corresponding components of the metric tensor is already included.

Copyright

Copyright 2009-2016 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 topograd_1.F90.

Function/Subroutine Documentation

subroutine topograd_1 ( real(dp), intent(in)  dxi,
real(dp), intent(in)  deta,
integer(i4b), intent(in)  n_switch 
)

Calculation of topography gradients on the staggered grid and on the grid points (the latter by second-order discretization). Length rescaling with the corresponding components of the metric tensor is already included.

Definition at line 41 of file topograd_1.F90.