pszs.F90 File Reference

#include "precomp.h"

Include dependency graph for pszs.F90:

Modules
module	pszs_mod

Functions/Subroutines
subroutine, public	pszs_mod::pszs_open (reopen_)
subroutine, public	pszs_mod::pszs_close
subroutine, public	pszs_mod::pszs_setvariables (isp, pszs_, lb, ub)
subroutine, public	pszs_mod::pszs_initialize (isp, npart_loc)
subroutine, public	pszs_mod::pszs_solve (time)
subroutine	pszs_mod::pszs1d_coefeq (pszs_, krterms, x, idt, idw, c, isp)
subroutine	pszs_mod::pszs2d_coefeq (pszs_, krterms, x, y, idt, idw, c, isp)
subroutine	pszs_mod::pszs3d_coefeq (pszs_, krterms, x, y, z, idt, idw, c, isp)
subroutine	pszs_mod::disrhs1d (pszs_, scase)
real(kind=r8) function	pszs_mod::get_fun1d (x, scase, pszs_)
real(kind=r8) function	pszs_mod::sech (x)
subroutine	pszs_mod::disrhs2d (pszs_, scase)
real(kind=r8) function	pszs_mod::get_fun2d (x1, x2, scase, pszs_)
subroutine	pszs_mod::disrhs3d (pszs_, scase)
real(kind=r8) function	pszs_mod::get_fun3d (x1, x2, x3, scase, pszs_)

Variables
integer	pszs_mod::mass_matrix =1
integer	pszs_mod::fidpszs
real(kind=r8), dimension(:), allocatable	pszs_mod::xg1
real(kind=r8), dimension(:), allocatable	pszs_mod::wg1
real(kind=r8), dimension(:,:), allocatable	pszs_mod::fun1
real(kind=r8), dimension(:), allocatable	pszs_mod::xg2
real(kind=r8), dimension(:), allocatable	pszs_mod::wg2
real(kind=r8), dimension(:,:), allocatable	pszs_mod::fun2
real(kind=r8), dimension(:), allocatable	pszs_mod::xg3
real(kind=r8), dimension(:), allocatable	pszs_mod::wg3
real(kind=r8), dimension(:,:), allocatable	pszs_mod::fun3
integer, dimension(:,:), allocatable	pszs_mod::idert
integer, dimension(:,:), allocatable	pszs_mod::iderw
real(kind=r8), dimension(:), allocatable	pszs_mod::coefs
real(kind=r8)	pszs_mod::contrib
integer	pszs_mod::ig1
integer	pszs_mod::ig2
integer	pszs_mod::ig3
integer	pszs_mod::it1
integer	pszs_mod::it2
integer	pszs_mod::it3
integer	pszs_mod::igt1
integer	pszs_mod::igt2
integer	pszs_mod::igt3
integer	pszs_mod::irow
integer	pszs_mod::jcol
integer	pszs_mod::in
integer	pszs_mod::jn
integer	pszs_mod::zn
integer	pszs_mod::iterm
integer	pszs_mod::iw1
integer	pszs_mod::iw2
integer	pszs_mod::iw3
integer	pszs_mod::igw1
integer	pszs_mod::igw2
integer	pszs_mod::igw3
integer	pszs_mod::n1
integer	pszs_mod::nidbas1
integer	pszs_mod::ndim1
integer	pszs_mod::ng1
integer	pszs_mod::n2
integer	pszs_mod::nidbas2
integer	pszs_mod::ndim2
integer	pszs_mod::ng2
integer	pszs_mod::n3
integer	pszs_mod::nidbas3
integer	pszs_mod::ndim3
integer	pszs_mod::ng3
real(kind=r8), dimension(:), allocatable	pszs_mod::solcal1d
real(kind=r8), dimension(:), allocatable	pszs_mod::solder1d
real(kind=r8), dimension(:), allocatable	pszs_mod::solana1d
real(kind=r8), dimension(:,:), allocatable	pszs_mod::solcal2d
real(kind=r8), dimension(:,:), allocatable	pszs_mod::solder2dx
real(kind=r8), dimension(:,:), allocatable	pszs_mod::solder2dy
real(kind=r8), dimension(:,:), allocatable	pszs_mod::solana2d
real(kind=r8), dimension(:,:,:), allocatable	pszs_mod::solcal3d
real(kind=r8), dimension(:,:,:), allocatable	pszs_mod::solder3dx
real(kind=r8), dimension(:,:,:), allocatable	pszs_mod::solder3dy
real(kind=r8), dimension(:,:,:), allocatable	pszs_mod::solder3dz
real(kind=r8), dimension(:,:,:), allocatable	pszs_mod::solana3d
character(len=128)	pszs_mod::mfile ='matrix.h5'
character(len=256)	pszs_mod::hpath
character(len=8), dimension(3)	pszs_mod::clabel
character(len=8), dimension(3)	pszs_mod::altlabel
logical, dimension(3)	pszs_mod::switchlabel
integer, dimension(3)	pszs_mod::cnn
integer, parameter	pszs_mod::ngauss = 4