function [mitad, memoria] = divisor(doble, memoria, primera)
%------------------------------------------------------------------------
%|  function [mitad, memoria] = divisor(doble, memoria, primera)
%------------------------------------------------------------------------
%|   Funci髇 que simula la acci髇 de un divisor digital con niveles
%| TTL, en base a un detector de flancos de subida.
%|
%|     Est