|
| 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 |
| |