National identity as a causal element of explanation and prediction in realist theory as reflected in the social construction of Germany