Re: Problem with funktion with four variables

• To: mathgroup at smc.vnet.net
• Subject: [mg31637] Re: [mg31618] Problem with funktion with four variables
• From: Anton Antonov <antonov at wolfram.com>
• Date: Mon, 19 Nov 2001 03:11:20 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```	The problem is in the way the first argument is defined.
If you enter in Mathematica

In[1]:=?test

You will get

Global`test

test[_*Subscript[v, 0], \[Gamma]_, H_, m_] :=
(((-m)*H)/\[Gamma]^2)*Cosh[ArcSinh[Subscript[v, 0]*
(\[Gamma]/H)]] - (m/\[Gamma])*ArcSinh[Subscript[v, 0]*
(\[Gamma]/H)]*Subscript[v, 0]

-- the first argument is the blank pattern multiplied by
Subscript[v, 0].
So if we modify the definition as

Clear[test];
test[v0_, \[Gamma]_, H_, m_] :=
(((-m)*H)/\[Gamma]^2)*Cosh[ArcSinh[v0*(\[Gamma]/H)]] -
(m/\[Gamma])*ArcSinh[v0*(\[Gamma]/H)]*v0;

for test[14, 500, 100, 80] we get

\!\(\(-\(\(52\ \@29\)\/125\)\) - \(56\ ArcSinh[70]\)\/25\)

Best,
Anton

==============================================================
Anton Antonov Antonov, PhD     *****     Wolfram Research Inc.
http://www.imm.dtu.dk/~uniaaa   ***   tel +1 217 398 0700 #782
==============================================================
Give me wings and I will crawl faster!
--------------------------------------------------------------

On Sun, 18 Nov 2001, Manuel Prinz wrote:

> Hello Guys
>
> If I define this
>
> \!\(test[\(v\_0\) _, \ \[Gamma]_, \ H_, \
>       m_] :=
> \((\(\(-m\)*H\)\/\[Gamma]\^2*Cosh[ArcSinh[v\_0*\[Gamma]\/H]] -
>         m\/\[Gamma]*ArcSinh[v\_0*\[Gamma]\/H]*v\_0)\)\)
>
> and then try to calculate test[14,500,100,80] nothing happens!
>
> What could be the problem?
>
>
> Thanks!
>
>
> Manuel (Mathematica 4.0)
>

```

• Prev by Date: Evaluate Initialization button?
• Next by Date: Loop through a notebook
• Previous by thread: Re: Problem with funktion with four variables
• Next by thread: Re: Problem with funktion with four variables