Fortran Format
- To: mathgroup at yoda.physics.unc.edu
- Subject: Fortran Format
- From: CHALLACOMBE at baeyer.chem.fsu.edu
- Date: Fri, 9 Oct 1992 9:06:24 -0400 (EDT)
MathGroup,
Franz Amador writes
>> Is there a way to make Mathematica print numbers in a FORTRAN-like
>> way, e.g. -2.45658E-3
one simple (string) function that does the job is
FortranFormat[x_]:=ToString[ PaddedForm[x,{14,13},
{ NumberFormat->(SequenceForm[#1,"D",#3]&),
ExponentFunction->(If[#==0,0,#]&)}]];
You may want to change the "D" to "E" for s.p. or diddle the # of decimals
out put {14,13}.
Hope this is usefull,
Matt Challacombe
Chemical Physics and the
Supercomputer Computations Research Inst.
Tallahassee, FL.