clc
clear
tic
load?6jd
[BusNumLineiLinejrxCapacityChangduDeltaPLineNumLineOrgLineNumMaxLineAddLimited]=FormX（a）;
[NumMaxdeltaVisualAfNumTryNumLineAddFCBulletin]=Init（LineNumLineNumMaxLineOrgCapacityrxLineiLinejBusNumDeltaPChangduLineAddLimited）;
for?diedai=1:NumMax
????for?m=1:AfNum?
????????LineAddmn=sum（（ones（AfNum1）*LineAdd（m:）-LineAdd）.^22）;
????????Dij=sqrt（LineAddmn）;
????????Partner=find（Dij????????PartnerNum=size（Partner1）;
????????if?PartnerNum>0
???????????[FC_followLineAdd_follow]=AfFollow（PartnerFCLineAddAfNumVisualmdeltaLineOrgCapacityLineNumrxLineiLinejBusNumDeltaPChangduTryNumLineNumMaxLineAddLimited）;
????????end
????????[FC_preyLineAdd_prey]=AfPrey（TryNumVisualLineNumLineAddLineOrgCapacity

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????887??2012-09-10?10:06??算法定義參數設置子程序.m

?????文件???????1108??2012-09-10?10:06??覓食及追尾行為子程序.m

?????文件???????1818??2012-09-10?10:06??潮流計算和過負荷計算子程序.m

?????文件????????709??2012-09-10?10:07??線路參數讀取子程序.m

?????文件????????719??2012-09-10?10:07??算法中各參數賦值子程序.m

?????文件???????1424??2012-09-10?15:30??六節點系統算法主程序.m

-----------?---------??----------?-----??----

?????????????????6665????????????????????6