!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real, | public, | SAVE, ALLOCATABLE | :: | fext(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | beta(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | unsairez(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | unsaire(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | cu(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | cv(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | cuvsurcv(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | cvusurcu(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | aire(:) | |||
| real, | public, | SAVE | :: | apoln | |||
| real, | public, | SAVE | :: | apols | |||
| real, | public, | SAVE, ALLOCATABLE | :: | aireu(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | airev(:) | |||
| logical, | public, | SAVE | :: | alpha_var | |||
| logical, | public, | SAVE | :: | slab_upstream | |||
| logical, | public, | SAVE | :: | slab_sverdrup | |||
| logical, | public, | SAVE | :: | slab_tyeq | |||
| logical, | public, | SAVE | :: | ekman_zonadv | |||
| logical, | public, | SAVE | :: | ekman_zonavg | |||
| real, | public, | SAVE | :: | alpham | |||
| real, | public, | SAVE | :: | gmkappa | |||
| real, | public, | SAVE | :: | gm_smax | |||
| real, | public, | SAVE, ALLOCATABLE | :: | zmasqu(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | zmasqv(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | unsfv(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | unsbv(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | unsev(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | unsfu(:) | |||
| real, | public, | SAVE, ALLOCATABLE | :: | unseu(:) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ip1jm | |||
| integer, | intent(in) | :: | ip1jmp1 | |||
| real, | intent(in) | :: | unsairez_(ip1jm) | |||
| real, | intent(in) | :: | fext_(ip1jm) | |||
| real, | intent(in) | :: | unsaire_(ip1jmp1) | |||
| real, | intent(in) | :: | cu_(ip1jmp1) | |||
| real, | intent(in) | :: | cuvsurcv_(ip1jm) | |||
| real, | intent(in) | :: | cv_(ip1jm) | |||
| real, | intent(in) | :: | cvusurcu_(ip1jmp1) | |||
| real, | intent(in) | :: | aire_(ip1jmp1) | |||
| real, | intent(in) | :: | apoln_ | |||
| real, | intent(in) | :: | apols_ | |||
| real, | intent(in) | :: | aireu_(ip1jmp1) | |||
| real, | intent(in) | :: | airev_(ip1jm) | |||
| real, | intent(in) | :: | rlatv(nbp_lat-1) | |||
| real, | intent(in) | :: | rad | |||
| real, | intent(in) | :: | omeg |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real | :: | zmasq(klon_glo) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | nlevs | |||
| real, | intent(in) | :: | temp(klon_glo,nlevs) | |||
| real, | intent(out) | :: | delta(klon_glo,nlevs) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real | :: | tx_phy(klon_glo) | ||||
| real | :: | ty_phy(klon_glo) | ||||
| real | :: | ts_phy(klon_glo) | ||||
| real | :: | dt_phy(klon_glo) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real | :: | tx_phy(klon_glo) | ||||
| real | :: | ty_phy(klon_glo) | ||||
| real | :: | ts_phy(klon_glo,2) | ||||
| real | :: | dt_phy_ek(klon_glo,2) | ||||
| real | :: | dt_phy_gm(klon_glo,2) | ||||
| logical, | intent(in) | :: | slab_gm |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real | :: | ts_phy(klon_glo,2) | ||||
| real | :: | dt_phy(klon_glo,2) |