function [sonda, memoria, parametros] = ...
                                 pll(ref, memoria, fs, primera, parametros)
%------------------------------------------------------------------------
%|  [sonda, memoria, parametros] = ...
%|                             pll(ref, memoria, fs, primera, parametros)
%------------------------------------------------------------------------
%|   Funci髇 que simula la acci髇 de un lazo enganchado en fase, con 
%| los siguientes componentes:
%|     a) Comparador de Fases: tipo UP-DOWN, niveles TTL, activo por
%|                             flancos de bajada
%|     b) Filtro del Lazo: Lead Lag activo.
%|     c) VCO: se construye calculando el 醤gulo que ha de aplicarse
%|             a un tono para que emita una se馻l en fase con la 
%|             referencia. Esto se realiza integrando el error de fases.
%|                (ph_o / ph_in) = Kv/s => Integrador de fase
%|              
%|     Est