function [LAR,K] = tf2lar(A)
% [LAR,K] = tf2lar(A)
%
% Converts direct-form LPC coefficients into log area ratio coefficients.
% K are the corresponding reflection coefficients.
%

K = tf2latc(A)';
LAR = log((1 - K)./(1 + K));
