Add(MainForm,2953706,175,287)
{
 link(onCreate,1279666:doCalc,[])
}
Add(MathParse,1279666,245,301)
{
 DataCount=4
 MathStr="(ArcCos(Sin(%1*pi/180) * Sin(%3*pi/180) + Cos(%1*pi/180) * Cos(%3*pi/180) * Cos((%2*pi/180) - (%4*pi/180)))) * 6371"
 link(onResult,8434772:doMessage,[])
 link(X1,8304978:Value,[])
 link(X2,15866633:Value,[])
 link(X3,11845072:Value,[])
 link(X4,11361973:Value,[])
}
Add(Memory,8304978,245,252)
{
 Default=String(34.88922)
}
Add(Memory,15866633,252,210)
{
 Default=String(-72.04978)
}
Add(Memory,11845072,259,168)
{
 Default=String(48.35889)
}
Add(Memory,11361973,266,126)
{
 Default=String(2.59583)
}
Add(Message,8434772,308,301)
{
}