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