Index | Rundeck: E6F40 | Created: Fri May 17 03:30:27 EDT 2024 |
rcomp1 | Module: RADPAR | File: RADIATION.f |
Author :
Version:
Declaration:
subroutine rcomp1(nrfun)
- am_i_root : used from domain_decomp_atm
- grid : used from domain_decomp_atm
- par_open : used from pario
- par_close : used from pario
- variable_exists : used from pario
- get_dimlen : used from pario
- read_data : used from pario
- file_exists : used from filemanager
- nrfun :
integer, dimension(14)
- ifirst :
integer, save
- Initial Value
= 1
- epstag :
character*80
- title :
character*80
- ozonlj :
real*4, dimension(44, 46)
- r72x46 :
real*4, dimension(72, 46)
- vtaur4 :
real*4, dimension(:, :), allocatable
- vtau4 :
real*4, allocatable, dimension(:, :, :)
- vreff4 :
real*4, allocatable, dimension(:, :)
- hv4 :
real*4, allocatable, dimension(:)
- lat4 :
real*4, allocatable, dimension(:)
- i :
integer
- j :
integer
- k :
integer
- l :
integer
- m :
integer
- n :
integer
- n1 :
integer
- n2 :
integer
- nrfu :
integer
- kk :
integer
- nn :
integer
- iyear :
integer
- imonth :
integer
- jjdays :
integer
- jyears :
integer
- jjdayg :
integer
- jyearg :
integer
- yr2s0i :
integer
- tgdata :
real*8, dimension(122, 13)
- temporary array to read data and pass it to RAD_UTILS
- gtau :
real*8, dimension(51, 11, 143)
- temporary array to read data and pass it to RAD_UTILS
- wavna :
real*8
- wavnb :
real*8
- pfwi :
real*8
- tkofpf :
real*8
- sumv :
real*8
- epk :
real*8
- epl :
real*8
- dep :
real*8
- sfnorm :
real*8
- d :
real*8
- o :
real*8
- q :
real*8
- s :
real*8
- ocm :
real*8
- wcm :
real*8
- yqsccb :
real*8
- n_bin :
integer
- fid :
integer
- ssi_in :
real*8, allocatable, dimension(:, :)
- calyear :
real*8, allocatable, dimension(:)
- ws_in :
real*8, allocatable, dimension(:)
- ds_in :
real*8, allocatable, dimension(:)
- tsi_in :
real*8, allocatable, dimension(:)
- have_radn9_file :
logical