Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Re: FortranForm o/p question

• To: mathgroup at smc.vnet.net
• Subject: [mg56154] Re: FortranForm o/p question
• From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
• Date: Sun, 17 Apr 2005 03:06:58 -0400 (EDT)
• Organization: Uni Leipzig
• References: <d3qi5k$ojl$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

Unprotect[Power]
Power /: Format[Power[E, x_], FortranForm] := 
exp[x]
Protect[Power]

and

In[]:=FortranForm[Exp[-a*t]*Cos[omega*t]]

Out[]=Cos(omega*t)/exp(a*t)

Regards

  Jens

"Madhusudan Singh" <spammers-go-here at spam.invalid> 
schrieb im Newsbeitrag 
news:d3qi5k$ojl$1 at smc.vnet.net...
> Hi
>
> Is it possible to make Mathematica o/p exp(arg) 
> instead of E**arg, when
> using the FortranForm[] wrapper ?
>
> Thanks.
> 

• Follow-Ups:
  • Re: Re: FortranForm o/p question
    • From: Chris Chiasson <chris.chiasson@gmail.com>