Invia SMS: A FORTRAN program to simulate harvesting machines for mechanized thinning, by R.M. Newnham and S. Sjunnesson.