kx_aa(i5)
abm(f20.14)
ajm(f20.14)
b2m(f20.14)
arms(f10.6)
