e9da3c0313
All the files compile. The code generation was not tested yet.
34 lines
2.2 KiB
Plaintext
34 lines
2.2 KiB
Plaintext
open TypeTracks
|
|
open TypeBase
|
|
|
|
const kinittrack : TypeTracks.ttrack = { t_pos = { x = 0.0;
|
|
y = 0.0 };
|
|
t_id = 0 }
|
|
|
|
const kinitrdrtrack : TypeTracks.trdrtrack = { r_pos = { x = 0.0;
|
|
y = 0.0 };
|
|
r_s = { sx = 0.0;
|
|
sy = 0.0 };
|
|
r_d = 0.0;
|
|
r_sabs = 0.0;
|
|
r_sr = 0.0 }
|
|
|
|
const kinitmissiontrack : TypeTracks.tmissiontrack = { m_pos = { x = 0.0;
|
|
y = 0.0 };
|
|
m_speed = { sx = 0.0;
|
|
sy = 0.0 };
|
|
m_id = 0;
|
|
m_priority = 0;
|
|
m_d = 0.0;
|
|
m_sabs = 0.0;
|
|
m_sr = 0.0;
|
|
m_detectedbyradar = false;
|
|
m_detectedbyiff = false;
|
|
m_tracknumber = 0;
|
|
m_targettype = TypeBase.Ttargettype_unknown;
|
|
m_isvisible = false;
|
|
m_angle = 0.0 }
|
|
|
|
const kinitifftrack : TypeTracks.tifftrack = { i_pos = { x = 0.0;
|
|
y = 0.0 };
|
|
i_id = 0 } |