PUMA  219
Portable University Model of the Atmosphere
/Users/home/WC/puma/src/mpimod_multi.f90 File Reference

Go to the source code of this file.

Data Types

module  mpimod

Functions/Subroutines

subroutine mpstart
subroutine mrdimensions
subroutine mpstop
subroutine mrsum (k)
subroutine mrdiff (pa, pd, kesp, klev)
subroutine mrbcin (k, n)
subroutine mrtrunc (sphi, nthi, splo, ntlo)
subroutine mrexpand (splo, ntlo, sphi, nthi)
subroutine mpbci (k)
subroutine mpbcin (k, n)
subroutine mpbcr (p)
subroutine mpbcrn (p, n)
subroutine mpbcl (k)
subroutine mpscin (k, n)
subroutine mpscrn (p, n)
subroutine mpscdn (p, n)
subroutine mpscsp (pf, pp, klev)
subroutine mpscgp (pf, pp, klev)
subroutine mpgasp (pf, pp, klev)
subroutine mpgagp (pf, pp, klev)
subroutine mpgacs (pcs)
subroutine mpgallsp (pf, pp, klev)
subroutine mpsum (psp, klev)
subroutine mpsumsc (psf, psp, klev)
subroutine mpsumr (pr, kdim)
subroutine mpsumbcr (pr, kdim)
subroutine mpreadsp (ktape, p, kdim, klev)
subroutine mpreadgp (ktape, p, kdim, klev)
subroutine mpwritesp (ktape, p, kdim, klev)
subroutine mpwritegp (ktape, p, kdim, klev)
subroutine mpwritegph (ktape, p, kdim, klev, ihead)
subroutine mpi_info (nprocess, pid)
subroutine mpgetsp (yn, p, kdim, klev)
subroutine mpgetgp (yn, p, kdim, klev)
subroutine mpputsp (yn, p, kdim, klev)
subroutine mpputgp (yn, p, kdim, klev)
subroutine mpmaxval (p, kdim, klev, pmax)
subroutine mpsumval (p, kdim, klev, psum)

Function/Subroutine Documentation

subroutine mpbci (   k)

Definition at line 176 of file mpimod_multi.f90.

subroutine mpbcin ( integer, dimension(n)  k,
  n 
)

Definition at line 180 of file mpimod_multi.f90.

subroutine mpbcl ( logical  k)

Definition at line 194 of file mpimod_multi.f90.

subroutine mpbcr (   p)

Definition at line 185 of file mpimod_multi.f90.

subroutine mpbcrn ( real, dimension(n)  p,
  n 
)

Definition at line 189 of file mpimod_multi.f90.

subroutine mpgacs (   pcs)

Definition at line 246 of file mpimod_multi.f90.

subroutine mpgagp ( real, dimension(nhor,klev)  pf,
real, dimension(nhor,klev)  pp,
  klev 
)

Definition at line 238 of file mpimod_multi.f90.

subroutine mpgallsp ( real, dimension(nesp,klev)  pf,
real, dimension(nspp,klev)  pp,
  klev 
)

Definition at line 250 of file mpimod_multi.f90.

subroutine mpgasp ( real, dimension(nesp,klev)  pf,
real, dimension(nspp,klev)  pp,
  klev 
)

Definition at line 230 of file mpimod_multi.f90.

subroutine mpgetgp ( character (len=*)  yn,
real, dimension(kdim,klev)  p,
  kdim,
  klev 
)

Definition at line 328 of file mpimod_multi.f90.

subroutine mpgetsp ( character (len=*)  yn,
real, dimension(kdim,klev)  p,
  kdim,
  klev 
)

Definition at line 320 of file mpimod_multi.f90.

subroutine mpi_info ( integer  nprocess,
integer  pid 
)

Definition at line 312 of file mpimod_multi.f90.

subroutine mpmaxval ( real, dimension(kdim,klev)  p,
  kdim,
  klev,
  pmax 
)

Definition at line 376 of file mpimod_multi.f90.

subroutine mpputgp ( character (len=*)  yn,
real, dimension(kdim,klev)  p,
  kdim,
  klev 
)

Definition at line 344 of file mpimod_multi.f90.

subroutine mpputsp ( character (len=*)  yn,
real, dimension(kdim,klev)  p,
  kdim,
  klev 
)

Definition at line 336 of file mpimod_multi.f90.

subroutine mpreadgp (   ktape,
real, dimension(kdim,klev)  p,
  kdim,
  klev 
)

Definition at line 284 of file mpimod_multi.f90.

subroutine mpreadsp (   ktape,
real, dimension(kdim,klev)  p,
  kdim,
  klev 
)

Definition at line 278 of file mpimod_multi.f90.

subroutine mpscdn ( real (kind=8), dimension(n)  p,
  n 
)

Definition at line 209 of file mpimod_multi.f90.

subroutine mpscgp ( real, dimension(nlon*nlat,klev)  pf,
real, dimension(nhor,klev)  pp,
  klev 
)

Definition at line 222 of file mpimod_multi.f90.

subroutine mpscin ( integer, dimension(n)  k,
  n 
)

Definition at line 199 of file mpimod_multi.f90.

subroutine mpscrn ( real, dimension(n)  p,
  n 
)

Definition at line 204 of file mpimod_multi.f90.

subroutine mpscsp ( real, dimension(nesp,klev)  pf,
real, dimension(nspp,klev)  pp,
  klev 
)

Definition at line 214 of file mpimod_multi.f90.

subroutine mpstart ( )

Definition at line 16 of file mpimod_multi.f90.

subroutine mpstop ( )

Definition at line 62 of file mpimod_multi.f90.

subroutine mpsum (   psp,
  klev 
)

Definition at line 258 of file mpimod_multi.f90.

subroutine mpsumbcr (   pr,
  kdim 
)

Definition at line 274 of file mpimod_multi.f90.

subroutine mpsumr (   pr,
  kdim 
)

Definition at line 270 of file mpimod_multi.f90.

subroutine mpsumsc ( real, dimension(nesp,klev)  psf,
real, dimension(nspp,klev)  psp,
  klev 
)

Definition at line 262 of file mpimod_multi.f90.

subroutine mpsumval ( real, dimension(kdim,klev)  p,
  kdim,
  klev,
  psum 
)

Definition at line 383 of file mpimod_multi.f90.

subroutine mpwritegp (   ktape,
real, dimension(kdim,klev)  p,
  kdim,
  klev 
)

Definition at line 296 of file mpimod_multi.f90.

subroutine mpwritegph (   ktape,
real, dimension(kdim,klev)  p,
  kdim,
  klev,
integer, dimension(8)  ihead 
)

Definition at line 302 of file mpimod_multi.f90.

subroutine mpwritesp (   ktape,
real, dimension(kdim,klev)  p,
  kdim,
  klev 
)

Definition at line 290 of file mpimod_multi.f90.

subroutine mrbcin ( integer, dimension(n)  k,
  n 
)

Definition at line 121 of file mpimod_multi.f90.

subroutine mrdiff ( real, dimension(kesp,klev)  pa,
real, dimension(kesp,klev)  pd,
  kesp,
  klev 
)

Definition at line 91 of file mpimod_multi.f90.

subroutine mrdimensions ( )

Definition at line 43 of file mpimod_multi.f90.

subroutine mrexpand ( complex, dimension(*)  splo,
  ntlo,
complex, dimension(*)  sphi,
  nthi 
)

Definition at line 159 of file mpimod_multi.f90.

subroutine mrsum ( integer  k)

Definition at line 76 of file mpimod_multi.f90.

subroutine mrtrunc ( complex, dimension(*)  sphi,
  nthi,
complex, dimension(*)  splo,
  ntlo 
)

Definition at line 137 of file mpimod_multi.f90.