PowerSystem.mo 604 B

1234567891011121314151617181920212223242526
  1. model PowerSystem
  2. parameter Real J = 0.085;
  3. parameter Real b = 5;
  4. parameter Real K = 1.8;
  5. parameter Real R = 0.15;
  6. parameter Real L = 0.036;
  7. parameter Real V_abs = 12;
  8. Real V;
  9. output Real theta;
  10. output Real i;
  11. output Real omega;
  12. input Real tau;
  13. input Real u;
  14. input Real d;
  15. equation
  16. V = if u > 0.5 then V_abs
  17. else if d > 0.5 then - V_abs
  18. else 0.0;
  19. der(omega) = (K * i + tau - b * omega) / J;
  20. L * der(i) = V - R * i - K * omega;
  21. der(theta) = omega;
  22. annotation(
  23. experiment(StartTime = 0, StopTime = 1, Tolerance = 1e-6, Interval = 0.002)
  24. );
  25. end PowerSystem;