simple question : mathematica defining variable

PowerDensity[antenna_, loc_] := Module[antenna {a, b, c} loc {x, y},
  PowerDensity = c/(4*Pi*((a - x)^2 + (b - y)^2)^(1/2))]

PowerDensity[{1000, 1000, 12}, {0, 0}]

Module::lvlist: Local variable specification {1000,1000,12} {a,b,c} {0,0} {x,y} is not a List. >>

Not sure why it isnt putting a=1000 b = 1000 c=12 and so on can someone please tell me how to fix this code.

PS. new to mathematica

[Dr. Seis]

PS. you might have better luck at a Mathematica site than a Matlab site

[Matt Fig]

LOL. Look at the top of the page. MATLAB Central, not MATHEMATICA Central.... MATLAB is not the same as Mathematica.