Hey guys, is there a possibility to write this function (in the pic) in mathematica?

And if so, how can I do it?

Thanks a lot.

Assaf.

Printable View

- Mar 20th 2010, 04:19 AMasi123Defining a function in mathematica
Hey guys, is there a possibility to write this function (in the pic) in mathematica?

And if so, how can I do it?

Thanks a lot.

Assaf. - Mar 22nd 2010, 08:36 AMgarypenn
The function could be defined thusly,

Code:`Needs["PhysicalConstants`"];`

Z[W_,d_]:=If[W/d<=1,

(60 Pi/Sqrt[VacuumPermittivity]) Log[(8d/W)+(W/4d)],

(120 Pi)/(Sqrt[VacuumPermittivity] (W/d+1.393+0.667 Log[W/d+1.444]))];