include ./Data/maxflow.mod;
include ./Data/temp.dat; 
solve; 
printf "%d ",solve_result_num > ../Temp/dot.dat;
if solve_result_num >= 200 then quit;
else
{
   printf "%d  ",Entering_Traff >> ../Temp/dot.dat;  
   for {(i,j) in ROADS} printf "%s %s %s %s  ",i,j,Traff[i,j],cap[i,j] >> ../Temp/dot.dat;
   printf "\n" >> ../Temp/dot.dat; 
   for {i in INTER} printf "%s %s  ",i,Intersection[i] >> ../Temp/dot.dat;
}
quit;