kinship function

Functions for calculating kinship matrices