770     KnownExplosion.Radius:= 0;

   770     KnownExplosion.Radius:= 0;

   771 end;

   771 end;

   772 

   772 

   773 procedure freeModule;

   773 procedure freeModule;

   774 begin

   774 begin

   776 end;

   775 end;

   777 

   776 

   778 end.

   777 end.