Index: trunk/Ohana/src/opihi/cmd.astro/imfit-tgauss.c
===================================================================
--- trunk/Ohana/src/opihi/cmd.astro/imfit-tgauss.c	(revision 3144)
+++ trunk/Ohana/src/opihi/cmd.astro/imfit-tgauss.c	(revision 20936)
@@ -1,5 +1,5 @@
 # include "imfit.h"
 
-float tgaussTD (float, float, float *, int, float *);
+opihi_flt tgaussTD (opihi_flt, opihi_flt, opihi_flt *, int, opihi_flt *);
 void  tgaussCL ();
 
@@ -31,8 +31,8 @@
 
 /* two components: (1 + z_1^M + z_2^N)^(-1) -- x, y, sx1, sy1, sxy1, I, sky, sx2, sy2, sxy2 */
-float tgaussTD (float x, float y, float *par, int Npar, float *dpar) {
+opihi_flt tgaussTD (opihi_flt x, opihi_flt y, opihi_flt *par, int Npar, opihi_flt *dpar) {
 
-  float X, Y, px1, py1, px2, py2;
-  float z1, z2, r, q1, q2, f;
+  opihi_flt X, Y, px1, py1, px2, py2;
+  opihi_flt z1, z2, r, q1, q2, f;
 
   X = x - par[0];