function [ BS ] = BrierScoreCalc( ProbOccurs, Occured )
%BrierScoreCalc Calculates the Brier Score of a binary probabilistic
%prediction after knowing the actual result. Two inputs are needed:
%ProbOccures is the reported probability of the event becoming true.
%Occured shoud be 1 if the event became true and 0 if the event became
%false.

ProbNotOccurs = 1 - ProbOccurs;

BS = (ProbOccurs - Occured)^2 + (ProbNotOccurs - (1-Occured) )^2;

end