CPL_get Subroutine

public subroutine CPL_get(icmax_olap, icmin_olap, jcmax_olap, jcmin_olap, kcmax_olap, kcmin_olap, density_cfd, density_md, dt_cfd, dt_MD, dx, dy, dz, ncx, ncy, ncz, xg, yg, zg, xL_md, xL_cfd, yL_md, yL_cfd, zL_md, zL_cfd, constraint_algo, constraint_CVflag, constraint_OT, constraint_NCER, constraint_Flekkoy, constraint_off, constraint_CV, icmin_cnst, icmax_cnst, jcmin_cnst, jcmax_cnst, kcmin_cnst, kcmax_cnst, md_cfd_match_cellsize, staggered_averages, cpl_cfd_bc_slice, cpl_md_bc_slice, cpl_cfd_bc_x, cpl_cfd_bc_y, cpl_cfd_bc_z, timestep_ratio, comm_style)

Arguments

Type IntentOptional AttributesName
integer, intent(out), optional :: icmax_olap
integer, intent(out), optional :: icmin_olap
integer, intent(out), optional :: jcmax_olap
integer, intent(out), optional :: jcmin_olap
integer, intent(out), optional :: kcmax_olap
integer, intent(out), optional :: kcmin_olap
real(kind=kind(0.d0)), intent(out), optional :: density_cfd
real(kind=kind(0.d0)), intent(out), optional :: density_md
real(kind=kind(0.d0)), intent(out), optional :: dt_cfd
real(kind=kind(0.d0)), intent(out), optional :: dt_MD
real(kind=kind(0.d0)), intent(out), optional :: dx
real(kind=kind(0.d0)), intent(out), optional :: dy
real(kind=kind(0.d0)), intent(out), optional :: dz
integer, intent(out), optional :: ncx
integer, intent(out), optional :: ncy
integer, intent(out), optional :: ncz
real(kind=kind(0.d0)), intent(out), optional dimension(:,:), allocatable:: xg
real(kind=kind(0.d0)), intent(out), optional dimension(:,:), allocatable:: yg
real(kind=kind(0.d0)), intent(out), optional dimension(:), allocatable:: zg
real(kind=kind(0.d0)), intent(out), optional :: xL_md
real(kind=kind(0.d0)), intent(out), optional :: xL_cfd
real(kind=kind(0.d0)), intent(out), optional :: yL_md
real(kind=kind(0.d0)), intent(out), optional :: yL_cfd
real(kind=kind(0.d0)), intent(out), optional :: zL_md
real(kind=kind(0.d0)), intent(out), optional :: zL_cfd
integer, intent(out), optional :: constraint_algo
integer, intent(out), optional :: constraint_CVflag
integer, intent(out), optional :: constraint_OT
integer, intent(out), optional :: constraint_NCER
integer, intent(out), optional :: constraint_Flekkoy
integer, intent(out), optional :: constraint_off
integer, intent(out), optional :: constraint_CV
integer, intent(out), optional :: icmin_cnst
integer, intent(out), optional :: icmax_cnst
integer, intent(out), optional :: jcmin_cnst
integer, intent(out), optional :: jcmax_cnst
integer, intent(out), optional :: kcmin_cnst
integer, intent(out), optional :: kcmax_cnst
integer, intent(out), optional :: md_cfd_match_cellsize
logical, intent(out), optional dimension(3):: staggered_averages
integer, intent(out), optional :: cpl_cfd_bc_slice
integer, intent(out), optional :: cpl_md_bc_slice
integer, intent(out), optional :: cpl_cfd_bc_x
integer, intent(out), optional :: cpl_cfd_bc_y
integer, intent(out), optional :: cpl_cfd_bc_z
integer, intent(out), optional :: timestep_ratio
integer, intent(out), optional :: comm_style

Description

Wrapper to retrieve (read only) parameters from the coupler_module Note - this ensures all variable in the coupler are protected from corruption by either CFD or MD codes

  • Synopsis

  • CPL_get([see coupler_module])

  • Input Parameters

  • NONE

  • Output Parameter

  • @see coupler_module

@author Edward Smith



© 2015 Fortran Program was written by Edward Smith David Trevelyan.
Documentation generated by FORD.