//---------------------------------------------------------------------

        public static Event Initiate(ActiveSite site,
                                     int windTimestep)
        {
            IEcoregion ecoregion = Model.Core.Ecoregion[site];
            IEventParameters eventParms = windEventParms[ecoregion.Index];
            double eventProbability = (windTimestep * Model.Core.CellArea) /
                                      (eventParms.RotationPeriod * eventParms.MeanSize);
            if (Random.GenerateUniform() <= eventProbability) {
                Event windEvent = new Event(site,
                                            ComputeSizeHectares(eventParms));
                windEvent.Spread(Model.Core.CurrentTime);
                return windEvent;
            }
            else
                return null;
        }