ocos
xr2 = (*xr * ocos(az) + *yr * osin(az));
yr2 = (*xr * osin(az) - *yr * ocos(az));
xr2 = (*xr * ocos(ay) + *zr * osin(ay));
zr2 = (*xr * osin(ay) - *zr * ocos(ay));
zr2 = (*zr * ocos(ax) + *yr * osin(ax));
yr2 = (*zr * osin(ax) - *yr * ocos(ax));
ob = 140 * ocos(b);