%****************************************************************
% File: EULERO.M
%
% Scopo: Formula di Eulero per equazioni differenziali
%
% Uso: [yn1,xn1] = eulero(x,y,h,f)
%
% Input:  x    valore iniziale di x
%	  y    valore iniziale di y
%	  h    passo di integrazione
%	  f    funzione integranda: f(x,y)
%
% Output: xn1  valore di x variato (x+h)
%	  yn1  valore di y in xn1
%
% Richiami:
% Commenti:
% Autori: mf
%*****************************************************************
%

function  [yn1,xn1] = eulero (x,y,h,f)
xn1=x+h;
yn1=y+h*eval(f);
%
return