//===============================================================================
//  FEED-BACKS AMONG INBREEDING, INBREEDING DEPRESSION IN SPERM TRAITS AND SPERM
//  COMPETITION CAN DRIVE EVOLUTION OF COSTLY POLYANDRY.
//  Bocedi, G. & Reid, J.M. (2017).	Evolution.
//
//  Allelic standard deviations used for initialisation. 
//  4th September 2017.
//===============================================================================

#pragma once

#include <stdio.h>
#include <math.h>

class a_std
{
public:

	a_std()
	{
		delta_tau = 0.0;
		s = 0.0; 
		ms = 0.0;
	}

	~a_std()
	{
	}

	double delta_tau, s, ms;
	void get_std(double *v, int *l, bool *ev){
		if (ev[0]) delta_tau = sqrt(v[0] / ((double)l[0] * 2.0));
		if (ev[1]) s = sqrt(v[1] / ((double)l[1] * 2.0));
		if (ev[2]) ms = sqrt(v[2] / ((double)l[2] * 2.0));
	}
};