source: branches/gui/Block-Oriented EML/Basic Blocks/MathFcns.mso @ 975

#*-------------------------------------------------------------------
* EMSO Model Library (EML) Copyright (C) 2004 - 2007 ALSOC.
*
* This LIBRARY is free software; you can distribute it and/or modify
* it under the therms of the ALSOC FREE LICENSE as available at
* http://www.enq.ufrgs.br/alsoc.
*
* EMSO is distributed under the terms of the ALSOC LICENSE as
* available at http://www.enq.ufrgs.br/alsoc.
*-----------------------------------------------------------------------
* Author: Jonathan Ospino P.
* $Id: Math_Fcns.mso  2012$
*---------------------------------------------------------------------*#

using "types";

Model Math_Fcns

ATTRIBUTES
Pallete=true;
Icon="icon/Math_Fcns";
Info="== Math functions block ==

          It computes the functions abs(x), sign(x), ln(x), log10(x), x^N, or Nth-Root(x),
          where x is the input signal.
          The resulting value is assigned to the output variable";

PARAMETERS
Select_function as Switcher(Valid=["|x|","sign(x)","e^x","ln(x)","log10(x)","x^n","Nth-Root(x)"],Default="|x|");
n as Real(Brief="Only to be used in the x^n computation",Default=2);
N as positive(Brief="Only to be used in Nth-Root(x) computation",Default=2);

VARIABLES
in In as Real(Brief="Input signal",PosX=0,PosY=0.5);
out Out as Real(Brief="Output signal",Protected=true,PosX=1,PosY=0.5);

EQUATIONS

switch Select_function
        case "|x|":
        Out=abs(In);
        case "sign(x)":
        Out=sign(In);
        case "e^x":
        Out=exp(In);
        case "ln(x)":
        Out=ln(In);
        case "log10(x)":
        Out=log(In);
        case "x^n":
        Out=In^n;
        case "Nth-Root(x)":
        Out=In^(1/N);
end

end