New while loop

Model now terminates when you have a reasonable estimate of Tau_s. This
is in “make_season.jl”. Also, speeds chosen to be realistic.