function [f] = f_P(x);
%
% Calcula o valor de f(x).
%
% Input:  x (escalar).
%
% Output: escalar f = f(x).
%
% L. N. Vicente, Novembro de 2004.
%
f = x^2;
%
% Fim de f_P.