CGpop mini-Application (2-sided MPI 1D data structure version) 0.1
Modules | Functions/Subroutines | Variables
solvers.F90 File Reference

Go to the source code of this file.

Modules

module  solvers
 

This module contains routines and operators for solving the elliptic system for surface pressure in the barotropic mode.


Functions/Subroutines

subroutine, public esolver (RHS, PRESS)
 This subroutine calls the eliptic solver.
subroutine, public init_solvers (RHS, PRESSI, PRESSF)
 This routine initializes choice of solver, calculates the coefficients of the 9-point stencils for the barotropic operator and reads in a preconditioner if requested.

Variables

integer(i4), public solv_sum_iters
real(r8), public rms_residual
logical strip
real(r8), dimension(nx_block,
ny_block, max_blocks_tropic),
public 
A0
real(r8), dimension(nx_block,
ny_block, max_blocks_tropic),
public 
AN
real(r8), dimension(nx_block,
ny_block, max_blocks_tropic),
public 
AE
real(r8), dimension(nx_block,
ny_block, max_blocks_tropic),
public 
ANE
real(r8), dimension(nx_block,
ny_block, max_blocks_tropic),
public 
RCALCT_B
logical(log_kind) lprecond
real(r8) sor
real(r8) resid_norm
integer(i4), parameter solv_pcg = 1
integer(i4), parameter solv_cgr = 2
integer(i4), parameter solv_jac = 3
integer(i4), parameter solv_cg1 = 4
integer(i4), parameter solv_lcg1 = 5
integer(i4), parameter solv_lpcg = 6
integer(i4) solv_itype
 All Classes Namespaces Files Functions Variables