MathGroup Archive 1995

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

Search the Archive

Function?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg2810] Function?
  • From: hans.steffani at e-technik.tu-chemnitz.de (Hans Steffani)
  • Date: Tue, 19 Dec 1995 02:41:22 -0500
  • Organization: University of Technology Chemnitz, FRG

For some reason I use.

aktiv[fx_]:=
          First[
             Position[Table[norm[ w[[i,j]]-fx ] , {i,wsize},{j,wsize} ],
                  Min[Table[norm[ w[[i,j]]-fx ] , {i,wsize},{j,wsize} ]] ]];

which lookt very ugly? Is there another way using some
kind of local variables to hold
Table[norm[ w[[i,j]]-fx ] , {i,wsize},{j,wsize} ]
?

Hans Friedrich Steffani
--
Hans Friedrich Steffani
Institut fuer Elektrische Maschinen und Antriebe
TU Chemnitz-Zwickau
e-mail: hans.steffani at e-technik.tu-chemnitz.de


  • Prev by Date: ParametricPlot3D
  • Next by Date: Re: Re: Bug ListPlot?
  • Previous by thread: Function?
  • Next by thread: Re: Function?