TRANSIT TIME ¼ 34
CAPACITY ¼
INFLOW LIMIT ¼
INFLOWS:
Maturation ¼ CONVEYOR OUTFLOW
OUTFLOWS:
Sexual_Mat ¼ CONVEYOR OUTFLOW
Juvenile_death ¼ LEAKAGE OUTFLOW
LEAKAGE FRACTION ¼ .02 * Juvenile
LEAK ZONE ¼ 0% to 100%
Lactating(t) ¼ Lactating(t À dt) + (Birth À Weaning À LDying) * dt
INIT Lactating ¼ 10
TRANSIT TIME ¼ IF Is_the_male_in_the_population_currently_killing_
babies? > 0 THEN 6.3 ELSE 10.2
CAPACITY ¼
INFLOW LIMIT ¼
INFLOWS:
Birth ¼ CONVEYOR OUTFLOW
OUTFLOWS:
Weaning ¼ CONVEYOR OUTFLOW
LDying ¼ LEAKAGE OUTFLOW
LEAKAGE FRACTION ¼ .004 * Lactating
LEAK ZONE ¼ 0% to 100%
Pregnant(t) ¼ Pregnant(t À dt) + (Fertilization À Birth À PDying) * dt
INIT Pregnant ¼ 10
TRANSIT TIME ¼ 6.5
CAPACITY ¼ INF
INFLOW LIMIT ¼ INF
INFLOWS:
Fertilization ¼ .25 * Fertile
OUTFLOWS:
Birth ¼ CONVEYOR OUTFLOW
PDying ¼ LEAKAGE OUTFLOW
LEAKAGE FRACTION ¼ .004 * Pregnant
LEAK ZONE ¼ 0% to 100%
Extra_death_rate_due_to_infanticide ¼ 0.366
Int_Infant_Death_Rate ¼ 0.04
Is_new_male_infanticidal? ¼ If Random_#_Gen_2 <¼ Pct_Infanticidal then 1 else 0
Is_old_male_removed? ¼ IF Random_#_Gen > .98 then 1 else 0
Pct_Infanticidal ¼ 0.5
Random_#_Gen ¼ random(0,1)
Random_#_Gen_2 ¼ Random(0,1)
Total_Adult_Female_Population_Size ¼ Pregnant+ + Lactating+ + Fertile
128
14 Langur Infanticide and Long-Term Matriline Fitness