function bifdiag
% Animation for bifurcation diagram
% O. Thual, 15/09/03
clear all
close all
disp('Diagramme de bifurcation')
ndemdef=1;
while 1
	ndem=input(' 1: noeud-col (defaut) , 2: fourche, 3: hopf, 9: quit ?' )
	if isempty(ndem) 
		ndem=ndemdef;
	end
	if ndem==1 
		noeudcol
	end
	if ndem == 2
		fourche
	end
	if ndem == 3
		hopf
	end
	if ndem ==9
		disp('Good Bye!')
		return
	end
end
