Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
conserv_odiag | Module: | File: ODIAG_COM.f |
Author : Gary Russell/Gavin Schmidt/Denis Gueyffier
Version:
Declaration:
subroutine conserv_odiag (m, consfn, icon, atmocn)
- oj_budg : used from ocean
- owtbudg : used from ocean
- oj_0b : used from ocean
- oj_1b : used from ocean
- imaxj : used from ocean
- getdomainbounds : used from domain_decomp_1d
- ogrid : used from oceanr_dim
- atmocn_xchng_vars : used from exchange_types
- m :
integer, intent(in)
- index denoting from where routine is called
- icon :
integer, intent(in)
- index for the quantity concerned
- consfn :
- external routine that calculates total conserved quantity
- atmocn :
type(atmocn_xchng_vars)
-
- total :
real*8, dimension(ogrid%i_strt_halo:ogrid%i_stop_halo, ogrid%j_strt_halo:ogrid%j_stop_halo)
- amount of conserved quantity at this time
- totalj :
real*8, dimension(oj_0b:oj_1b)
- i :
integer
- j :
integer
- nm :
integer
- ni :
integer
- j_0 :
integer
- j_1 :
integer