OPF 简单的最优潮流程序

这是简单的最优潮流程序，经过IEEE4、IEEE14、IEEE30、IEEE118、IEEE1047系统测试的。

%% ***************************************************************
%             作者：陆镛
%             原创日期：2012年11月29号
%             修改日期：2012年12月2号
%             函数说明：修正各变量。
%% ***************************************************************
function [PgQrAngleUAmplitudeUyluwz] = Correction（JmatrixLxxLyLzLw...
    PgQrAngleUAmplitudeUyluwzInequalityJmatrixPvNumGenNum...
    NodeNumLuuLluLUWZ）   
%% **************************************************************
dxy=Jmatrix\[Lxx;-Ly];

dx=dxy（1:PvNum+GenNum+2*NodeNum）;
dy=dxy（1+PvNum+GenNum+2*NodeNum:PvNum+GenNum+4*NodeNum）;                                                                                           
du=-InequalityJmatrix‘*dx-Lw;
dw=-U\W*du-U\Luu;
dl=InequalityJmatrix‘*dx+Lz;
dz=-L

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2013-03-27 09:27  最优潮流程序（最优、完全极坐标）\
     文件        1237  2013-02-25 17:16  最优潮流程序（最优、完全极坐标）\Correction.m
     文件      185785  2009-04-16 16:10  最优潮流程序（最优、完全极坐标）\IEEE1047.dat
     文件       16630  2008-11-16 22:28  最优潮流程序（最优、完全极坐标）\IEEE118.dat
     文件        1112  2010-05-17 18:34  最优潮流程序（最优、完全极坐标）\IEEE14.dat
     文件        4017  2011-11-19 21:29  最优潮流程序（最优、完全极坐标）\IEEE30.dat
     文件       61718  2009-08-14 10:10  最优潮流程序（最优、完全极坐标）\IEEE300.dat
     文件       61720  2011-11-23 21:15  最优潮流程序（最优、完全极坐标）\IEEE301.dat
     文件         321  2009-04-20 16:46  最优潮流程序（最优、完全极坐标）\IEEE4.dat
     文件        2127  2013-03-31 14:51  最优潮流程序（最优、完全极坐标）\Imbalance.m
     文件        2179  2013-01-24 11:17  最优潮流程序（最优、完全极坐标）\Initialization.m
     文件        4278  2013-01-24 18:11  最优潮流程序（最优、完全极坐标）\Jacobi.m
     文件        2233  2011-11-25 17:02  最优潮流程序（最优、完全极坐标）\Loss.m
     文件        2963  2013-03-31 14:52  最优潮流程序（最优、完全极坐标）\opf.m
     文件        6583  2013-01-24 11:15  最优潮流程序（最优、完全极坐标）\ReadData.m
     文件        2158  2013-01-22 21:46  最优潮流程序（最优、完全极坐标）\Ymatrix.m