Astro :: Coord :: Eci :: Tle :: Iridium

Computamiento del comportamiento de los satélites de iridio
Descargar ahora

Astro :: Coord :: Eci :: Tle :: Iridium Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Precio:
  • FREE
  • Nombre del editor:
  • Tom Wyant
  • Sitio web del editor:
  • http://search.cpan.org/~wyant/

Astro :: Coord :: Eci :: Tle :: Iridium Etiquetas


Astro :: Coord :: Eci :: Tle :: Iridium Descripción

Computando el comportamiento de los satélites de iridio. Astro :: Coord :: Eci :: Tle :: Iridium es un módulo PERL para calcular el comportamiento de los satélites de Iridium. Siguiente es un script semi-breve para calcular las llamaradas de iridio. Tendrá que sustituir su propia ubicación donde se indique. Usa Astro :: SpaceTrack; Use Astro :: Coord :: ECI; Use Astro :: Coord :: Eci :: Tle; Use Astro :: Coord :: eci :: utils qw {deg2rad rad2deg}; # 1600 Avenue Pennsylvania, Washington DC, USA My $ your_north_latitude_in_degrees = 38.898748; My $ your_east_longitude_in_degrees = -77.037684; My $ your_height_above_sea_level_in_meters = 16.68; # Crear objeto que representa la ubicación de los observadores. # Tenga en cuenta que la entrada a la geodética () es latitud norte # y longitud al oeste, en radianes y altura sobre el nivel del mar en kilómetros. MY $ LOC = Astro :: Coord :: Eci-> Geodética (DEG2RAD ($ your_north_latitude_in_degrees), deg2rad ($ your_east_longitude_in_degrees), $ your_height_above_sea_level_in_meters / 1000); # Obtener todos los datos de iridium de Celestrak; Es Direct- # Fetched, por lo que no se necesita contraseña. My $ ST = Astro :: SpaceTrack-> Nuevo (Direct => 1); My $ DATA = $ ST-> CELESTRAK ('Iridium'); $ data-> is_success o die $ data-> status_line; # Analizar los datos recuperados, produciendo objetos de iridio. my @sats = astro :: coord :: eci :: tle-> analizar ($ data-> contenido); # Queremos bengalas durante los próximos 2 días. Para intentar # duplicar http://www.heavens-above.com/ tan cerca como # Posible, tiramos el dimmer de las llamaradas diurnas que -6, # y Nighttime Bloss Dimmer que -1. También calculamos # bengalas para repuestos, y asumir la noche es cada vez que el sol # está debajo del horizonte. My $ START = Time (); My $ Finalmente = $ Inicio + 2 * 86400; Mis @flares; MI% MAG_LIMIT = (am => -1, día => -6, PM => -1); foreach mis $ irid (@sats) {$ irid-> can_flare (1) o siguiente; $ IRID-> SET (Twilight => 0); Foreach My $ Flare ($ Irid-> Flare ($ LOC, $ START, $ Finalmente)) {$ Flare -> {Magnituy} {Type}} y Push @Flares, $ Flare; }} Imprimir {HORA}} @FLARES) {# Si queríamos hacer uso del objeto Iridium que # produjo la flare (por ejemplo, para obtener coordenadas de # Permayant Equatorial #). Tendríamos que establecer el tiempo primero. ## $ Flare -> {Body} -> Universal ($ Flare -> {Time}); # Los ángulos devueltos están en radianes, por lo que tenemos que volver a convertirnos a grados. Printf "% s% -15s% 9.1f% 9.1f% 5.1f ", Scalar Localtime $ Flare -> {Time}, $ Flare -> {Body} -> Obtener ('Nombre'), Rad2Deg ($ Flare -> {elevación}), Rad2DEG ($ Flare -> {Azimut}), $ flare -> {magnitud};} Esta clase es una subclase de astro :: coord :: eci :: tle, representando satélites de iridium. El astro :: coord :: eci :: tle-> el método de análisis hace uso de En los datos para determinar qué satélites se rebelan en esta clase, según la ID de Satcat de Norad's del objeto. Estos datos internos se pueden modificar utilizando el método Astro :: Coord :: Eci :: Tle-> Estado para corregir errores o para la investigación histórica. También es posible obtener un objeto de iridium llamando $ tle-> riss (iridium => {status => $ status}) directamente. Lo que agrega esta subclase es la capacidad de generar información sobre las llamaradas de iridium (o destellos, ya que son También se llama). Los miembros de esta clase se consideran capaces de generar bengalas basadas en su estado, de la siguiente manera: 0 => en servicio 1 => SALE (MAYOR) (MAYOR) 2 => Falló - Sin flojas predecibles. Estilo de celestrak Estados ('+', 's', y '-' respectivamente y) son aceptados en la entrada. Consulte Astro :: Método SpaceTrack Iridium_Status para obtener una forma de obtener el estado actual de la constelación de iridio. Requisitos: · Perl


Astro :: Coord :: Eci :: Tle :: Iridium Software relacionado