|
integer, parameter | rrlw_kg16::no16 = 16 |
|
real(kind=r8), dimension(no16) | rrlw_kg16::fracrefbo |
|
real(kind=r8), dimension(no16, 9) | rrlw_kg16::fracrefao |
|
real(kind=r8), dimension(9, 5, 13, no16) | rrlw_kg16::kao |
|
real(kind=r8), dimension(5, 13:59, no16) | rrlw_kg16::kbo |
|
real(kind=r8), dimension(10, no16) | rrlw_kg16::selfrefo |
|
real(kind=r8), dimension(4, no16) | rrlw_kg16::forrefo |
|
integer, parameter | rrlw_kg16::ng16 = 2 |
|
real(kind=r8), dimension(ng16) | rrlw_kg16::fracrefb |
|
real(kind=r8), dimension(ng16, 9) | rrlw_kg16::fracrefa |
|
real(kind=r8), dimension(9, 5, 13, ng16) | rrlw_kg16::ka |
|
real(kind=r8), dimension(585, ng16) | rrlw_kg16::absa |
|
real(kind=r8), dimension(5, 13:59, ng16) | rrlw_kg16::kb |
|
real(kind=r8), dimension(235, ng16) | rrlw_kg16::absb |
|
real(kind=r8), dimension(10, ng16) | rrlw_kg16::selfref |
|
real(kind=r8), dimension(4, ng16) | rrlw_kg16::forref |
|