|
社体运协字〔2005〕74号
信鸽电子计时产品生产企业：
为统一各企业计时产品空距计算数据，减少不同GPS计算公式造成的空距差异，提高全国性和地区间信鸽比赛成绩的准确性。经研究决定，从现在起统一全国信鸽竞翔比赛空距测量GPS计算公式。现将公式发给你们，请遵照执行。
二○○五年八月三十一日
主题词：信鸽协会 通知 抄送：各省、自治区、直辖市、火车头、石油信鸽协会
附：GPS计算公式
*para u_x1,u_y1,u_x2,u_y2priv u_dxy,u_x,u_y,u_mx1,u_mx2,u_my1,u_my2,tmpanyif u_x1=0 .and. u_y1=0 u_xy=0 return u_xyendif
u_dxy=3.141592654 && 圆周率tmpany=str((u_x1-int(u_x1))*10000,4)u_mx1=int(u_x1)+(val(left(tmpany,2))/60)+(val(right(tmpany,2))/3600)
tmpany=str((u_y1-int(u_y1))*10000,4)u_my1=int(u_y1)+(val(left(tmpany,2))/60)+(val(right(tmpany,2))/3600)
tmpany=str((u_x2-int(u_x2))*1000000,6)u_mx2=int(u_x2)+(val(left(tmpany,2))/60)+(val(substr(tmpany,3,2))/3600)+(val(right(tmpany,2))/360000)
tmpany=str((u_y2-int(u_y2))*1000000,6)u_my2=int(u_y2)+(val(left(tmpany,2))/60)+(val(substr(tmpany,3,2))/3600)+(val(right(tmpany,2))/360000)
u_x=(round((111.3200144*cos(dtor(u_my1))+111.3200144*cos(dtor(u_my2)))*(u_mx1-u_mx2)/2,7))**2u_y=(round(110.9481458*(u_my1-u_my2),7))**2*u_x=((12756.334*u_dxy/360*cos(dtor(u_my1))+12756.334*u_dxy/360*cos(dtor(u_my2)))*(u_mx1-u_mx2)/2)**2*u_y=(12713.721*u_dxy/360*(u_my1-u_my2))**2
tmpany=round(sqrt(u_x+u_y)*1000,0)u_xy=iif(tmpany>=9999999,9999999,tmpany)*u_xy=u_xy/1000replace sv with u_xy@ 13, 35 say u_xyreturn
点击下载计算公式
咨询电话：13701195878，010-83671088转12联 系 人：张 龙 |