diff -ur c08.00/source/cont_gammas.cpp c08.00.fmterr/source/cont_gammas.cpp

--- c08.00/source/cont_gammas.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/cont_gammas.cpp	2014-01-22 19:39:48.299357386 +0100

@@ -275,13 +275,13 @@

 	}

 	fprintf( ioFILE, " GammaPrt %.2f from ",fnzone);

-	fprintf( ioFILE,PrintEfmt("%9.2e",rfield.anu[ipLoEnr-1]));

+	fprintf( ioFILE,"%s", PrintEfmt("%9.2e",rfield.anu[ipLoEnr-1]));

 	fprintf( ioFILE, " to ");

-	fprintf( ioFILE,PrintEfmt("%9.2e",rfield.anu[ipHiEnr-1]));

+	fprintf( ioFILE,"%s", PrintEfmt("%9.2e",rfield.anu[ipHiEnr-1]));

 	fprintf( ioFILE, "R rates >");

-	fprintf( ioFILE,PrintEfmt("%9.2e",threshold));

+	fprintf( ioFILE,"%s", PrintEfmt("%9.2e",threshold));

 	fprintf( ioFILE, " of total=");

-	fprintf( ioFILE,PrintEfmt("%9.2e",total));

+	fprintf( ioFILE,"%s", PrintEfmt("%9.2e",total));

 	fprintf( ioFILE, " (frac inc, otslin, otscon, ConInterOut, outlin ConOTS_local_OTS_rate ) chL, C\n");

 	if( threshold <= 0. || total <= 0. )

@@ -304,8 +304,8 @@

 		/* this really is array index on C scale */

 		fprintf( ioFILE, "[%5ld]" , i );

-		fprintf( ioFILE, PrintEfmt("%9.2e",rfield.anu[i]));

-		fprintf( ioFILE, PrintEfmt("%9.2e",phisig/total));

+		fprintf( ioFILE, "%s", PrintEfmt("%9.2e",rfield.anu[i]));

+		fprintf( ioFILE, "%s", PrintEfmt("%9.2e",phisig/total));

 		fprintf( ioFILE, "%5.2f%5.2f%5.2f%5.2f%5.2f%5.2f %4.4s %4.4s %.2e \n", 

 		  rfield.flux[i]/SDIV(flxcor), 

 		  rfield.otslin[i]/SDIV(flxcor), 

@@ -329,8 +329,8 @@

 			  rfield.outlin[i] + rfield.outlin_noplot[i] +rfield.ConInterOut[i]*rfield.lgOutOnly;

 			fprintf( ioFILE, "%5ld", i );

-			fprintf(ioFILE,PrintEfmt("%9.2e",rfield.anu[i]));

-			fprintf(ioFILE,PrintEfmt("%9.2e",phisig/total));

+			fprintf(ioFILE,"%s", PrintEfmt("%9.2e",rfield.anu[i]));

+			fprintf(ioFILE,"%s", PrintEfmt("%9.2e",phisig/total));

 			fprintf( ioFILE, "%5.2f%5.2f%5.2f%5.2f%5.2f%5.2f %4.4s %4.4s %.2e \n", 

 			  rfield.flux[i]/SDIV(flxcor), 

 			  rfield.otslin[i]/SDIV(flxcor), 

Sólo en c08.00.fmterr/source: dum

diff -ur c08.00/source/hydrolevel.cpp c08.00.fmterr/source/hydrolevel.cpp

--- c08.00/source/hydrolevel.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/hydrolevel.cpp	2014-01-22 19:40:19.994634031 +0100

@@ -106,7 +106,7 @@

 		fprintf( ioQQQ, " A*esc" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Aul*

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Aul*

 				Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pesc ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -115,7 +115,7 @@

 		fprintf( ioQQQ, " A*ees" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Aul*

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Aul*

 				Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pelec_esc ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -124,7 +124,7 @@

 		fprintf( ioQQQ, " tauin" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->TauIn ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->TauIn ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -132,7 +132,7 @@

 		fprintf( ioQQQ, " t tot" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->TauTot ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->TauTot ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -140,7 +140,7 @@

 		fprintf( ioQQQ, " Esc  " );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pesc ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pesc ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -148,7 +148,7 @@

 		fprintf( ioQQQ, " Eesc " );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pelec_esc ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pelec_esc ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -156,7 +156,7 @@

 		fprintf( ioQQQ, " Dest " );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pdest) );

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pdest) );

 		}

 		fprintf( ioQQQ, "\n" );

@@ -164,7 +164,7 @@

 		fprintf( ioQQQ, " A*dst" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Aul*

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Aul*

 				Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->Pdest ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -173,7 +173,7 @@

 		fprintf( ioQQQ, " StrkE" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e",  iso.pestrk[ipH_LIKE][nelem][ipLo][ipHi] ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",  iso.pestrk[ipH_LIKE][nelem][ipLo][ipHi] ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -181,7 +181,7 @@

 		fprintf( ioQQQ, " B(ul)" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->pump*

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->pump*

 				StatesElem[ipH_LIKE][nelem][ipLo].g/StatesElem[ipH_LIKE][nelem][ipHi].g ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -190,7 +190,7 @@

 		fprintf( ioQQQ, " tcont" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->TauCon ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",  Transitions[ipH_LIKE][nelem][ipHi][ipLo].Emis->TauCon ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -198,7 +198,7 @@

 		fprintf( ioQQQ, " C(ul)" );

 		for( ipLo=ipH1s; ipLo < ipHi; ipLo++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%9.2e", 

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", 

 				Transitions[ipH_LIKE][nelem][ipHi][ipLo].Coll.ColUL*dense.eden ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -206,7 +206,7 @@

 		if( ipHi == 2 )

 		{

 			fprintf( ioQQQ, "    FeIIo");

-			fprintf( ioQQQ,PrintEfmt("%9.2e", 

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", 

 				hydro.dstfe2lya* Transitions[ipH_LIKE][ipHYDROGEN][ipH2p][ipH1s].Emis->Aul ));

 			fprintf( ioQQQ, "\n");

 		}

@@ -267,7 +267,7 @@

 		/* 06 aug 28, from numLevels_max to _local. */

 		for( i=ipH2s; i < iso.numLevels_local[ipISO][nelem]; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e", iso.gamnc[ipISO][nelem][i] ));

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", iso.gamnc[ipISO][nelem][i] ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -275,17 +275,17 @@

 		/* 06 aug 28, from numLevels_max to _local. */

 		for( i=1; i < iso.numLevels_local[ipISO][nelem]; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e", iso.RateCont2Level[ipISO][nelem][i]/dense.eden ));

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", iso.RateCont2Level[ipISO][nelem][i]/dense.eden ));

 		}

 		fprintf( ioQQQ," tot");

-		fprintf( ioQQQ,PrintEfmt("%10.2e", ionbal.RateRecomTot[nelem][nelem-ipISO]/dense.eden ) );

+		fprintf( ioQQQ,"%s", PrintEfmt("%10.2e", ionbal.RateRecomTot[nelem][nelem-ipISO]/dense.eden ) );

 		fprintf( ioQQQ, "\n" );

 		fprintf( ioQQQ, "       HLEV IND Rc" );

 		/* 06 aug 28, from numLevels_max to _local. */

 		for( i=ipH1s; i < iso.numLevels_local[ipISO][nelem]; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e", iso.RecomInducRate[ipISO][nelem][i]*iso.PopLTE[ipISO][nelem][i] ));

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", iso.RecomInducRate[ipISO][nelem][i]*iso.PopLTE[ipISO][nelem][i] ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -294,7 +294,7 @@

 		/* 06 aug 28, from numLevels_max to _local. */

 		for( i=ipH1s; i < iso.numLevels_local[ipISO][nelem]; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e",

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",

 				iso.gamnc[ipISO][nelem][i]*iso.PopLTE[ipISO][nelem][i] ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -304,7 +304,7 @@

 		/* 06 aug 28, from numLevels_max to _local. */

 		for( i=ipH1s; i < iso.numLevels_local[ipISO][nelem]; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e", iso.PopLTE[ipISO][nelem][i] ));

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", iso.PopLTE[ipISO][nelem][i] ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -313,7 +313,7 @@

 		/* 06 aug 28, from numLevels_max to _local. */

 		for( i=ipH1s; i < iso.numLevels_local[ipISO][nelem]; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e", 

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", 

 				iso.ColIoniz[ipISO][nelem][i]*

 			  StatesElem[ipISO][nelem][i].Pop*collider/MAX2(1e-30,iso.RateLevel2Cont[ipISO][nelem][i]) ) );

 		}

@@ -326,7 +326,7 @@

 			/* 06 aug 28, from numLevels_max to _local. */

 			for( i=ipH1s; i < iso.numLevels_local[ipISO][nelem]; i++ )

 			{

-				fprintf(ioQQQ,PrintEfmt("%9.2e", 

+				fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", 

 					iso.gamnc[ipISO][nelem][i]*StatesElem[ipISO][ipHYDROGEN][i].Pop/MAX2(1e-30,iso.RateLevel2Cont[ipISO][nelem][i]) ) );

 			}

 			fprintf( ioQQQ, "\n" );

@@ -336,7 +336,7 @@

 		/* 06 aug 28, from numLevels_max to _local. */

 		for( i=ipH1s; i < iso.numLevels_local[ipISO][nelem]; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e", StatesElem[ipISO][nelem][i].Pop ));

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", StatesElem[ipISO][nelem][i].Pop ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -344,14 +344,14 @@

 		/* 06 aug 28, from numLevels_max to _local. */

 		for( i=ipH1s; i < iso.numLevels_local[ipISO][nelem]; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e", iso.DepartCoef[ipISO][nelem][i] ));

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", iso.DepartCoef[ipISO][nelem][i] ));

 		}

 		fprintf( ioQQQ, "\n" );

 		fprintf( ioQQQ, "       HLEV   X12tot");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", secondaries.x12tot ));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", secondaries.x12tot ));

 		fprintf( ioQQQ," Grn dest:");

-		fprintf(ioQQQ,PrintEfmt("%9.2e",

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",

 		  ionbal.RateIonizTot[nelem][nelem] ));

 		fprintf(ioQQQ, "\n"); 

 	}

diff -ur c08.00/source/iso_collide.cpp c08.00.fmterr/source/iso_collide.cpp

--- c08.00/source/iso_collide.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/iso_collide.cpp	2014-01-22 19:40:47.450873353 +0100

@@ -395,7 +395,7 @@

 				fprintf( ioQQQ, " %li\t", ipHi );

 				for( ipLo=0; ipLo < ipHi; ipLo++ )

 				{

-					fprintf( ioQQQ,PrintEfmt("%10.3e", Transitions[ipISO][nelem][ipHi][ipLo].Coll.ColUL ));

+					fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", Transitions[ipISO][nelem][ipHi][ipLo].Coll.ColUL ));

 				}

 				fprintf( ioQQQ, "\n" );

 			}

@@ -403,21 +403,21 @@

 			fprintf( ioQQQ, "     iso_collide: %s Z=%li collisional ionization coefficients\n", iso.chISO[ipISO], nelem + 1 );

 			for( ipHi=0; ipHi < iso.numLevels_max[ipISO][nelem]; ipHi++ )

 			{

-				fprintf( ioQQQ,PrintEfmt("%10.3e",  iso.ColIoniz[ipISO][nelem][ipHi] ));

+				fprintf( ioQQQ,"%s", PrintEfmt("%10.3e",  iso.ColIoniz[ipISO][nelem][ipHi] ));

 			}

 			fprintf( ioQQQ, "\n" );

 			fprintf( ioQQQ, "     iso_collide: %s Z=%li continuum boltzmann factor\n", iso.chISO[ipISO], nelem + 1 );

 			for( ipHi=0; ipHi < iso.numLevels_max[ipISO][nelem]; ipHi++ )

 			{

-				fprintf( ioQQQ,PrintEfmt("%10.3e",  StatesElem[ipISO][nelem][ipHi].ConBoltz ));

+				fprintf( ioQQQ,"%s", PrintEfmt("%10.3e",  StatesElem[ipISO][nelem][ipHi].ConBoltz ));

 			}

 			fprintf( ioQQQ, "\n" );

 			fprintf( ioQQQ, "     iso_collide: %s Z=%li continuum boltzmann factor\n", iso.chISO[ipISO], nelem + 1 );

 			for( ipHi=0; ipHi < iso.numLevels_max[ipISO][nelem]; ipHi++ )

 			{

-				fprintf( ioQQQ,PrintEfmt("%10.3e",  iso.PopLTE[ipISO][nelem][ipHi] ));

+				fprintf( ioQQQ,"%s", PrintEfmt("%10.3e",  iso.PopLTE[ipISO][nelem][ipHi] ));

 			}

 			fprintf( ioQQQ, "\n" );

 		}

diff -ur c08.00/source/iso_level.cpp c08.00.fmterr/source/iso_level.cpp

--- c08.00/source/iso_level.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/iso_level.cpp	2014-01-22 19:41:21.675171276 +0100

@@ -602,7 +602,7 @@

 		fprintf( ioQQQ, " level pop are:\n" );

 		for( i=0; i < numlevels_local; i++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%8.1e", StatesElem[ipISO][nelem][i].Pop ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%8.1e", StatesElem[ipISO][nelem][i].Pop ));

 			if( (i!=0) && !(i%10) ) fprintf( ioQQQ,"\n" );

 		}

 		fprintf( ioQQQ, "\n" );

diff -ur c08.00/source/iso_photo.cpp c08.00.fmterr/source/iso_photo.cpp

--- c08.00/source/iso_photo.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/iso_photo.cpp	2014-01-22 19:41:14.699110583 +0100

@@ -171,11 +171,11 @@

 	if( trace.lgTrace )

 	{

 		fprintf( ioQQQ, "     iso_photo, ipISO%2ld nelem%2ld low, hi=",ipISO,nelem);

-		fprintf( ioQQQ,PrintEfmt("%9.2e", iso.gamnc[ipISO][nelem][ipH1s]));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", iso.gamnc[ipISO][nelem][ipH1s]));

 		ASSERT(nelem>=ipISO);

-		fprintf( ioQQQ,PrintEfmt("%9.2e", ionbal.CompRecoilIonRate[nelem][nelem-ipISO]));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", ionbal.CompRecoilIonRate[nelem][nelem-ipISO]));

 		fprintf( ioQQQ, " total=");

-		fprintf( ioQQQ,PrintEfmt("%9.2e",iso.gamnc[ipISO][nelem][ipH1s] ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",iso.gamnc[ipISO][nelem][ipH1s] ));

 		fprintf( ioQQQ, "\n");

 	}

 	return;

diff -ur c08.00/source/iso_radiative_recomb.cpp c08.00.fmterr/source/iso_radiative_recomb.cpp

--- c08.00/source/iso_radiative_recomb.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/iso_radiative_recomb.cpp	2014-01-22 19:41:40.667336424 +0100

@@ -347,7 +347,7 @@

 		fprintf( ioQQQ, "       iso_radiative_recomb recomb effic" );

 		for( ipLevel=0; ipLevel < iso.numLevels_local[ipISO][nelem]; ipLevel++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%10.3e", iso.RadRecomb[ipISO][nelem][ipLevel][ipRecEsc] ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", iso.RadRecomb[ipISO][nelem][ipLevel][ipRecEsc] ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -355,7 +355,7 @@

 		fprintf( ioQQQ, "       iso_radiative_recomb recomb net effic" );

 		for( ipLevel=0; ipLevel < iso.numLevels_local[ipISO][nelem]; ipLevel++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%10.3e", iso.RadRecomb[ipISO][nelem][ipLevel][ipRecNetEsc]) );

+			fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", iso.RadRecomb[ipISO][nelem][ipLevel][ipRecNetEsc]) );

 		}

 		fprintf( ioQQQ, "\n" );

@@ -363,7 +363,7 @@

 		fprintf( ioQQQ, "       iso_radiative_recomb in optic dep" );

 		for( ipLevel=0; ipLevel < iso.numLevels_local[ipISO][nelem]; ipLevel++ )

 		{	

-			fprintf( ioQQQ,PrintEfmt("%10.3e",  opac.TauAbsGeo[0][iso.ipIsoLevNIonCon[ipISO][nelem][ipLevel]-1] ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%10.3e",  opac.TauAbsGeo[0][iso.ipIsoLevNIonCon[ipISO][nelem][ipLevel]-1] ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -371,7 +371,7 @@

 		fprintf( ioQQQ, "       iso_radiative_recomb out op depth" );

 		for( ipLevel=0; ipLevel < iso.numLevels_local[ipISO][nelem]; ipLevel++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%10.3e",  opac.TauAbsGeo[1][iso.ipIsoLevNIonCon[ipISO][nelem][ipLevel]-1] ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%10.3e",  opac.TauAbsGeo[1][iso.ipIsoLevNIonCon[ipISO][nelem][ipLevel]-1] ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -379,7 +379,7 @@

 		fprintf( ioQQQ, "       iso_radiative_recomb rad rec coef " );

 		for( ipLevel=0; ipLevel < iso.numLevels_local[ipISO][nelem]; ipLevel++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%10.3e", iso.RadRecomb[ipISO][nelem][ipLevel][ipRecRad]) );

+			fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", iso.RadRecomb[ipISO][nelem][ipLevel][ipRecRad]) );

 		}

 		fprintf( ioQQQ, "\n" );

 	}

@@ -387,12 +387,12 @@

 	if( trace.lgTrace )

 	{

 		fprintf( ioQQQ, "     iso_radiative_recomb total rec coef" );

-		fprintf( ioQQQ,PrintEfmt("%10.3e", iso.RadRec_effec[ipISO][nelem] ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", iso.RadRec_effec[ipISO][nelem] ));

 		fprintf( ioQQQ, " case A=" );

-		fprintf( ioQQQ,PrintEfmt("%10.3e", 

+		fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", 

 			iso.RadRec_caseB[ipISO][nelem] + iso.RadRecomb[ipISO][nelem][ipH1s][ipRecRad] ) );

 		fprintf( ioQQQ, " case B=");

-		fprintf( ioQQQ,PrintEfmt("%10.3e", iso.RadRec_caseB[ipISO][nelem] ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", iso.RadRec_caseB[ipISO][nelem] ));

 		fprintf( ioQQQ, "\n" );

 	}

@@ -430,7 +430,7 @@

 		/* this prints Z on physical, not C, scale */

 		fprintf( punch.ioRecom, "%s %s %2li ", 

 			iso.chISO[ipISO], elementnames.chElementSym[nelem], nelem+1 );

-		fprintf( punch.ioRecom,PrintEfmt("%9.2e", iso.RadRec_caseB[ipISO][nelem] ));

+		fprintf( punch.ioRecom,"%s", PrintEfmt("%9.2e", iso.RadRec_caseB[ipISO][nelem] ));

 		fprintf( punch.ioRecom, "\n" );

 	}

Sólo en c08.00.fmterr/source: Makefile.dep

diff -ur c08.00/source/mean.cpp c08.00.fmterr/source/mean.cpp

--- c08.00/source/mean.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/mean.cpp	2014-01-22 19:41:55.419464618 +0100

@@ -686,7 +686,7 @@

 		{

 			/*fprintf( ioQQQ, "%11.3e", raver[i] );*/

 			fprintf( ioQQQ, " ");

-			fprintf(ioQQQ,PrintEfmt("%9.2e", raver[i] ) );

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", raver[i] ) );

 		}

 		fprintf( ioQQQ, "\n" );

@@ -698,7 +698,7 @@

 			{

 				/*fprintf( ioQQQ, "%11.3e", vaver[i] );*/

 				fprintf( ioQQQ, " ");

-				fprintf(ioQQQ,PrintEfmt("%9.2e", vaver[i] ) );

+				fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", vaver[i] ) );

 			}

 			fprintf( ioQQQ, "\n" );

 		}

diff -ur c08.00/source/mole_h2_io.cpp c08.00.fmterr/source/mole_h2_io.cpp

--- c08.00/source/mole_h2_io.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/mole_h2_io.cpp	2014-01-22 19:42:17.388655396 +0100

@@ -426,24 +426,24 @@

 	DEBUG_ENTRY( "H2_Prt_Zone()" );

 	fprintf( ioQQQ, " H2 density   ");

-	fprintf(ioQQQ,PrintEfmt("%9.2e", hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", hmi.H2_total));

 	fprintf( ioQQQ, " orth/par");

-	fprintf(ioQQQ,PrintEfmt("%9.2e", h2.ortho_density / SDIV( h2.para_density )));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", h2.ortho_density / SDIV( h2.para_density )));

 	iElecHi = 0;

 	iVibHi = 0;

 	fprintf( ioQQQ, " v0 J=0,3");

-	fprintf(ioQQQ,PrintEfmt("%9.2e", H2_populations[iElecHi][iVibHi][0] / hmi.H2_total));

-	fprintf(ioQQQ,PrintEfmt("%9.2e", H2_populations[iElecHi][iVibHi][1] / hmi.H2_total));

-	fprintf(ioQQQ,PrintEfmt("%9.2e", H2_populations[iElecHi][iVibHi][2] / hmi.H2_total));

-	fprintf(ioQQQ,PrintEfmt("%9.2e", H2_populations[iElecHi][iVibHi][3] / hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", H2_populations[iElecHi][iVibHi][0] / hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", H2_populations[iElecHi][iVibHi][1] / hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", H2_populations[iElecHi][iVibHi][2] / hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", H2_populations[iElecHi][iVibHi][3] / hmi.H2_total));

 	fprintf( ioQQQ, " TOTv=0,3");

-	fprintf(ioQQQ,PrintEfmt("%9.2e", pops_per_vib[iElecHi][0] / hmi.H2_total));

-	fprintf(ioQQQ,PrintEfmt("%9.2e", pops_per_vib[iElecHi][1] / hmi.H2_total));

-	fprintf(ioQQQ,PrintEfmt("%9.2e", pops_per_vib[iElecHi][2] / hmi.H2_total));

-	fprintf(ioQQQ,PrintEfmt("%9.2e", pops_per_vib[iElecHi][3] / hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", pops_per_vib[iElecHi][0] / hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", pops_per_vib[iElecHi][1] / hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", pops_per_vib[iElecHi][2] / hmi.H2_total));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", pops_per_vib[iElecHi][3] / hmi.H2_total));

 	fprintf( ioQQQ, "\n");

 	return;

 }

@@ -481,10 +481,10 @@

 #	if 0

 	fprintf( ioMEAN, "    v=0,3");

-	fprintf(ioMEAN,PrintEfmt("%9.2e", pops_per_vib[iElecHi][0] / hmi.H2_total));

-	fprintf(ioMEAN,PrintEfmt("%9.2e", pops_per_vib[iElecHi][1] / hmi.H2_total));

-	fprintf(ioMEAN,PrintEfmt("%9.2e", pops_per_vib[iElecHi][2] / hmi.H2_total));

-	fprintf(ioMEAN,PrintEfmt("%9.2e", pops_per_vib[iElecHi][3] / hmi.H2_total));

+	fprintf(ioMEAN,"%s", PrintEfmt("%9.2e", pops_per_vib[iElecHi][0] / hmi.H2_total));

+	fprintf(ioMEAN,"%s", PrintEfmt("%9.2e", pops_per_vib[iElecHi][1] / hmi.H2_total));

+	fprintf(ioMEAN,"%s", PrintEfmt("%9.2e", pops_per_vib[iElecHi][2] / hmi.H2_total));

+	fprintf(ioMEAN,"%s", PrintEfmt("%9.2e", pops_per_vib[iElecHi][3] / hmi.H2_total));

 	fprintf( ioMEAN, "\n");

 #	endif

 	return;

diff -ur c08.00/source/parse_set.cpp c08.00.fmterr/source/parse_set.cpp

--- c08.00/source/parse_set.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/parse_set.cpp	2014-01-22 19:56:52.404993054 +0100

@@ -1663,7 +1663,7 @@

 			else 

 			{

 				/* usual case, simply copy what is in quotes */

-				sprintf(punch.chHashString , chString_quotes_lowercase );

+				sprintf(punch.chHashString , "%s", chString_quotes_lowercase );

 			}

 		}

diff -ur c08.00/source/prt_alltau.cpp c08.00.fmterr/source/prt_alltau.cpp

--- c08.00/source/prt_alltau.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/prt_alltau.cpp	2014-01-22 19:42:36.107817830 +0100

@@ -47,15 +47,15 @@

 	/* R(1300) is Rayleigh scattering */

 	fprintf( ioQQQ, "\n Contin Optical Depths: COMP:");

-	fprintf( ioQQQ,PrintEfmt("%9.2e", opac.telec));

+	fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", opac.telec));

 	fprintf( ioQQQ, "    H-:");

-	fprintf( ioQQQ,PrintEfmt("%9.2e",opac.thmin ));

+	fprintf( ioQQQ,"%s", PrintEfmt("%9.2e",opac.thmin ));

 	fprintf( ioQQQ, " R(1300):");

-	fprintf( ioQQQ,PrintEfmt("%9.2e", colden.colden[ipCOL_H0]*6.71e-24));

+	fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", colden.colden[ipCOL_H0]*6.71e-24));

 	fprintf( ioQQQ, "  H2+:");

-	fprintf( ioQQQ,PrintEfmt("%9.2e", colden.colden[ipCOL_H2p]*7e-18));

+	fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", colden.colden[ipCOL_H2p]*7e-18));

 	fprintf( ioQQQ, "  Pfa:");

 	/* 06 aug 28, from numLevels_max to _local. */

@@ -74,7 +74,7 @@

 	/* 06 aug 28, from numLevels_max to _local. */

 	if( iso.numLevels_local[ipH_LIKE][ipHYDROGEN] > ipH4p )

 	{

-		fprintf( ioQQQ,PrintEfmt("%9.2e", opac.TauTotalGeo[0][Transitions[ipH_LIKE][ipHYDROGEN][ipH4p][ipH3s].ipCont-1]/fcon));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", opac.TauTotalGeo[0][Transitions[ipH_LIKE][ipHYDROGEN][ipH4p][ipH3s].ipCont-1]/fcon));

 	}

 	else

 	{

@@ -85,7 +85,7 @@

 	/* 06 aug 28, from numLevels_max to _local. */

 	if( iso.numLevels_local[ipH_LIKE][ipHYDROGEN] > 3 )

 	{

-		fprintf( ioQQQ,PrintEfmt("%9.2e", opac.TauTotalGeo[0][Transitions[ipH_LIKE][ipHYDROGEN][ipH3p][ipH2s].ipCont-1]/fcon));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", opac.TauTotalGeo[0][Transitions[ipH_LIKE][ipHYDROGEN][ipH3p][ipH2s].ipCont-1]/fcon));

 	}

 	else

 	{

@@ -96,7 +96,7 @@

 	/* 06 aug 28, from numLevels_max to _local. */

 	if( iso.numLevels_local[ipH_LIKE][ipHYDROGEN] > 4 )

 	{

-		fprintf( ioQQQ,PrintEfmt("%9.2e", opac.TauTotalGeo[0][Transitions[ipH_LIKE][ipHYDROGEN][ipH4p][ipH2s].ipCont-1]/fcon));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", opac.TauTotalGeo[0][Transitions[ipH_LIKE][ipHYDROGEN][ipH4p][ipH2s].ipCont-1]/fcon));

 	}

 	else

 	{

@@ -104,7 +104,7 @@

 	}

 	fprintf( ioQQQ, "   La:");

-	fprintf( ioQQQ,PrintEfmt("%9.2e", opac.TauTotalGeo[0][Transitions[ipH_LIKE][ipHYDROGEN][ipH2p][ipH1s].ipCont-1]/fcon));

+	fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", opac.TauTotalGeo[0][Transitions[ipH_LIKE][ipHYDROGEN][ipH2p][ipH1s].ipCont-1]/fcon));

 	fprintf( ioQQQ, "     1r:");

 	PrintE93( ioQQQ , opac.TauTotalGeo[0][iso.ipIsoLevNIonCon[ipH_LIKE][ipHYDROGEN][ipH1s]-1]/fcon);

@@ -144,7 +144,7 @@

 					/* this, combined with "continue" above, ensures that we print

 					 * 1 (1s), 2(tot 2), then 3 */

 					fprintf( ioQQQ , "%6ld",MAX2(1,n));

-					fprintf( ioQQQ,PrintEfmt("%9.2e", opac.TauAbsGeo[i][iso.ipIsoLevNIonCon[ipH_LIKE][nelem][n]-1]/fcon));

+					fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", opac.TauAbsGeo[i][iso.ipIsoLevNIonCon[ipH_LIKE][nelem][n]-1]/fcon));

 				}

 				fprintf( ioQQQ, "\n" );

 			}

@@ -155,7 +155,7 @@

 				nelem+1);

 			/* Lya is a special case due to 2s-2p resolution - explictly print it first */

 			fprintf( ioQQQ, "%3i-%2i",2, 1 );

-			fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipH2p][ipH1s].Emis->TauTot/flin ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipH2p][ipH1s].Emis->TauTot/flin ));

 			/* total optical depth in 3-2s and 3-2p, is total of both so 2-1 is correct for 3-2*/

 			/* 06 aug 28, from numLevels_max to _local. */

 			for( n=3; n <= iso.n_HighestResolved_local[ipH_LIKE][nelem]; n++ )

@@ -163,7 +163,7 @@

 				if( n%NUMB_PER_LINE ==1)

 					fprintf(ioQQQ,"\n");

 				fprintf( ioQQQ, "%3ld-%2ld",n, n-1 );

-				fprintf( ioQQQ,PrintEfmt("%9.2e", 

+				fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", 

 					/* just do nP - n'S */

 					Transitions[ipH_LIKE][nelem][ iso.QuantumNumbers2Index[ipH_LIKE][nelem][n][1][2] ][ iso.QuantumNumbers2Index[ipH_LIKE][nelem][n-1][0][2] ].Emis->TauTot/flin ));

 			}

@@ -172,20 +172,20 @@

 				if( StatesElem[ipH_LIKE][nelem][n].n % NUMB_PER_LINE ==1)

 					fprintf(ioQQQ,"\n");

 				fprintf( ioQQQ, "%3ld-%2ld", StatesElem[ipH_LIKE][nelem][n].n, StatesElem[ipH_LIKE][nelem][n-1].n );

-				fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][n][n-1].Emis->TauTot/flin ));

+				fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][n][n-1].Emis->TauTot/flin ));

 			}

 			fprintf( ioQQQ, "\n" );

 			fprintf( ioQQQ, "%3i-%2i",2, 1 );

-			fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipH2p][ipH1s].Emis->TauIn/flin ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][ipH2p][ipH1s].Emis->TauIn/flin ));

 			/* 06 aug 28, from numLevels_max to _local. */

 			for( n=3; n <= iso.n_HighestResolved_local[ipH_LIKE][nelem]; n++ )

 			{

 				if( n%NUMB_PER_LINE ==1)

 					fprintf(ioQQQ,"\n");

 				fprintf( ioQQQ, "%3ld-%2ld",n, n-1 );

-				fprintf( ioQQQ,PrintEfmt("%9.2e", 

+				fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", 

 					/* just do nP - n'S */

 					Transitions[ipH_LIKE][nelem][ iso.QuantumNumbers2Index[ipH_LIKE][nelem][n][1][2] ][ iso.QuantumNumbers2Index[ipH_LIKE][nelem][n-1][0][2] ].Emis->TauIn/flin ));

 			}

@@ -194,7 +194,7 @@

 				if( StatesElem[ipH_LIKE][nelem][n].n % NUMB_PER_LINE ==1)

 					fprintf(ioQQQ,"\n");

 				fprintf( ioQQQ, "%3ld-%2ld", StatesElem[ipH_LIKE][nelem][n].n, StatesElem[ipH_LIKE][nelem][n-1].n );

-				fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][n][n-1].Emis->TauIn/flin ));

+				fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipH_LIKE][nelem][n][n-1].Emis->TauIn/flin ));

 			}

 			fprintf( ioQQQ, "\n" );

 		}

@@ -209,7 +209,7 @@

 		for( i=0; i < 5; i++ )

 		{

 			fprintf( ioQQQ, "%5ld", i+1 );

-			fprintf( ioQQQ,PrintEfmt("%9.2e", opac.TauAbsGeo[1][iso.ipIsoLevNIonCon[ipHE_LIKE][ipHELIUM][i]-1]/fcon) );

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", opac.TauAbsGeo[1][iso.ipIsoLevNIonCon[ipHE_LIKE][ipHELIUM][i]-1]/fcon) );

 		}

 		fprintf( ioQQQ, "\n" );

@@ -217,7 +217,7 @@

 		for( i=0; i < 5; i++ )

 		{

 			fprintf( ioQQQ, "%5ld", i+1 );

-			fprintf( ioQQQ,PrintEfmt("%9.2e", opac.TauAbsGeo[0][iso.ipIsoLevNIonCon[ipHE_LIKE][ipHELIUM][i]-1]/fcon ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", opac.TauAbsGeo[0][iso.ipIsoLevNIonCon[ipHE_LIKE][ipHELIUM][i]-1]/fcon ));

 		}

 		fprintf( ioQQQ, "\n" );

@@ -225,24 +225,24 @@

 		fprintf( ioQQQ, "          Old He Is Lines:" );

 		fprintf( ioQQQ, " %4d",584 );

-		fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe2p1P][ipHe1s1S].Emis->TauTot/flin ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe2p1P][ipHe1s1S].Emis->TauTot/flin ));

 		fprintf( ioQQQ, " %4d",3889 );

-		fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3p3P][ipHe2s3S].Emis->TauTot/flin ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3p3P][ipHe2s3S].Emis->TauTot/flin ));

 		fprintf( ioQQQ, " %4d",5016 );

-		fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3p1P][ipHe2s1S].Emis->TauTot/flin ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3p1P][ipHe2s1S].Emis->TauTot/flin ));

 		fprintf( ioQQQ, " %4d",5876 );

-		fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3d3D][ipHe2p3P2].Emis->TauTot/flin ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3d3D][ipHe2p3P2].Emis->TauTot/flin ));

 		fprintf( ioQQQ, "\n" );

 		fprintf( ioQQQ, "          New He Is Lines:" );

 		fprintf( ioQQQ, " %4d",584 );

-		fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe2p1P][ipHe1s1S].Emis->TauIn/flin ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe2p1P][ipHe1s1S].Emis->TauIn/flin ));

 		fprintf( ioQQQ, " %4d",3889 );

-		fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3p3P][ipHe2s3S].Emis->TauIn/flin ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3p3P][ipHe2s3S].Emis->TauIn/flin ));

 		fprintf( ioQQQ, " %4d",5016 );

-		fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3p1P][ipHe2s1S].Emis->TauIn/flin ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3p1P][ipHe2s1S].Emis->TauIn/flin ));

 		fprintf( ioQQQ, " %4d",5876 );

-		fprintf( ioQQQ,PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3d3D][ipHe2p3P2].Emis->TauIn/flin ));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", Transitions[ipHE_LIKE][ipHELIUM][ipHe3d3D][ipHe2p3P2].Emis->TauIn/flin ));

 		fprintf( ioQQQ, "\n" );

 		/* ================================================================================*/

diff -ur c08.00/source/prt_final.cpp c08.00.fmterr/source/prt_final.cpp

--- c08.00/source/prt_final.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/prt_final.cpp	2014-01-22 19:42:56.571995286 +0100

@@ -1648,7 +1648,7 @@

 		/* t^2 predicted from the structure, weighted by H */

 		fprintf(  ioQQQ, " t2(Hstrc)");

-		fprintf( ioQQQ,PrintEfmt("%9.2e", peimbt.t2hstr));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", peimbt.t2hstr));

 		/* temperature from both [OIII] and the Balmer jump rel to Hbeta */

 		fprintf(  ioQQQ, " T(O3-BAC)");

@@ -1656,11 +1656,11 @@

 		/* t2 from both [OIII] and the Balmer jump rel to Hbeta */

 		fprintf(  ioQQQ, " t2(O3-BC)");

-		fprintf( ioQQQ,PrintEfmt("%9.2e", peimbt.t2hyox));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", peimbt.t2hyox));

 		/* structural t2 from the O+2 predicted radial dependence */

 		fprintf(  ioQQQ, " t2(O3str)");

-		fprintf( ioQQQ,PrintEfmt("%9.2e", peimbt.t2o3str));

+		fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", peimbt.t2o3str));

 		fprintf(  ioQQQ, "\n");

@@ -1710,7 +1710,7 @@

 			for( nd=i0; nd < i1; nd++ )

 			{

 				if( nd != i0 ) fprintf( ioQQQ,"   " );

-				fprintf( ioQQQ,PrintEfmt("%10.3e", gv.bin[nd]->avdust/radius.depth_x_fillfac));

+				fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", gv.bin[nd]->avdust/radius.depth_x_fillfac));

 			}

 			fprintf( ioQQQ, "\n" );

@@ -1718,7 +1718,7 @@

 			for( nd=i0; nd < i1; nd++ )

 			{

 				if( nd != i0 ) fprintf( ioQQQ,"   " );

-				fprintf( ioQQQ,PrintEfmt("%10.3e", gv.bin[nd]->avdft/radius.depth_x_fillfac));

+				fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", gv.bin[nd]->avdft/radius.depth_x_fillfac));

 			}

 			fprintf( ioQQQ, "\n" );

@@ -1726,7 +1726,7 @@

 			for( nd=i0; nd < i1; nd++ )

 			{

 				if( nd != i0 ) fprintf( ioQQQ,"   " );

-				fprintf( ioQQQ,PrintEfmt("%10.3e", gv.bin[nd]->avdpot/radius.depth_x_fillfac));

+				fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", gv.bin[nd]->avdpot/radius.depth_x_fillfac));

 			}

 			fprintf( ioQQQ, "\n" );

@@ -1734,7 +1734,7 @@

 			for( nd=i0; nd < i1; nd++ )

 			{

 				if( nd != i0 ) fprintf( ioQQQ,"   " );

-				fprintf( ioQQQ,PrintEfmt("%10.3e", gv.bin[nd]->avDGRatio/radius.depth_x_fillfac));

+				fprintf( ioQQQ,"%s", PrintEfmt("%10.3e", gv.bin[nd]->avDGRatio/radius.depth_x_fillfac));

 				/* add up total dust to gas mass ratio */

 				total_dust2gas += gv.bin[nd]->avDGRatio/radius.depth_x_fillfac;

 			}

@@ -1742,7 +1742,7 @@

 		}

 		fprintf(ioQQQ," Dust to gas ratio (by mass):");

-		fprintf(ioQQQ,PrintEfmt("%10.3e", total_dust2gas));

+		fprintf(ioQQQ,"%s", PrintEfmt("%10.3e", total_dust2gas));

 		/* total extinction (conv to mags) at V and B per hydrogen, this includes

 		 * forward scattering as an extinction process, so is what would be measured

diff -ur c08.00/source/prt_header.cpp c08.00.fmterr/source/prt_header.cpp

--- c08.00/source/prt_header.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/prt_header.cpp	2014-01-22 19:43:14.940154463 +0100

@@ -49,7 +49,7 @@

 	fprintf( ioQQQ, "           %4ldCellPeak",rfield.nflux );

 	PrintE82(ioQQQ, rfield.anu[prt.ipeak-1] );

 	fprintf( ioQQQ, "   Lo");

-	fprintf( ioQQQ,PrintEfmt("%9.2e", rfield.anu[0] - rfield.widflx[0]/2. ));

+	fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", rfield.anu[0] - rfield.widflx[0]/2. ));

 	fprintf( ioQQQ, "=%6.2fcm   Hi-Con:",

 	  9.117e-6/(rfield.anu[0] - rfield.widflx[0]/2.) );

 	PrintE82(ioQQQ,rfield.anu[rfield.nflux-1] + rfield.widflx[rfield.nflux-1]/2.);

diff -ur c08.00/source/prt_met.cpp c08.00.fmterr/source/prt_met.cpp

--- c08.00/source/prt_met.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/prt_met.cpp	2014-01-22 19:39:03.065961840 +0100

@@ -136,7 +136,7 @@

 			strcat(chAtMol," ");

 			strcat(chAtMol,chAtMolWL);

 			fprintf( ioQQQ, "  %10.15s",chAtMol);

-			fprintf( ioQQQ,PrintEfmt("%9.2e", t->Emis->TauIn));

+			fprintf( ioQQQ,"%s", PrintEfmt("%9.2e", t->Emis->TauIn));

 			fprintf( ioQQQ, " ");

 			// throw CR after printing 6 numbers

 			++n;

@@ -155,7 +155,7 @@

 		{

 			/* PrtTauFnt is threshold for printing it */

 			fprintf( ioQQQ, "  %10.10s",chLineLbl(t));

-			fprintf( ioQQQ, PrintEfmt("%9.2e", t->Emis->TauIn ));

+			fprintf( ioQQQ, "%s", PrintEfmt("%9.2e", t->Emis->TauIn ));

 			// throw CR after printing 6 numbers

 			++n;

diff -ur c08.00/source/prt_zone.cpp c08.00.fmterr/source/prt_zone.cpp

--- c08.00/source/prt_zone.cpp	2008-08-18 13:05:17.000000000 +0200

+++ c08.00.fmterr/source/prt_zone.cpp	2014-01-22 19:38:15.721546825 +0100

@@ -91,7 +91,7 @@

 		fprintf(ioQQQ," NTR:%3ld Htot:",conv.nPres2Ioniz);

 		PrintE93(ioQQQ,thermal.htot);

 		fprintf(ioQQQ," T912:");

-		fprintf(ioQQQ,PrintEfmt("%9.2e",opac.TauAbsGeo[0][iso.ipIsoLevNIonCon[ipH_LIKE][ipHYDROGEN][ipH1s]-1] ));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",opac.TauAbsGeo[0][iso.ipIsoLevNIonCon[ipH_LIKE][ipHYDROGEN][ipH1s]-1] ));

 		fprintf(ioQQQ,"###\n");

 		if( trace.nTrConvg )

@@ -120,7 +120,7 @@

 		fprintf( ioQQQ, " Abun:" );

 		for( i=0; i < LIMELM; i++ )

 		{

-			fprintf( ioQQQ,PrintEfmt("%8.1e", dense.gas_phase[i] ));

+			fprintf( ioQQQ,"%s", PrintEfmt("%8.1e", dense.gas_phase[i] ));

 		}

 		fprintf( ioQQQ, "\n" );

 	}

@@ -164,48 +164,48 @@

 	hatmic = (dense.xIonDense[ipHYDROGEN][0] + dense.xIonDense[ipHYDROGEN][1])/hatmic;

 	fprintf( ioQQQ, " Hydrogen     ");

-	fprintf(ioQQQ,PrintEfmt("%9.2e",dense.xIonDense[ipHYDROGEN][0]/dense.gas_phase[ipHYDROGEN]));

-	fprintf(ioQQQ,PrintEfmt("%9.2e",dense.xIonDense[ipHYDROGEN][1]/dense.gas_phase[ipHYDROGEN]));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",dense.xIonDense[ipHYDROGEN][0]/dense.gas_phase[ipHYDROGEN]));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",dense.xIonDense[ipHYDROGEN][1]/dense.gas_phase[ipHYDROGEN]));

 	fprintf( ioQQQ, " H+o/Hden");

-	fprintf(ioQQQ,PrintEfmt("%9.2e",hatmic ));

-	fprintf(ioQQQ,PrintEfmt("%9.2e",hmi.Hmolec[ipMHm]/dense.gas_phase[ipHYDROGEN] ));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",hatmic ));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",hmi.Hmolec[ipMHm]/dense.gas_phase[ipHYDROGEN] ));

 	fprintf( ioQQQ, " H-    H2");

 	/* this is total H2, the sum of "ground" and excited */

-	fprintf(ioQQQ,PrintEfmt("%9.2e",hmi.H2_total/dense.gas_phase[ipHYDROGEN]));

-	fprintf(ioQQQ,PrintEfmt("%9.2e",hmi.Hmolec[ipMH2p]/dense.gas_phase[ipHYDROGEN]));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",hmi.H2_total/dense.gas_phase[ipHYDROGEN]));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",hmi.Hmolec[ipMH2p]/dense.gas_phase[ipHYDROGEN]));

 	fprintf( ioQQQ, " H2+ HeH+");

-	fprintf(ioQQQ,PrintEfmt("%9.2e",hmi.Hmolec[ipMHeHp]/dense.gas_phase[ipHYDROGEN]));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",hmi.Hmolec[ipMHeHp]/dense.gas_phase[ipHYDROGEN]));

 	fprintf( ioQQQ, " Ho+ ColD");

-	fprintf(ioQQQ,PrintEfmt("%9.2e",colden.colden[ipCOL_H0]));

-	fprintf(ioQQQ,PrintEfmt("%9.2e",colden.colden[ipCOL_Hp]));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",colden.colden[ipCOL_H0]));

+	fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",colden.colden[ipCOL_Hp]));

 	fprintf( ioQQQ, "\n");

 	/* print departure coef if desired */

 	if( iso.lgPrtDepartCoef[ipH_LIKE][ipHYDROGEN] )

 	{

 		fprintf( ioQQQ, " Hydrogen     " );

-		fprintf(ioQQQ,PrintEfmt("%9.2e",  iso.DepartCoef[ipH_LIKE][ipHYDROGEN][ipH1s]));

-		fprintf(ioQQQ,PrintEfmt("%9.2e",  1.));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",  iso.DepartCoef[ipH_LIKE][ipHYDROGEN][ipH1s]));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",  1.));

 		fprintf( ioQQQ, " H+o/Hden");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", (dense.xIonDense[ipHYDROGEN][0] + dense.xIonDense[ipHYDROGEN][1])/dense.gas_phase[ipHYDROGEN]));

-		fprintf(ioQQQ,PrintEfmt("%9.2e", hmi.hmidep));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", (dense.xIonDense[ipHYDROGEN][0] + dense.xIonDense[ipHYDROGEN][1])/dense.gas_phase[ipHYDROGEN]));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", hmi.hmidep));

 		fprintf( ioQQQ, " H-    H2");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", hmi.h2dep));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", hmi.h2dep));

 		fprintf( ioQQQ, "      H2+");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", hmi.h2pdep));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", hmi.h2pdep));

 		fprintf( ioQQQ, "      H3+");

-		fprintf(ioQQQ,PrintEfmt("%9.2e",hmi.h3pdep));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",hmi.h3pdep));

 		fprintf( ioQQQ, "\n" );

 	}

 	if( prt.lgPrintHeating )

 	{

 		fprintf( ioQQQ, "              ");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", thermal.heating[0][0]/thermal.htot));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", thermal.heating[0][0]/thermal.htot));

 		fprintf( ioQQQ,"         ");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", thermal.heating[0][15]/thermal.htot));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", thermal.heating[0][15]/thermal.htot));

 		fprintf( ioQQQ,"         ");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", thermal.heating[0][16]/thermal.htot));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", thermal.heating[0][16]/thermal.htot));

 		fprintf( ioQQQ,"\n");

 	}

@@ -230,15 +230,15 @@

 	if( prt.lgPrintHeating )

 	{

 		fprintf( ioQQQ, "              ");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", thermal.heating[0][1]/thermal.htot ));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", thermal.heating[0][1]/thermal.htot ));

 		fprintf( ioQQQ, "         ");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", 0. ));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", 0. ));

 		fprintf( ioQQQ, " BoundCom");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", ionbal.CompRecoilHeatLocal/ thermal.htot));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", ionbal.CompRecoilHeatLocal/ thermal.htot));

 		fprintf( ioQQQ, "   Extra:");

-		fprintf(ioQQQ,PrintEfmt("%9.2e",thermal.heating[0][20]/thermal.htot));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e",thermal.heating[0][20]/thermal.htot));

 		fprintf( ioQQQ, "   Pairs:");

-		fprintf(ioQQQ,PrintEfmt("%9.2e", thermal.heating[0][21]/ thermal.htot ));

+		fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", thermal.heating[0][21]/ thermal.htot ));

 		fprintf( ioQQQ,"  H-lines\n");

 	}

@@ -248,36 +248,36 @@

 		fprintf( ioQQQ, " Helium       " );

 		for( i=0; i < 3; i++ )

 		{

-			fprintf(ioQQQ,PrintEfmt("%9.2e", dense.xIonDense[ipHELIUM][i]/dense.gas_phase[ipHELIUM]) );

+			fprintf(ioQQQ,"%s", PrintEfmt("%9.2e", dense.xIonDense[ipHELIUM][i]/dense.gas_phase[ipHELIUM]) );

 		}