Subroutine sce_main


VARIABLES

run_initialseedinteger 
?  
49, 60, 68
iiinteger 
? * Definitions
50, 110, 112, 113, 114
firstinteger 
?  
50, 84, 85
numcvinteger 
?  
50, 108, 109, 112
maxcvreal*8 
?  
51, 116, 121, 123
writeformatcharacter(len=300) 
?  
52, 93, 94, 95, 98, 99, 117, 118, 121, 132, 133
msgcharacter(len=135) 
?  
53, 95, 96, 99, 100, 121, 122, 133, 134, 167, 168
tmp2integer(2)
?  
54, 88, 89, 171, 172
tmp3character(len=9)(1)
?  
55, 120, 121