Subroutine write_lastbest


VARIABLES

statreal
?  
1239
sfilecharacter*80
?  
1240