% Illustration zur Nullstellensuche in der mean field Loesung
% Zeichne f1(m)=m und f2(m,beta)=tanh(6*beta*m) als zwei Kurven
% Schnittpunkt liefert dann offenbar m=tanh(6*beta*m)
clc
clear
beta=0.2;
m=0:0.05:1;
f1 = @(m) m;
f2 = @(m,beta) tanh(6*beta*m);
plot(m,f1(m),m,f2(m,beta));
