routage_optimal.m

来自「Approche de routage optimal avec comme p」· M 代码 · 共 69 行

global capa lien or_des

capa;
lien 
or_des
count=0;
nb_noeud=4;
nb_cycle=4;
i=1;
chemin=zeros(1);

for or=1:nb_noeud %recherche de flots
    for des=1:nb_noeud
        if or_des(or,des)~=0
            flot(i,:)=[or des or_des(or,des)];
            i=i+1;
        end
    end
end
flot
[nb_flot,n]=size(flot);

for i=1:nb_flot
    origine=flot(i,1);
    destination=flot(i,2);
    temp=origine;
    chemin(1)=0;
    while temp~=destination 
        %ligne=lien(temp,:)
        des_int=find(lien(origine,:)<Inf)
        for ii=1:length(des_int)
            ligne=(des_int(ii),:)
            %ligne(ii)
            if ligne(ii)<Inf && sum(size(find(chemin,ligne(ii))))==0
                
                temp=ii
                chemin=[chemin temp]
            end
        end
    end
end

chemin
                    
            
%             origine=or; 
%             destination=des;
%             flot=or_des(or,des);
%             chemin=zeros(1,1);
            
                        

             des_int=find(lien(origine,:)<Inf)
%             or_int=des_int;
%             des_int=find(lien(or_int,:)<Inf && lien