function b = bcalc(AF) %bcalc(AF) calculates a constant used in determining the B1 and B2 variables. % %AF = agefactor = agefact(age) (age in years) % %From Ijspeert, 1992. % %SEE: B1calc, B2calc, agefact. b = (9000-(936*(AF^.5))); %equation for b calculation