Index | Rundeck: E6TomaF40 | Created: Sat May 18 03:30:40 EDT 2024 |
ostruc | Module: OCNML | File: OCNML.f |
Author : Original Development Team
Version: 1.0 (Q-flux ocean)
Declaration:
subroutine ostruc(qtchng, atmocn, atmice)
- grid : used from domain_decomp_atm
- getdomainbounds : used from domain_decomp_atm
- atmocn_xchng_vars : used from exchange_types
- atmice_xchng_vars : used from exchange_types
- rhows : used from constant
- qtchng :
logical, intent(in)
- true if TOCEAN(1) is changed (needed for qflux calculation)
- atmocn :
type(atmocn_xchng_vars)
- atmice :
type(atmice_xchng_vars)
- i :
integer
- j :
integer
- dt2 :
real*8
- t2ent :
real*8
- t2wt :
real*8
- dwtro :
real*8
- wtr1o :
real*8
- wtr2o :
real*8
- wtr2o_old :
real*8
- j_0 :
integer
- j_1 :
integer
- i_0 :
integer
- i_1 :
integer