Index | Rundeck: P1SoM40 | Created: Fri May 10 03:30:18 EDT 2024 |
coszt | Module: RAD_COSZ0 | File: GEOM_B.f |
Author : Original Development Team
Version:
Declaration:
subroutine coszt (rot1, rot2, cosz, cosza)
- twopi : used from constant
- lon : used from geom
- sinip : used from geom
- cosip : used from geom
- grid : used from domain_decomp_atm
- hassouthpole : used from domain_decomp_atm
- hasnorthpole : used from domain_decomp_atm
- rot1 :
real*8
- rot2 :
real*8
- cosz :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- cosza :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo), optional
- lt1 :
real*8, dimension(im)
- lt2 :
real*8, dimension(im)
- slt1 :
real*8, dimension(im)
- slt2 :
real*8, dimension(im)
- s2lt1 :
real*8, dimension(im)
- s2lt2 :
real*8, dimension(im)
- zero1 :
real*8, parameter
- Initial Value
= 1.D-2
- i :
integer
- j :
integer
- s2dawn :
real*8
- s2dusk :
real*8
- ecosz :
real*8
- ecosqz :
real*8
- clt1 :
real*8
- clt2 :
real*8
- zero2 :
real*8
- cdusk :
real*8
- dusk :
real*8
- dawn :
real*8
- sdusk :
real*8
- sdawn :
real*8
- cjcd :
real*8
- sjsd :
real*8
- sr1 :
real*8
- cr1 :
real*8
- sr2 :
real*8
- cr2 :
real*8
- drot :
real*8
- j_0 :
integer
- j_1 :
integer
- j_0s :
integer
- j_1s :
integer