*** empty log message ***

6 files changed, 171 insertions, 110 deletions

diff --git a/src/lua5/im_convert.lua b/src/lua5/im_convert.lua
new file mode 100644
index 0000000..231bdb5
--- /dev/null
+++ b/src/lua5/im_convert.lua
@@ -0,0 +1,18 @@
+ 
+function im.ConvertDataTypeNew(src_image, data_type, cpx2real, gamma, abssolute, cast_mode)
+  local dst_image = im.ImageCreateBased(src_image, nil, nil, nil, data_type)
+  return im.ConvertDataType(src_image, dst_image, cpx2real, gamma, abssolute, cast_mode), dst_image
+end
+
+function im.ConvertColorSpaceNew(src_image, color_space, has_alpha)
+  local dst_image = im.ImageCreateBased(src_image, nil, nil, color_space)
+  if (has_alpha) then dst_image:AddAlpha() end
+  return im.ConvertColorSpace(src_image, dst_image), dst_image
+end
+
+function im.ConvertToBitmapNew(src_image, color_space, has_alpha, cpx2real, gamma, abssolute, cast_mode)
+  if (not color_space) then color_space = im.ColorModeToBitmap(src_image:ColorSpace()) end
+  local dst_image = im.ImageCreateBased(src_image, nil, nil, color_space)
+  if (has_alpha) then dst_image:AddAlpha() end
+  return im.ConvertToBitmap(src_image, dst_image, cpx2real, gamma, abssolute, cast_mode), dst_image
+end
diff --git a/src/lua5/im_fftw.lua b/src/lua5/im_fftw.lua
index e57c7bf..7bae53e 100644
--- a/src/lua5/im_fftw.lua
+++ b/src/lua5/im_fftw.lua
@@ -3,6 +3,7 @@
 -- Creates a new function, with the name suffixed by "New". This new function
 -- creates a new image, based on a source image, and calls the previous function
 -- with this new image.
+-- We assume here that the functions returns only one parameter or none.
 
 local function OneSourceOneDest (funcname, width, height, color_space, data_type)
   local func = im[funcname]
@@ -14,8 +15,12 @@ local function OneSourceOneDest (funcname, width, height, color_space, data_type
     local dst_image = im.ImageCreateBased(src_image, width, height, color_space, data_type)
 
     -- call previous method, repassing all parameters
-    func(src_image, dst_image, unpack(arg))
-    return dst_image
+    local ret = func(src_image, dst_image, unpack(arg))
+    if (ret) then
+      return ret, dst_image
+    else
+      return dst_image
+    end
   end
 end
 
@@ -25,7 +30,7 @@ end
 
 local function TwoSourcesOneDest (funcname, width, height, color_space, data_type)
   local func = im[funcname]
-  
+
   -- see if function is really defined
   assert(func, string.format("undefined function `%s'", funcname))
 
@@ -35,8 +40,12 @@ local function TwoSourcesOneDest (funcname, width, height, color_space, data_typ
     local dst_image = im.ImageCreateBased(src_image1, width, height, color_space, data_type)
 
     -- call previous method, repassing all parameters
-    func(src_image1, src_image2, dst_image, unpack(arg))
-    return dst_image
+    local ret = func(src_image1, src_image2, dst_image, unpack(arg))
+    if (ret) then
+      return ret, dst_image
+    else
+      return dst_image
+    end
   end
 end
 
diff --git a/src/lua5/im_image.lua b/src/lua5/im_image.lua
new file mode 100644
index 0000000..03e80f6
--- /dev/null
+++ b/src/lua5/im_image.lua
@@ -0,0 +1,24 @@
+-- If all parameteres, besides the image, are nil, this is equivalent to image:Clone.
+-- If any parameter is not nil, then the value is used instead of the one from the source image.
+-- If a parameter is a function, then the function is called, passing the source
+-- image as parameter, to obtain the substituion value.
+
+function im.ImageCreateBased(image, width, height, color_space, data_type)        
+  -- default values are those of the source image                                 
+  width       = width       or image:Width()                                      
+  height      = height      or image:Height()                                     
+  color_space = color_space or image:ColorSpace()                                 
+  data_type   = data_type   or image:DataType()                                   
+                                                                                  
+  -- callback to calculate parameters based on source image                       
+  if type(width)       == "function" then       width = width(image) end        
+  if type(height)      == "function" then      height = height(image) end       
+  if type(color_space) == "function" then color_space = color_space(image) end  
+  if type(data_type)   == "function" then   data_type = data_type(image) end    
+                                                                                  
+  -- create a new image                                                           
+  new_image = im.ImageCreate(width, height, color_space, data_type)               
+  image:CopyAttributes(new_image)                                                 
+  if (image:HasAlpha()) then new_image:AddAlpha() end
+  return new_image                                                                
+end                                                                               
diff --git a/src/lua5/imlua_convert.c b/src/lua5/imlua_convert.c
index 96b8429..c2c56d9 100644
--- a/src/lua5/imlua_convert.c
+++ b/src/lua5/imlua_convert.c
@@ -2,7 +2,7 @@
  * \brief IM Lua 5 Binding
  *
  * See Copyright Notice in im_lib.h
- * $Id: imlua_convert.c,v 1.2 2009/08/04 21:35:26 scuri Exp $
+ * $Id: imlua_convert.c,v 1.3 2009/08/18 02:23:33 scuri Exp $
  */
 
 #include "im.h"
@@ -76,4 +76,21 @@ void imlua_open_convert (lua_State *L)
 {
   /* "im" table is at the top of the stack */
   luaL_register(L, NULL, imconvert_lib);
+#ifdef TEC_BIGENDIAN
+#ifdef TEC_64
+#include "loh/im_convert_be64.loh"
+#else
+#include "loh/im_convert_be32.loh"
+#endif
+#else
+#ifdef TEC_64
+#ifdef WIN64
+#include "loh/im_convert_le64w.loh"
+#else
+#include "loh/im_convert_le64.loh"
+#endif
+#else
+#include "loh/im_convert.loh"
+#endif
+#endif
 }
diff --git a/src/lua5/imlua_image.c b/src/lua5/imlua_image.c
index dc3322a..d823ac1 100644
--- a/src/lua5/imlua_image.c
+++ b/src/lua5/imlua_image.c
@@ -2,7 +2,7 @@
  * \brief IM Lua 5 Binding
  *
  * See Copyright Notice in im_lib.h
- * $Id: imlua_image.c,v 1.2 2009/08/12 04:09:17 scuri Exp $
+ * $Id: imlua_image.c,v 1.3 2009/08/18 02:23:33 scuri Exp $
  */
 
 #include <string.h>
@@ -1055,40 +1055,26 @@ static void createmeta (lua_State *L)
   lua_pop(L, 1);  /* removes the metatable from the top of the stack */
 }
 
-/* If all parameteres, besides the image, are nil, this is equivalent to image:Clone.
-   If any parameter is not nil, then the value is used instead of the one from the source image.
-   If a parameter is a function, then the function is called, passing the source
-   image as parameter, to obtain the substituion value. */
-static void reg_image(lua_State *L)
-{
-  const char* data = {
-"function im.ImageCreateBased(image, width, height, color_space, data_type)        \n"
-"  -- default values are those of the source image                                 \n"
-"  width       = width       or image:Width()                                      \n"
-"  height      = height      or image:Height()                                     \n"
-"  color_space = color_space or image:ColorSpace()                                 \n"
-"  data_type   = data_type   or image:DataType()                                   \n"
-"                                                                                  \n"
-"  -- callback to calculate parameters based on source image                       \n"
-"  if type(width)       == \"function\" then       width = width(image) end        \n"
-"  if type(height)      == \"function\" then      height = height(image) end       \n"
-"  if type(color_space) == \"function\" then color_space = color_space(image) end  \n"
-"  if type(data_type)   == \"function\" then   data_type = data_type(image) end    \n"
-"                                                                                  \n"
-"  -- create a new image                                                           \n"
-"  new_image = im.ImageCreate(width, height, color_space, data_type)               \n"
-"  image:CopyAttributes(new_image)                                                 \n"
-"  return new_image                                                                \n"
-"end                                                                               \n"
-  };                                                                       
-  
-  if (luaL_loadbuffer(L, data, strlen(data), "reg_image")==0) lua_pcall(L, 0, 0, 0);
-}
-
 void imlua_open_image (lua_State *L)
 {
   /* "im" table is at the top of the stack */
   createmeta(L);
   luaL_register(L, NULL, imimage_lib);
-  reg_image(L);
+#ifdef TEC_BIGENDIAN
+#ifdef TEC_64
+#include "loh/im_image_be64.loh"
+#else
+#include "loh/im_image_be32.loh"
+#endif
+#else
+#ifdef TEC_64
+#ifdef WIN64
+#include "loh/im_image_le64w.loh"
+#else
+#include "loh/im_image_le64.loh"
+#endif
+#else
+#include "loh/im_image.loh"
+#endif
+#endif
 }
diff --git a/src/lua5/loh/im_fftw.loh b/src/lua5/loh/im_fftw.loh
index 4f45bcc..9e7c78a 100644
--- a/src/lua5/loh/im_fftw.loh
+++ b/src/lua5/loh/im_fftw.loh
@@ -17,86 +17,93 @@ static const unsigned char B1[]={
 111,110,  0,  4,  3,  0,  0,  0,105,109,  0,  4,  7,  0,  0,  0, 67, 70, 76, 79,
  65, 84,  0,  4, 11,  0,  0,  0, 80,114,111, 99,101,115,115, 70, 70, 84,  0,  4,
  12,  0,  0,  0, 80,114,111, 99,101,115,115, 73, 70, 70, 84,  0,  2,  0,  0,  0,
-  0,  0,  0,  0,  7,  0,  0,  0, 20,  0,  0,  0,  0,  5,  0,  9, 17,  0,  0,  0,
+  0,  0,  0,  0,  8,  0,  0,  0, 25,  0,  0,  0,  0,  5,  0,  9, 17,  0,  0,  0,
  69,  1,  0,  0, 70,  1,128,  2,133, 65,  0,  0,192,  1,128,  2,156, 65,  0,  1,
 133,  1,  0,  0,192,  1,  0,  0,  1,130,  0,  0,213,  1,130,  3, 36,  2,  0,  0,
   0,  0,128,  0,  0,  0,  0,  1,  0,  0,128,  1,  0,  0,  0,  2,  0,  0,128,  2,
 137,  1,130,  3, 30,  0,128,  0,  3,  0,  0,  0,  4,  3,  0,  0,  0,105,109,  0,
   4,  7,  0,  0,  0, 97,115,115,101,114,116,  0,  4,  4,  0,  0,  0, 78,101,119,
-  0,  1,  0,  0,  0,  0,  0,  0,  0, 12,  0,  0,  0, 19,  0,  0,  0,  5,  1,  7,
-  8, 17,  0,  0,  0,133,  0,  0,  0,134, 64, 64,  1,192,  0,  0,  0,  4,  1,  0,
+  0,  1,  0,  0,  0,  0,  0,  0,  0, 13,  0,  0,  0, 24,  0,  0,  0,  5,  1,  7,
+  8, 23,  0,  0,  0,133,  0,  0,  0,134, 64, 64,  1,192,  0,  0,  0,  4,  1,  0,
   0, 68,  1,128,  0,132,  1,  0,  1,196,  1,128,  1,156,128,  0,  3,196,  0,  0,
   2,  0,  1,  0,  0, 64,  1,  0,  1,133,129,  0,  0,192,  1,128,  0,156,  1,  0,
-  1,220, 64,  0,  0,158,  0,  0,  1, 30,  0,128,  0,  3,  0,  0,  0,  4,  3,  0,
-  0,  0,105,109,  0,  4, 17,  0,  0,  0, 73,109, 97,103,101, 67,114,101, 97,116,
-101, 66, 97,115,101,100,  0,  4,  7,  0,  0,  0,117,110,112, 97, 99,107,  0,  0,
-  0,  0,  0, 17,  0,  0,  0, 14,  0,  0,  0, 14,  0,  0,  0, 14,  0,  0,  0, 14,
-  0,  0,  0, 14,  0,  0,  0, 14,  0,  0,  0, 14,  0,  0,  0, 14,  0,  0,  0, 17,
-  0,  0,  0, 17,  0,  0,  0, 17,  0,  0,  0, 17,  0,  0,  0, 17,  0,  0,  0, 17,
-  0,  0,  0, 17,  0,  0,  0, 18,  0,  0,  0, 19,  0,  0,  0,  3,  0,  0,  0, 10,
-  0,  0,  0,115,114, 99, 95,105,109, 97,103,101,  0,  0,  0,  0,  0, 16,  0,  0,
-  0,  4,  0,  0,  0, 97,114,103,  0,  0,  0,  0,  0, 16,  0,  0,  0, 10,  0,  0,
-  0,100,115,116, 95,105,109, 97,103,101,  0,  8,  0,  0,  0, 16,  0,  0,  0,  5,
-  0,  0,  0,  6,  0,  0,  0,119,105,100,116,104,  0,  7,  0,  0,  0,104,101,105,
-103,104,116,  0, 12,  0,  0,  0, 99,111,108,111,114, 95,115,112, 97, 99,101,  0,
- 10,  0,  0,  0,100, 97,116, 97, 95,116,121,112,101,  0,  5,  0,  0,  0,102,117,
-110, 99,  0, 17,  0,  0,  0,  8,  0,  0,  0,  8,  0,  0,  0,  9,  0,  0,  0,  9,
-  0,  0,  0,  9,  0,  0,  0, 12,  0,  0,  0, 12,  0,  0,  0, 12,  0,  0,  0, 12,
-  0,  0,  0, 19,  0,  0,  0, 19,  0,  0,  0, 19,  0,  0,  0, 19,  0,  0,  0, 19,
-  0,  0,  0, 19,  0,  0,  0, 19,  0,  0,  0, 20,  0,  0,  0,  6,  0,  0,  0,  9,
-  0,  0,  0,102,117,110, 99,110, 97,109,101,  0,  0,  0,  0,  0, 16,  0,  0,  0,
-  6,  0,  0,  0,119,105,100,116,104,  0,  0,  0,  0,  0, 16,  0,  0,  0,  7,  0,
-  0,  0,104,101,105,103,104,116,  0,  0,  0,  0,  0, 16,  0,  0,  0, 12,  0,  0,
-  0, 99,111,108,111,114, 95,115,112, 97, 99,101,  0,  0,  0,  0,  0, 16,  0,  0,
-  0, 10,  0,  0,  0,100, 97,116, 97, 95,116,121,112,101,  0,  0,  0,  0,  0, 16,
-  0,  0,  0,  5,  0,  0,  0,102,117,110, 99,  0,  2,  0,  0,  0, 16,  0,  0,  0,
-  0,  0,  0,  0,  0,  0,  0,  0, 26,  0,  0,  0, 41,  0,  0,  0,  0,  5,  0, 11,
- 22,  0,  0,  0, 69,  1,  0,  0, 70,  1,128,  2,133, 65,  0,  0,192,  1,128,  2,
-  5,130,  0,  0,  6,194, 64,  4, 65,  2,  1,  0,128,  2,  0,  0, 28,  2,128,  1,
-156, 65,  0,  0,133,  1,  0,  0,192,  1,  0,  0,  1, 66,  1,  0,213,  1,130,  3,
- 36,  2,  0,  0,  0,  0,128,  0,  0,  0,  0,  1,  0,  0,128,  1,  0,  0,  0,  2,
-  0,  0,128,  2,137,  1,130,  3, 30,  0,128,  0,  6,  0,  0,  0,  4,  3,  0,  0,
-  0,105,109,  0,  4,  7,  0,  0,  0, 97,115,115,101,114,116,  0,  4,  7,  0,  0,
-  0,115,116,114,105,110,103,  0,  4,  7,  0,  0,  0,102,111,114,109, 97,116,  0,
-  4, 24,  0,  0,  0,117,110,100,101,102,105,110,101,100, 32,102,117,110, 99,116,
-105,111,110, 32, 96, 37,115, 39,  0,  4,  4,  0,  0,  0, 78,101,119,  0,  1,  0,
-  0,  0,  0,  0,  0,  0, 33,  0,  0,  0, 40,  0,  0,  0,  5,  2,  7, 10, 18,  0,
-  0,  0,197,  0,  0,  0,198, 64,192,  1,  0,  1,  0,  0, 68,  1,  0,  0,132,  1,
-128,  0,196,  1,  0,  1,  4,  2,128,  1,220,128,  0,  3,  4,  1,  0,  2, 64,  1,
-  0,  0,128,  1,128,  0,192,  1,128,  1,  5,130,  0,  0, 64,  2,  0,  1, 28,  2,
-  0,  1, 28, 65,  0,  0,222,  0,  0,  1, 30,  0,128,  0,  3,  0,  0,  0,  4,  3,
-  0,  0,  0,105,109,  0,  4, 17,  0,  0,  0, 73,109, 97,103,101, 67,114,101, 97,
-116,101, 66, 97,115,101,100,  0,  4,  7,  0,  0,  0,117,110,112, 97, 99,107,  0,
-  0,  0,  0,  0, 18,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0,
- 35,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0,
- 38,  0,  0,  0, 38,  0,  0,  0, 38,  0,  0,  0, 38,  0,  0,  0, 38,  0,  0,  0,
- 38,  0,  0,  0, 38,  0,  0,  0, 38,  0,  0,  0, 39,  0,  0,  0, 40,  0,  0,  0,
-  4,  0,  0,  0, 11,  0,  0,  0,115,114, 99, 95,105,109, 97,103,101, 49,  0,  0,
-  0,  0,  0, 17,  0,  0,  0, 11,  0,  0,  0,115,114, 99, 95,105,109, 97,103,101,
- 50,  0,  0,  0,  0,  0, 17,  0,  0,  0,  4,  0,  0,  0, 97,114,103,  0,  0,  0,
-  0,  0, 17,  0,  0,  0, 10,  0,  0,  0,100,115,116, 95,105,109, 97,103,101,  0,
-  8,  0,  0,  0, 17,  0,  0,  0,  5,  0,  0,  0,  6,  0,  0,  0,119,105,100,116,
-104,  0,  7,  0,  0,  0,104,101,105,103,104,116,  0, 12,  0,  0,  0, 99,111,108,
-111,114, 95,115,112, 97, 99,101,  0, 10,  0,  0,  0,100, 97,116, 97, 95,116,121,
-112,101,  0,  5,  0,  0,  0,102,117,110, 99,  0, 22,  0,  0,  0, 27,  0,  0,  0,
- 27,  0,  0,  0, 30,  0,  0,  0, 30,  0,  0,  0, 30,  0,  0,  0, 30,  0,  0,  0,
- 30,  0,  0,  0, 30,  0,  0,  0, 30,  0,  0,  0, 30,  0,  0,  0, 33,  0,  0,  0,
- 33,  0,  0,  0, 33,  0,  0,  0, 33,  0,  0,  0, 40,  0,  0,  0, 40,  0,  0,  0,
+  1,220,128,  0,  0,218,  0,  0,  0, 22,192,  0,128,  0,  1,128,  1, 64,  1,  0,
+  1, 30,  1,128,  1, 22,  0,  0,128,158,  0,  0,  1, 30,  0,128,  0,  3,  0,  0,
+  0,  4,  3,  0,  0,  0,105,109,  0,  4, 17,  0,  0,  0, 73,109, 97,103,101, 67,
+114,101, 97,116,101, 66, 97,115,101,100,  0,  4,  7,  0,  0,  0,117,110,112, 97,
+ 99,107,  0,  0,  0,  0,  0, 23,  0,  0,  0, 15,  0,  0,  0, 15,  0,  0,  0, 15,
+  0,  0,  0, 15,  0,  0,  0, 15,  0,  0,  0, 15,  0,  0,  0, 15,  0,  0,  0, 15,
+  0,  0,  0, 18,  0,  0,  0, 18,  0,  0,  0, 18,  0,  0,  0, 18,  0,  0,  0, 18,
+  0,  0,  0, 18,  0,  0,  0, 18,  0,  0,  0, 19,  0,  0,  0, 19,  0,  0,  0, 20,
+  0,  0,  0, 20,  0,  0,  0, 20,  0,  0,  0, 20,  0,  0,  0, 22,  0,  0,  0, 24,
+  0,  0,  0,  4,  0,  0,  0, 10,  0,  0,  0,115,114, 99, 95,105,109, 97,103,101,
+  0,  0,  0,  0,  0, 22,  0,  0,  0,  4,  0,  0,  0, 97,114,103,  0,  0,  0,  0,
+  0, 22,  0,  0,  0, 10,  0,  0,  0,100,115,116, 95,105,109, 97,103,101,  0,  8,
+  0,  0,  0, 22,  0,  0,  0,  4,  0,  0,  0,114,101,116,  0, 15,  0,  0,  0, 22,
+  0,  0,  0,  5,  0,  0,  0,  6,  0,  0,  0,119,105,100,116,104,  0,  7,  0,  0,
+  0,104,101,105,103,104,116,  0, 12,  0,  0,  0, 99,111,108,111,114, 95,115,112,
+ 97, 99,101,  0, 10,  0,  0,  0,100, 97,116, 97, 95,116,121,112,101,  0,  5,  0,
+  0,  0,102,117,110, 99,  0, 17,  0,  0,  0,  9,  0,  0,  0,  9,  0,  0,  0, 10,
+  0,  0,  0, 10,  0,  0,  0, 10,  0,  0,  0, 13,  0,  0,  0, 13,  0,  0,  0, 13,
+  0,  0,  0, 13,  0,  0,  0, 24,  0,  0,  0, 24,  0,  0,  0, 24,  0,  0,  0, 24,
+  0,  0,  0, 24,  0,  0,  0, 24,  0,  0,  0, 24,  0,  0,  0, 25,  0,  0,  0,  6,
+  0,  0,  0,  9,  0,  0,  0,102,117,110, 99,110, 97,109,101,  0,  0,  0,  0,  0,
+ 16,  0,  0,  0,  6,  0,  0,  0,119,105,100,116,104,  0,  0,  0,  0,  0, 16,  0,
+  0,  0,  7,  0,  0,  0,104,101,105,103,104,116,  0,  0,  0,  0,  0, 16,  0,  0,
+  0, 12,  0,  0,  0, 99,111,108,111,114, 95,115,112, 97, 99,101,  0,  0,  0,  0,
+  0, 16,  0,  0,  0, 10,  0,  0,  0,100, 97,116, 97, 95,116,121,112,101,  0,  0,
+  0,  0,  0, 16,  0,  0,  0,  5,  0,  0,  0,102,117,110, 99,  0,  2,  0,  0,  0,
+ 16,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 31,  0,  0,  0, 50,  0,  0,  0,
+  0,  5,  0, 11, 22,  0,  0,  0, 69,  1,  0,  0, 70,  1,128,  2,133, 65,  0,  0,
+192,  1,128,  2,  5,130,  0,  0,  6,194, 64,  4, 65,  2,  1,  0,128,  2,  0,  0,
+ 28,  2,128,  1,156, 65,  0,  0,133,  1,  0,  0,192,  1,  0,  0,  1, 66,  1,  0,
+213,  1,130,  3, 36,  2,  0,  0,  0,  0,128,  0,  0,  0,  0,  1,  0,  0,128,  1,
+  0,  0,  0,  2,  0,  0,128,  2,137,  1,130,  3, 30,  0,128,  0,  6,  0,  0,  0,
+  4,  3,  0,  0,  0,105,109,  0,  4,  7,  0,  0,  0, 97,115,115,101,114,116,  0,
+  4,  7,  0,  0,  0,115,116,114,105,110,103,  0,  4,  7,  0,  0,  0,102,111,114,
+109, 97,116,  0,  4, 24,  0,  0,  0,117,110,100,101,102,105,110,101,100, 32,102,
+117,110, 99,116,105,111,110, 32, 96, 37,115, 39,  0,  4,  4,  0,  0,  0, 78,101,
+119,  0,  1,  0,  0,  0,  0,  0,  0,  0, 38,  0,  0,  0, 49,  0,  0,  0,  5,  2,
+  7, 10, 24,  0,  0,  0,197,  0,  0,  0,198, 64,192,  1,  0,  1,  0,  0, 68,  1,
+  0,  0,132,  1,128,  0,196,  1,  0,  1,  4,  2,128,  1,220,128,  0,  3,  4,  1,
+  0,  2, 64,  1,  0,  0,128,  1,128,  0,192,  1,128,  1,  5,130,  0,  0, 64,  2,
+  0,  1, 28,  2,  0,  1, 28,129,  0,  0, 26,  1,  0,  0, 22,192,  0,128, 64,  1,
+  0,  2,128,  1,128,  1, 94,  1,128,  1, 22,  0,  0,128,222,  0,  0,  1, 30,  0,
+128,  0,  3,  0,  0,  0,  4,  3,  0,  0,  0,105,109,  0,  4, 17,  0,  0,  0, 73,
+109, 97,103,101, 67,114,101, 97,116,101, 66, 97,115,101,100,  0,  4,  7,  0,  0,
+  0,117,110,112, 97, 99,107,  0,  0,  0,  0,  0, 24,  0,  0,  0, 40,  0,  0,  0,
  40,  0,  0,  0, 40,  0,  0,  0, 40,  0,  0,  0, 40,  0,  0,  0, 40,  0,  0,  0,
- 41,  0,  0,  0,  6,  0,  0,  0,  9,  0,  0,  0,102,117,110, 99,110, 97,109,101,
-  0,  0,  0,  0,  0, 21,  0,  0,  0,  6,  0,  0,  0,119,105,100,116,104,  0,  0,
-  0,  0,  0, 21,  0,  0,  0,  7,  0,  0,  0,104,101,105,103,104,116,  0,  0,  0,
-  0,  0, 21,  0,  0,  0, 12,  0,  0,  0, 99,111,108,111,114, 95,115,112, 97, 99,
-101,  0,  0,  0,  0,  0, 21,  0,  0,  0, 10,  0,  0,  0,100, 97,116, 97, 95,116,
-121,112,101,  0,  0,  0,  0,  0, 21,  0,  0,  0,  5,  0,  0,  0,102,117,110, 99,
-  0,  2,  0,  0,  0, 21,  0,  0,  0,  0,  0,  0,  0, 18,  0,  0,  0, 20,  0,  0,
-  0, 41,  0,  0,  0, 45,  0,  0,  0, 45,  0,  0,  0, 45,  0,  0,  0, 46,  0,  0,
-  0, 46,  0,  0,  0, 46,  0,  0,  0, 46,  0,  0,  0, 46,  0,  0,  0, 46,  0,  0,
-  0, 47,  0,  0,  0, 47,  0,  0,  0, 47,  0,  0,  0, 48,  0,  0,  0, 48,  0,  0,
-  0, 48,  0,  0,  0, 48,  0,  0,  0,  2,  0,  0,  0, 17,  0,  0,  0, 79,110,101,
- 83,111,117,114, 99,101, 79,110,101, 68,101,115,116,  0,  1,  0,  0,  0, 17,  0,
-  0,  0, 18,  0,  0,  0, 84,119,111, 83,111,117,114, 99,101,115, 79,110,101, 68,
-101,115,116,  0,  2,  0,  0,  0, 17,  0,  0,  0,  0,  0,  0,  0,
+ 40,  0,  0,  0, 40,  0,  0,  0, 43,  0,  0,  0, 43,  0,  0,  0, 43,  0,  0,  0,
+ 43,  0,  0,  0, 43,  0,  0,  0, 43,  0,  0,  0, 43,  0,  0,  0, 43,  0,  0,  0,
+ 44,  0,  0,  0, 44,  0,  0,  0, 45,  0,  0,  0, 45,  0,  0,  0, 45,  0,  0,  0,
+ 45,  0,  0,  0, 47,  0,  0,  0, 49,  0,  0,  0,  5,  0,  0,  0, 11,  0,  0,  0,
+115,114, 99, 95,105,109, 97,103,101, 49,  0,  0,  0,  0,  0, 23,  0,  0,  0, 11,
+  0,  0,  0,115,114, 99, 95,105,109, 97,103,101, 50,  0,  0,  0,  0,  0, 23,  0,
+  0,  0,  4,  0,  0,  0, 97,114,103,  0,  0,  0,  0,  0, 23,  0,  0,  0, 10,  0,
+  0,  0,100,115,116, 95,105,109, 97,103,101,  0,  8,  0,  0,  0, 23,  0,  0,  0,
+  4,  0,  0,  0,114,101,116,  0, 16,  0,  0,  0, 23,  0,  0,  0,  5,  0,  0,  0,
+  6,  0,  0,  0,119,105,100,116,104,  0,  7,  0,  0,  0,104,101,105,103,104,116,
+  0, 12,  0,  0,  0, 99,111,108,111,114, 95,115,112, 97, 99,101,  0, 10,  0,  0,
+  0,100, 97,116, 97, 95,116,121,112,101,  0,  5,  0,  0,  0,102,117,110, 99,  0,
+ 22,  0,  0,  0, 32,  0,  0,  0, 32,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0,
+ 35,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0, 35,  0,  0,  0,
+ 35,  0,  0,  0, 38,  0,  0,  0, 38,  0,  0,  0, 38,  0,  0,  0, 38,  0,  0,  0,
+ 49,  0,  0,  0, 49,  0,  0,  0, 49,  0,  0,  0, 49,  0,  0,  0, 49,  0,  0,  0,
+ 49,  0,  0,  0, 49,  0,  0,  0, 50,  0,  0,  0,  6,  0,  0,  0,  9,  0,  0,  0,
+102,117,110, 99,110, 97,109,101,  0,  0,  0,  0,  0, 21,  0,  0,  0,  6,  0,  0,
+  0,119,105,100,116,104,  0,  0,  0,  0,  0, 21,  0,  0,  0,  7,  0,  0,  0,104,
+101,105,103,104,116,  0,  0,  0,  0,  0, 21,  0,  0,  0, 12,  0,  0,  0, 99,111,
+108,111,114, 95,115,112, 97, 99,101,  0,  0,  0,  0,  0, 21,  0,  0,  0, 10,  0,
+  0,  0,100, 97,116, 97, 95,116,121,112,101,  0,  0,  0,  0,  0, 21,  0,  0,  0,
+  5,  0,  0,  0,102,117,110, 99,  0,  2,  0,  0,  0, 21,  0,  0,  0,  0,  0,  0,
+  0, 18,  0,  0,  0, 25,  0,  0,  0, 50,  0,  0,  0, 54,  0,  0,  0, 54,  0,  0,
+  0, 54,  0,  0,  0, 55,  0,  0,  0, 55,  0,  0,  0, 55,  0,  0,  0, 55,  0,  0,
+  0, 55,  0,  0,  0, 55,  0,  0,  0, 56,  0,  0,  0, 56,  0,  0,  0, 56,  0,  0,
+  0, 57,  0,  0,  0, 57,  0,  0,  0, 57,  0,  0,  0, 57,  0,  0,  0,  2,  0,  0,
+  0, 17,  0,  0,  0, 79,110,101, 83,111,117,114, 99,101, 79,110,101, 68,101,115,
+116,  0,  1,  0,  0,  0, 17,  0,  0,  0, 18,  0,  0,  0, 84,119,111, 83,111,117,
+114, 99,101,115, 79,110,101, 68,101,115,116,  0,  2,  0,  0,  0, 17,  0,  0,  0,
+  0,  0,  0,  0,
 };
 
  if (luaL_loadbuffer(L,(const char*)B1,sizeof(B1),"../obj/imlua_fftw51/im_fftw.lo")==0) lua_call(L, 0, 0);