function [GCV] = gmpe_fcc_GCV(iwyn)
% function [FPE] = gmpe_fcc_FPE(iwyn)
% Fahlman Cascade Correlation
% Liczy final prediction error (GCV).
% Akaike (1969) Statistical Predictor Identification
m = numel(iwyn(1).b) - 1 ;
n = size(iwyn(1).x,2) ;
M = numel(iwyn) ;
P = zeros(M,1) ;
k = 1:M;
q = k .* (2 .* m + k) ./ 2 ;
GCV = [iwyn.SSE]./n ./ (1 - q./n).^2;
end