Subroutine vom_gstom


VARIABLES

cond1real*8 
?  
1340, 1387, 1393, 1418
cond2real*8 
?  
1340, 1388, 1393
cond3real*8(3,3,3)
?  
1341, 1390, 1418
part1real*8 
?  
1342, 1395, 1396, 1407
part2real*8 
?  
1342, 1396, 1397, 1404
part3real*8 
?  
1342, 1397, 1404, 1405
part4real*8 
?  
1342, 1399, 1402
part5real*8 
?  
1342, 1400, 1402, 1404, 1405
part6real*8 
?  
1343, 1401, 1402
part7real*8 
?  
1343, 1402, 1404, 1405
part8real*8 
?  
1343, 1404, 1405
part9real*8 
?  
1343, 1405, 1407
iiinteger 
? * Definitions
1344, 1363, 1364, 1365, 1378, 1379, 1380, 1381, 1382, 1383, 1384, 1417, 1418, 1419, 1420, 1421, 1425, 1426, 1427, 1436
Ma_lgreal*8(3)
? fraction of absorbed radiation grasses
1345, 1370, 1373, 1380, 1382, 1384
Ma_ltreal*8(3)
? fraction of absorbed radiation trees
1346, 1356, 1359, 1365