6261                                 AddCI(iter)

  6261                                 AddCI(iter)

  6262                                 end

  6262                                 end

  6263                             else if iter^.Kind = gtAirMine then

  6263                             else if iter^.Kind = gtAirMine then

  6264                                 begin

  6264                                 begin

  6265                                 AddCI(iter);

  6265                                 AddCI(iter);

  6266                                 iter^.State:= iter^.State or gstFrozen

  6267                                 iter^.State:= iter^.State or gstFrozen

  6267                                 end

  6268                                 end

  6268                             else // gtExplosives

  6269                             else // gtExplosives

  6269                                 begin

  6270                                 begin

  6270                                 iter^.State:= iter^.State or gstFrozen;

  6271                                 iter^.State:= iter^.State or gstFrozen;