diff --git a/examples/leo-delay-tracing-example.cc b/examples/leo-delay-tracing-example.cc
new file mode 100644
index 0000000..023030c
--- /dev/null
+++ b/examples/leo-delay-tracing-example.cc
@@ -0,0 +1,109 @@
+/* -*- Mode:C++; c-file-style:"gnu"; indent-tabs-mode:nil; -*- */
+
+#include "ns3/core-module.h"
+#include "ns3/mobility-module.h"
+#include "ns3/leo-module.h"
+#include "ns3/network-module.h"
+#include "ns3/aodv-module.h"
+
+using namespace ns3;
+
+NS_LOG_COMPONENT_DEFINE ("LeoDelayTracingExample");
+
+static void
+EchoTx (std::string context, Ptr<const Packet> packet)
+{
+  std::cout << context << ",ClientTx," << packet << std::endl;
+}
+
+static void
+EchoRx (std::string context, Ptr<const Packet> packet)
+{
+  std::cout << context << ",ClientRx," << packet << std::endl;
+}
+
+static void
+EchoServerRx (std::string context, Ptr<const Packet> packet)
+{
+  std::cout << context << ",ServerRx," << packet << std::endl;
+}
+
+int main (int argc, char *argv[])
+{
+  NodeContainer satellites;
+  for (double incl: { 70.0, 100.0 })
+    {
+      NodeContainer c;
+      c.Create (10*10);
+
+      MobilityHelper mobility;
+      mobility.SetPositionAllocator ("ns3::LeoCircularOrbitPostionAllocator",
+                                     "NumOrbits", IntegerValue (10),
+                                     "NumSatellites", IntegerValue (10));
+      mobility.SetMobilityModel ("ns3::LeoCircularOrbitMobilityModel",
+  			     	 "Altitude", DoubleValue (1200.0),
+  			     	 "Inclination", DoubleValue (incl),
+  			     	 "Precision", TimeValue (Minutes (1)));
+      mobility.Install (c);
+      satellites.Add (c);
+    }
+
+  LeoGndNodeHelper ground;
+  NodeContainer stations = ground.Install ("contrib/leo/data/ground-stations/airports-60.waypoints");
+
+  NetDeviceContainer islNet, utNet;
+
+  IslHelper islCh;
+  islCh.SetDeviceAttribute ("DataRate", StringValue ("10Mbps"));
+  islCh.SetDeviceAttribute ("ReceiveErrorModel", StringValue ("ns3::BurstErrorModel"));
+  islCh.SetChannelAttribute ("PropagationDelay", StringValue ("ns3::ConstantSpeedPropagationDelayModel"));
+  islCh.SetChannelAttribute ("PropagationLoss", StringValue ("ns3::IslPropagationLossModel"));
+  islNet = islCh.Install (satellites);
+
+  LeoChannelHelper utCh;
+  utCh.SetConstellation ("TelesatUser");
+  utNet = utCh.Install (satellites, stations);
+
+  // Install internet stack on nodes
+  AodvHelper aodv;
+  InternetStackHelper stack;
+  stack.SetRoutingHelper (aodv);
+  stack.Install (satellites);
+  stack.Install (stations);
+
+  // Make all networks addressable for legacy protocol
+  Ipv4AddressHelper ipv4;
+  ipv4.SetBase ("10.1.0.0", "255.255.0.0");
+  Ipv4InterfaceContainer islIp = ipv4.Assign (islNet);
+  ipv4.SetBase ("10.3.0.0", "255.255.0.0");
+  Ipv4InterfaceContainer utIp = ipv4.Assign (utNet);
+
+  // we want to ping terminals
+  UdpEchoServerHelper echoServer (9);
+  ApplicationContainer serverApps = echoServer.Install (stations.Get (1));
+
+  // install a client on one of the terminals
+  ApplicationContainer clientApps;
+  Address remote = utIp.GetAddress (3, 0);
+  UdpEchoClientHelper echoClient (remote, 9);
+  echoClient.SetAttribute ("MaxPackets", UintegerValue (10));
+  echoClient.SetAttribute ("Interval", TimeValue (Seconds (1.0)));
+  echoClient.SetAttribute ("PacketSize", UintegerValue (1024));
+  clientApps.Add (echoClient.Install (stations.Get (0)));
+
+  Config::Connect ("/NodeList/*/ApplicationList/*/$ns3::UdpEchoServer/Rx",
+  		   MakeCallback (&EchoServerRx));
+  Config::Connect ("/NodeList/*/ApplicationList/*/$ns3::UdpEchoClient/Rx",
+  		   MakeCallback (&EchoRx));
+  Config::Connect ("/NodeList/*/ApplicationList/*/$ns3::UdpEchoClient/Tx",
+  		   MakeCallback (&EchoTx));
+
+  serverApps.Start (Seconds (1));
+  clientApps.Start (Seconds (2));
+
+  Simulator::Stop (Seconds (10));
+  Simulator::Run ();
+  Simulator::Destroy ();
+
+  return 0;
+}