extern struct loci_data *recs, *nrecs, *theta, *theta_t, *recs_temp, 
   *nrecs_temp,  *num_mei, *num_mei_split, *pk_recs, *pk_nrecs, *theta_1_t;


extern double TOL;
extern SHORT PUK_NUM_ORDERS_TOL;
extern SHORT PK_NUM_ORDERS_TOL;

extern double PUK_LIKE_TOL;
extern double PK_LIKE_TOL;

extern SHORT SEX_EQ;
extern SHORT **FIXED_INTERVALS;
extern double *fam_likes;