Description

Provides access to the properties and methods defining an Radar object.

Object Model

Public Methods

IsRefractionTypeSupported	Gets a value indicating whether the specified type can be used
SetModel	Sets the current radar model by name.

Public Properties

Graphics	Get the 2D Graphics properties for the radar.
Model	Gets the current radar model.
Refraction	Refraction method, a member of the AgESnRefractionType enumeration.
RefractionModel	Gets a refraction model
RefractionSupportedTypes	Returns an array of valid choices
SupportedModels	Gets an array of supported model names.
UseRefractionInAccess	Flag controls whether refraction is applied when computing relative position in Access
VO	Get the 3D Graphics properties for the radar.

Example

Compute the probability of detection of a target for a monostatic search/track radar

[C#] Copy Code

IAgStkObject rdrAsStkObject = radar as IAgStkObject; 

IAgStkObject tgtAsStkObject = targetAircraft as IAgStkObject; 

 

//Enable the rain loss computation on the scenario RF environment 

scenarioRFEnv.PropagationChannel.EnableRainLoss = true; 

 

//Configure the radar object as a monostatic model. 

radar.SetModel("Monostatic"); 

IAgRadarModelMonostatic monostaticModel = radar.Model as IAgRadarModelMonostatic; 

 

//Orient the radar antenna in the direction of the target 

radar.Model.AntennaControl.EmbeddedModelOrientation.AssignAzEl(50.9, 36.8, AgEAzElAboutBoresight.eAzElAboutBoresightRotate); 

 

//Set the radar antenna model to parabolic 

radar.Model.AntennaControl.SetEmbeddedModel("Parabolic"); 

IAgAntennaModelParabolic parabolic = radar.Model.AntennaControl.EmbeddedModel as IAgAntennaModelParabolic; 

 

//Give the parabolic antenna a 2 deg beamwidth; 

parabolic.InputType = AgEAntennaModelInputType.eAntennaModelInputTypeBeamwidth; 

parabolic.Beamwidth = 2.0; 

 

//Put the monostatic radar model in Search/Track mode 

monostaticModel.SetMode("Search Track"); 

IAgRadarModeMonostaticSearchTrack searchTrackMode = monostaticModel.Mode as IAgRadarModeMonostaticSearchTrack; 

 

//Set the waveform type to fixed prf 

searchTrackMode.SetWaveformType(AgERadarWaveformSearchTrackType.eRadarWaveformSearchTrackTypeFixedPRF); 

IAgRadarWaveformMonostaticSearchTrackFixedPRF fixedPrf = searchTrackMode.Waveform as IAgRadarWaveformMonostaticSearchTrackFixedPRF; 

fixedPrf.PulseDefinition.Prf = 0.002; //2 kHz 

 

//Set the pulse width to 1e-8 sec 

fixedPrf.PulseDefinition.PulseWidth = 1.0e-8; //sec 

 

//Set the number of pulses 

fixedPrf.PulseDefinition.NumberOfPulses = 25; 

 

//Set the pulse integration strategy to goal SNR 

fixedPrf.PulseIntegrationType = AgERadarPulseIntegrationType.eRadarPulseIntegrationTypeGoalSNR; 

IAgRadarPulseIntegrationGoalSNR pulseIntGoalSNR = fixedPrf.PulseIntegration as IAgRadarPulseIntegrationGoalSNR; 

pulseIntGoalSNR.SNR = 40.0; //dB 

 

//Set the transmit frequency 

monostaticModel.Transmitter.FrequencySpecification = AgERadarFrequencySpec.eRadarFrequencySpecFrequency; 

monostaticModel.Transmitter.Frequency = 2.1; //GHz 

 

//Set the transmit power 

monostaticModel.Transmitter.Power = 50.0; //dBW 

 

//Enable rain loss computation on the receiver 

monostaticModel.Receiver.UseRain = true; 

monostaticModel.Receiver.RainOutagePercent = 0.001; 

 

//Enable the receiver system noise temperature computation. 

monostaticModel.Receiver.SystemNoiseTemperature.ComputeType = AgENoiseTempComputeType.eNoiseTempComputeTypeCalculate; 

 

//Enable the antenna noise temperature computation 

monostaticModel.Receiver.SystemNoiseTemperature.AntennaNoiseTemperature.ComputeType = AgENoiseTempComputeType.eNoiseTempComputeTypeCalculate; 

monostaticModel.Receiver.SystemNoiseTemperature.AntennaNoiseTemperature.UseRain = true; 

 

//Don't inherit the radar cross section settings from the scenario 

targetAircraft.RadarCrossSection.Inherit = false; 

IAgRadarCrossSectionModel rcs = targetAircraft.RadarCrossSection.Model as IAgRadarCrossSectionModel; 

 

//Set the radar cross section compute strategy to constan value 

rcs.FrequencyBands[0].SetComputeStrategy("Constant Value"); 

IAgRadarCrossSectionComputeStrategyConstantValue constValRcs = 

    rcs.FrequencyBands[0].ComputeStrategy as IAgRadarCrossSectionComputeStrategyConstantValue; 

 

//Set the constant radar cross section to 0.5 dBsm 

constValRcs.ConstantValue = 0.5; //dBsm 

 

//Create an access object for the access between the radar and target 

IAgStkAccess radarAccess = rdrAsStkObject.GetAccessToObject(tgtAsStkObject); 

 

//Compute access 

radarAccess.ComputeAccess(); 

 

// Get the access intervals 

IAgIntervalCollection accessIntervals = radarAccess.ComputedAccessIntervalTimes; 

 

// Extract the access intervals and the range information for each access interval 

Array dataPrvElements = new object[] { "Time", "S/T SNR1", "S/T PDet1", "S/T Integrated SNR", "S/T Integrated PDet" }; 

 

IAgDataPrvTimeVar dp = radarAccess.DataProviders["Radar SearchTrack"] as IAgDataPrvTimeVar; 

 

for (int index0 = 0; index0 < accessIntervals.Count; ++index0) 

{ 

    object startTime = null, stopTime = null; 

    accessIntervals.GetInterval(index0, out startTime, out stopTime); 

 

    IAgDrResult result = dp.ExecElements(startTime, stopTime, 60, ref dataPrvElements); 

 

    Array timeValues = result.DataSets.GetDataSetByName("Time").GetValues(); 

    Array snr1 = result.DataSets.GetDataSetByName("S/T SNR1").GetValues(); 

    Array pdet1 = result.DataSets.GetDataSetByName("S/T PDet1").GetValues(); 

    Array integSnr = result.DataSets.GetDataSetByName("S/T Integrated SNR").GetValues(); 

    Array integPdet = result.DataSets.GetDataSetByName("S/T Integrated PDet").GetValues(); 

 

    for (int index1 = 0; index1 < timeValues.GetLength(0); ++index1) 

    { 

        string time = (string)timeValues.GetValue(index1); 

        double snr1Val = (double)snr1.GetValue(index1); 

        double pdet1Val = (double)pdet1.GetValue(index1); 

        double integSnrVal = (double)integSnr.GetValue(index1); 

        double integPdetVal = (double)integPdet.GetValue(index1); 

        Console.WriteLine("{0}: SNR1={1} PDet1={2} Integrated SNR={3} Integrated PDet={4}", time, snr1Val, pdet1Val, integSnrVal, integPdetVal); 

    } 

 

    Console.WriteLine(); 

}

Compute the probability of detection of a target for a monostatic search/track radar

[Visual Basic .NET] Copy Code

Dim rdrAsStkObject As IAgStkObject = TryCast(radar, IAgStkObject)
Dim tgtAsStkObject As IAgStkObject = TryCast(targetAircraft, IAgStkObject)

'Enable the rain loss computation on the scenario RF environment
 scenarioRFEnv.PropagationChannel.EnableRainLoss = True

'Configure the radar object as a monostatic model.
 radar.SetModel("Monostatic")
Dim monostaticModel As IAgRadarModelMonostatic = TryCast(radar.Model, IAgRadarModelMonostatic)

'Orient the radar antenna in the direction of the target
 radar.Model.AntennaControl.EmbeddedModelOrientation.AssignAzEl(50.9, 36.8, AgEAzElAboutBoresight.eAzElAboutBoresightRotate)

'Set the radar antenna model to parabolic
 radar.Model.AntennaControl.SetEmbeddedModel("Parabolic")
Dim parabolic As IAgAntennaModelParabolic = TryCast(radar.Model.AntennaControl.EmbeddedModel, IAgAntennaModelParabolic)

'Give the parabolic antenna a 2 deg beamwidth;
 parabolic.InputType = AgEAntennaModelInputType.eAntennaModelInputTypeBeamwidth
 parabolic.Beamwidth = 2

'Put the monostatic radar model in Search/Track mode
 monostaticModel.SetMode("Search Track")
Dim searchTrackMode As IAgRadarModeMonostaticSearchTrack = TryCast(monostaticModel.Mode, IAgRadarModeMonostaticSearchTrack)

'Set the waveform type to fixed prf
 searchTrackMode.SetWaveformType(AgERadarWaveformSearchTrackType.eRadarWaveformSearchTrackTypeFixedPRF)
Dim fixedPrf As IAgRadarWaveformMonostaticSearchTrackFixedPRF = TryCast(searchTrackMode.Waveform, IAgRadarWaveformMonostaticSearchTrackFixedPRF)
 fixedPrf.PulseDefinition.Prf = 0.002
'2 kHz
'Set the pulse width to 1e-8 sec
 fixedPrf.PulseDefinition.PulseWidth = 1E-08
'sec
'Set the number of pulses
 fixedPrf.PulseDefinition.NumberOfPulses = 25

'Set the pulse integration strategy to goal SNR
 fixedPrf.PulseIntegrationType = AgERadarPulseIntegrationType.eRadarPulseIntegrationTypeGoalSNR
Dim pulseIntGoalSNR As IAgRadarPulseIntegrationGoalSNR = TryCast(fixedPrf.PulseIntegration, IAgRadarPulseIntegrationGoalSNR)
 pulseIntGoalSNR.SNR = 40
'dB
'Set the transmit frequency
 monostaticModel.Transmitter.FrequencySpecification = AgERadarFrequencySpec.eRadarFrequencySpecFrequency
 monostaticModel.Transmitter.Frequency = 2.1
'GHz
'Set the transmit power
 monostaticModel.Transmitter.Power = 50
'dBW
'Enable rain loss computation on the receiver
 monostaticModel.Receiver.UseRain = True
 monostaticModel.Receiver.RainOutagePercent = 0.001

'Enable the receiver system noise temperature computation.
 monostaticModel.Receiver.SystemNoiseTemperature.ComputeType = AgENoiseTempComputeType.eNoiseTempComputeTypeCalculate

'Enable the antenna noise temperature computation
 monostaticModel.Receiver.SystemNoiseTemperature.AntennaNoiseTemperature.ComputeType = AgENoiseTempComputeType.eNoiseTempComputeTypeCalculate
 monostaticModel.Receiver.SystemNoiseTemperature.AntennaNoiseTemperature.UseRain = True

'Don't inherit the radar cross section settings from the scenario
 targetAircraft.RadarCrossSection.Inherit = False
Dim rcs As IAgRadarCrossSectionModel = TryCast(targetAircraft.RadarCrossSection.Model, IAgRadarCrossSectionModel)

'Set the radar cross section compute strategy to constan value
 rcs.FrequencyBands(0).SetComputeStrategy("Constant Value")
Dim constValRcs As IAgRadarCrossSectionComputeStrategyConstantValue = TryCast(rcs.FrequencyBands(0).ComputeStrategy, IAgRadarCrossSectionComputeStrategyConstantValue)

'Set the constant radar cross section to 0.5 dBsm
 constValRcs.ConstantValue = 0.5
'dBsm
'Create an access object for the access between the radar and target
Dim radarAccess As IAgStkAccess = rdrAsStkObject.GetAccessToObject(tgtAsStkObject)

'Compute access
 radarAccess.ComputeAccess()

' Get the access intervals
Dim accessIntervals As IAgIntervalCollection = radarAccess.ComputedAccessIntervalTimes

' Extract the access intervals and the range information for each access interval
Dim dataPrvElements As Array = New Object() {"Time", "S/T SNR1", "S/T PDet1", "S/T Integrated SNR", "S/T Integrated PDet"}
     accessIntervals.GetInterval(index0, startTime, stopTime)
     Dim result As IAgDrResult = dp.ExecElements(startTime, stopTime, 60, dataPrvElements)

CoClasses that Implement IAgRadar

Name
AgRadar

AGI STK Objects 11	Send comments on this topic.
IAgRadar Interface