Index: trunk/Ohana/src/opihi/cmd.astro/imfit-serbulge.c
===================================================================
--- trunk/Ohana/src/opihi/cmd.astro/imfit-serbulge.c	(revision 3144)
+++ trunk/Ohana/src/opihi/cmd.astro/imfit-serbulge.c	(revision 20936)
@@ -1,5 +1,5 @@
 # include "imfit.h"
 
-float serbulgeTD (float, float, float *, int, float *);
+opihi_flt serbulgeTD (opihi_flt, opihi_flt, opihi_flt *, int, opihi_flt *);
 void  serbulgeCL ();
 
@@ -14,8 +14,8 @@
 
   /* allocate free and fixed parameters */
-  ALLOCATE (par, float, MAX (Npar, 1));
-  bzero (par, Npar*sizeof(float));
-  ALLOCATE (fpar, float, MAX (Nfpar, 1));
-  bzero (fpar, Nfpar*sizeof(float));
+  ALLOCATE (par, opihi_flt, MAX (Npar, 1));
+  bzero (par, Npar*sizeof(opihi_flt));
+  ALLOCATE (fpar, opihi_flt, MAX (Nfpar, 1));
+  bzero (fpar, Nfpar*sizeof(opihi_flt));
 
   par[0] = get_variable_default ("Xg", 0);
@@ -41,8 +41,8 @@
 /* sersic galaxy model w/ bulge: -- x, y, (sx, sy, sxy)_1, I_1, sky, (sx, sy, sxy)_2, I_2, n */
 /* exp (-b (r/r_e)^(1/n)) + pgauss (r) */
-float serbulgeTD (float x, float y, float *par, int Npar, float *dpar) {
+opihi_flt serbulgeTD (opihi_flt x, opihi_flt y, opihi_flt *par, int Npar, opihi_flt *dpar) {
 
-  float X, Y, px1, px2, py1, py2;
-  float z1, z2, r1, r2, t, q1, q2, f;
+  opihi_flt X, Y, px1, px2, py1, py2;
+  opihi_flt z1, z2, r1, r2, t, q1, q2, f;
 
   X = x - par[0];