# HG changeset patch
# User vitor
# Date 1217197371 0
# Node ID da24b77f46f66b96868ec1bcc194393061c1e7e1
# Parent  4ebfb53ff2df3bc807901577f1d8c7f0c0ba5f42
Add a few comments pointing to the G.728 specification

diff -r 4ebfb53ff2df -r da24b77f46f6 ra288.c
--- a/ra288.c	Sun Jul 27 22:21:41 2008 +0000
+++ b/ra288.c	Sun Jul 27 22:22:51 2008 +0000
@@ -74,11 +74,13 @@
         ractx->sb[x] = -scalar_product_float(ractx->sb + x + 1,
                                              ractx->sp_lpc, 36);
 
-    /* convert log and do rms */
+    /* block 46 of G.728 spec */
     sum = 32. - scalar_product_float(ractx->gain_lpc, ractx->lhist, 10);
 
+    /* block 47 of G.728 spec */
     sum = av_clipf(sum, 0, 60);
 
+    /* block 48 of G.728 spec */
     sumsum = exp(sum * 0.1151292546497) * gain;    /* pow(10.0,sum/20)*f */
 
     for (x=0; x < 5; x++)