Chp7ex10.m
上传用户:eighthdate
上传日期:2014-05-24
资源大小:270k
文件大小:2k
源码类别:

其他行业

开发平台:

Matlab

  1. clear
  2. basemva = 100;  accuracy = 0.0001;  maxiter = 10;
  3. %        Bus Bus  Voltage Angle   ---Load---- -------Generator----- Static Mvar
  4. %        No  code Mag.    Degree  MW    Mvar  MW  Mvar Qmin Qmax    +Qc/-Ql
  5. busdata=[1   1    1.06    0.0      0     0     0   0    10   50      0
  6.          2   2    1.045   0.0     20    10    40  30    10   50      0
  7.          3   2    1.03    0.0     20    15    30  10    10   40      0
  8.          4   0    1.00    0.0     50    30     0   0     0    0      0
  9.          5   0    1.00    0.0     60    40     0   0     0    0      0];
  10. %                                        Line code
  11. %         Bus bus   R      X     1/2 B   = 1 for lines
  12. %         nl  nr  p.u.   p.u.   p.u.     > 1 or < 1 tr. tap at bus nl
  13. linedata=[1   2   0.02   0.06   0.030     1
  14.           1   3   0.08   0.24   0.025     1
  15.           2   3   0.06   0.18   0.020     1
  16.           2   4   0.06   0.18   0.020     1
  17.           2   5   0.04   0.12   0.015     1
  18.           3   4   0.01   0.03   0.010     1
  19.           4   5   0.08   0.24   0.025     1];
  20. cost = [200  7.0    0.008
  21.         180  6.3    0.009
  22.         140  6.8    0.007];
  23. mwlimits =[10  85
  24.            10  80
  25.            10  70];
  26. lfybus                     % form the bus admittance matrix
  27. lfnewton     % Power flow solution by Newton-Raphson method
  28. busout       % Prints the power flow solution on the screen
  29. bloss                % Obtains the loss formula coefficients
  30. gencost           % Computes the total generation cost $/h
  31. dispatch           % Obtains optimum dispatch of generation
  32.        % dpslack is the difference (absolute value) between
  33.        % the scheduled slack generation determined from the
  34.          % coordination equation, and the slack generation,
  35.                    % obtained from the power flow solution.
  36. while dpslack > 0.001                % Test for convergence
  37. lfnewton                          % New power flow solution
  38. bloss                       % Loss coefficients are updated
  39. dispatch % Optimum dispatch of gen. with new B-coefficients
  40. end
  41. busout               % Prints the final power flow solution
  42. gencost   % Generation cost with optimum scheduling of gen.