Changeset 1148 for trunk/Modelica

Show
Ignore:
Timestamp:
07/17/08 20:51:51 (4 months ago)
Author:
otter
Message:

#93 fixed: arctan replaced by atan

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • trunk/Modelica/Electrical/Analog/Basic.mo

    r1046 r1148  
    508508            fillColor={0,0,255})})); 
    509509  initial equation  
    510     (Lnom - Linf) = (Lzer - Linf)*Ipar/Inom*(Modelica.Constants.pi/2-arctan(Ipar/Inom)); 
     510    (Lnom - Linf) = (Lzer - Linf)*Ipar/Inom*(Modelica.Constants.pi/2-atan(Ipar/Inom)); 
    511511  equation  
    512512    assert(Lzer > Lnom+Modelica.Constants.eps, 
    … …  
    514514    assert(Linf < Lnom-Modelica.Constants.eps, 
    515515           "Linf (= " + String(Linf) + ") has to be < Lnom (= " + String(Lnom) + ")"); 
    516     (Lact - Linf)*i/Ipar = (Lzer - Linf)*noEvent(arctan(i/Ipar)); 
     516    (Lact - Linf)*i/Ipar = (Lzer - Linf)*noEvent(atan(i/Ipar)); 
    517517    Psi = Lact*i; 
    518518    v = der(Psi);