IndexRundeck: P1SoM40Created: Fri May 10 03:30:18 EDT 2024

geomo

Module:
File: OGEOM.f
Summary: GEOMO Calculates the spherical geometry for the C grid
Author : Gary Russell
Version: 2.0

Declaration:
Variables:
twopi : used from constant

radius : used from constant

omega : used from constant

radian : used from constant

im : used from ocean

jm : used from ocean

dlon : used from ocean

dlat : used from ocean

dlatm : used from ocean

fjeq : used from ocean

dxyp : used from ocean
Initial Value = >DXYPO
dxyvo : used from ocean

dxys : used from ocean
Initial Value = >DXYSO
dxyn : used from ocean
Initial Value = >DXYNO
dxp : used from ocean
Initial Value = >DXPO
dyp : used from ocean
Initial Value = >DYPO
dxv : used from ocean
Initial Value = >DXVO
dyv : used from ocean
Initial Value = >DYVO
rlat : used from ocean

cosv : used from ocean
Initial Value = >COSVO
sinv : used from ocean
Initial Value = >SINVO
sinp : used from ocean
Initial Value = >SINPO
cosp : used from ocean
Initial Value = >COSPO
ramvs : used from ocean

ramvn : used from ocean

zdxyp : used from ocean
Initial Value = >BYDXYPO
cosm : used from ocean

cosq : used from ocean

sinxy : used from ocean

tanxy : used from ocean

dxpgf : used from ocean

dypgf : used from ocean

sini : used from ocean
Initial Value = >SINIC
cosi : used from ocean
Initial Value = >COSIC
sinu : used from ocean

cosu : used from ocean

j1o : used from ocean

jmpf : used from ocean
Initial Value = >J40S
imaxj : used from ocean

odlat_dg : used from ocean

olat_dg : used from ocean

odlon_dg : used from ocean

olon_dg : used from ocean

oxyp : used from ocean

olat2d_dg : used from ocean

halo_update : used from domain_decomp_1d

ogrid : used from oceanr_dim

lats : real*8
LATitude in radians at South edge of primary cell
i : integer*4

j : integer*4

latn : real*8
LATitude in radians at North edge of primary cell
sins : real*8
SINe of LATS
sinn : real*8
SINe of LATN
pcos : real*8
= s[cos(LAT)^2 dLAT] / S[cos(LAT) dLAT]
plat : real*8, dimension(JM)
= s[LAT cos(LAT) dLAT] / S[cos(LAT) dLAT]
j_0 : integer

j_1 : integer

Simplex Website Curator: Igor Aleinov — NASA Official: Gavin A. Schmidt

Contact GISS NASA Privacy PolicyAccessibility