Index | Rundeck: P1SoM40 | Created: Fri May 10 03:30:18 EDT 2024 |
setqva | Module: RADPAR | File: RADIATION.f |
Author :
Version:
Declaration:
subroutine setqva(veff, sizvol)
- trab :
real*8, dimension(33, 20)
- q5 :
real*8, dimension(5)
- rv20 :
real*8, dimension(20)
- qv20 :
real*8, dimension(20)
- v5 :
real*8, parameter, dimension(5)
- Initial Value
= (/ .1d0, .2d0, .3d0, .4d0, .5d0/)
- sizvol :
real*8, intent(in), optional
- veff :
real*8, intent(in), optional
- refn :
real*8
- radx :
real*8
- wtjhi :
real*8
- wtjlo :
real*8
- i :
integer
- k :
integer
- n :
integer
- jrxlo :
integer
- jrxhi :
integer