Index | Rundeck: E6F40 | Created: Fri May 17 03:30:27 EDT 2024 |
solar0 | Module: RADPAR | File: RADIATION.f |
Author :
Version:
Declaration:
subroutine solar0
- nmkwav :
integer, parameter, dimension(17)
- Initial Value
= (/ 200, 360, 770, 795, 805, 810, 860,1250,1500,1740,2200,3000,3400,3600,3800 ,4000,9999/)
- lorder :
integer, parameter, dimension(16)
- Initial Value
= (/15,14, 8, 7, 6, 5, 13, 12, 4, 3, 2, 1, 11, 10, 9,16/)
- n2 :
integer
- i :
integer