R-DAS FLIGHT #8 DETAILS
Flight #: 8
Date: 3rd of March, 2002
Venue: EARS, Elsworth, Cambridgeshire
R-DAS Type: R-DAS Compact
R-DAS firmware: 3.1
R-DAS Recorded Altitude: 2495 feet (756 metres)
Apogee - Charge Firing Delta-t: 1.6 seconds
Apogee - Charge Firing Delta-h: 27 feet (8.2 metres)
Descent Rate at Apogee Deployment: 17 feet per second (5.1 metres per second)
R-DAS Flight Mode: Apogee & Main Ejection (breakwire launch detection & smart recovery)
Total Time of Flight: 104 seconds
Apogee - Charge Firing h Variance: 1.1%
Launch Vehicle Diameter: 4 inches
Launch Vehicle Length: 5 feet 6 inches
Launch Vehicle Propulsion: Hypertek J-250 Hybrid
440/54-125-J (0.125 injector orifice)
Fins: 4 clipped swept deltas (Aerofoiled)
Launch System: Rail Launch
Finish: Unfinished
Ejection Method: Electronic Deployment using apogee charge in SafeEject canister, then main charge in SafeEject canister as backup
Ejection Ignition Type: Daveyfire igniters (electric matches)
Launch Vehicle Mass: 3.5 kg (vehicle with hybrid motor but no oxidiser loaded)
Total Propellant Mass: 405 grams
Total Loaded Motor Mass: 1294 grams
Total Impulse: 737 Newton seconds
|
|
 |
| Comments The second flight of this rocket, launched again on the Hypertek J-250 hybrid rocket motor (using a 440cc oxidiser tank). Launched in moderate winds, the rocket followed a pretty straight trajectory, with some fishtailing on the ascent. Single stage recovery was used, and the descent, under a 44" PML parachute was quite gentle.
The R-DAS used breakwire launch triggering with smart recovery. This option was chosen because the oscillation in Hypertek motor combustion has been known to result in irregular launch triggering of the R-DAS. The breakwire and smart recovery option worked perfectly, and both ejection channels fired on cue.
| |
 | | Thrust Section of Flight | |
|
 |
|
#!/usr/bin/perl -w
use strict;
use CGI qw(:escape);
use CGI;
use lib qw(/home/rosborne/lib);
use Astro::Sunrise;
use Astro::MoonPhase;
use vars qw($query);
my $query = new CGI;
print $query->header();
#print "Content-type: text/html\n\n";
my $sec = 0;
my $mday = 0;
my $mon = 0;
my $year = 0;
my $wday = 0;
my $yday = 0;
my $isdst = 0;
my $tz = 0;
my $hr = 0;
my $min = 0;
my @days = ();
my @shortdays = ();
my @months = ();
my @shortmonths = ();
my $longyr = 0;
my @cnts;
my $filename;
my $found;
my $counts;
my $cnt;
my $page;
my $showcnt;
my $cnts;
my $blk;
my $sunrise;
my $sunset;
my ($MoonPhase,$MoonIllum,$MoonAge,$MoonDist,$MoonAng,$SunDist,$SunAng);
sub determine_date
{
@days = ("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
@shortdays = ("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
@months = ("January","February","March","April","May","June","July","August","September","October","November", "December");
@shortmonths = ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
($sec,$min,$hr,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$longyr = $year + 1900;
if ($isdst == 1) {
$tz = "GMT";
} else {
$tz = "GMT";
}
}
sub display_date
{
print "$shortdays[$wday], $shortmonths[$mon] $mday, $longyr, ";
printf("%02d:%02d $tz\n", $hr, $min);
}
### Open File and Read All Data
open (FILE, "counts.txt");
@cnts = ;
close(FILE);
### Delete Old File Before ReWriting it with New Data
$filename = "counts.txt";
if (-e $filename) { unlink("$filename"); }
### Create and Open New File ReInput Old Data While Updating New
$found = 0;
open (NEWFILE,">counts.txt") || die $!;
foreach $cnts(@cnts) {
($page,$cnt,$blk) = split(/\|/, $cnts);
if ($page eq $ENV{'DOCUMENT_URI'}) {
$cnt++;
$showcnt = $cnt;
print NEWFILE "$page|$cnt| \n";
$found = 1;
}
else {
print NEWFILE "$cnts";
}
}
### First Time Counting the New Page
if ($found == 0) {
if ($ENV{'DOCUMENT_URI'} ne "") {
print NEWFILE "$ENV{'DOCUMENT_URI'}|1| \n";
$showcnt = 1;
}
}
&determine_date;
print "";
print "";
&display_date;
print "<\/STRONG><\/font>";
### Print the Count on the Page
print "";
print "($showcnt)";
print "<\/font>";
($sunrise, $sunset) = sunrise( $year, $mon, $mday, 0.1250, 51.3440, 0, 0 );
print "";
print " ![](\"../images/sunrise.gif\") ", $sunrise;
print " ![](\"../images/sunset.gif\") ", $sunset;
print "<\/STRONG><\/font>";
($MoonPhase,$MoonIllum,$MoonAge,$MoonDist,$MoonAng,$SunDist,$SunAng) = &phase(time);
print "";
print " ![](\"../images/moon.gif\") ";
printf("%02d\n", ($MoonPhase*100));
print "% ";
# print " Dist: ", $MoonDist;
print "<\/STRONG><\/font>";
print "<\/td><\/tr><\/table>";
|
home - space - research - links - contact me - colophon
Richard Osborne - 1995-2006 |
| |
