... Bad Astronomy . Misconceptions . ... Site Info . ... This page is basically a list of links to websites that either support or refute the claim that NASA never sent men to the Moon. I have my own detailed rebuttal of the Fox television program ``Conspiracy Theory: Did We Land On The Moon?'' in my Bad TV section . ... I plan on having a thorough debunking of this on this site eventually. ... Below are listed pages by both the conspiracy theorists and the debunkers. ... 2008 Phil Plait. ...

... Driving To The Sun . ... Credit: EIT - SOHO Consortium, ESA , NASA Explanation: How long would it take to drive to the Sun? Brittany, age 7, and D.J., age 12, ponder this question over dinner one evening. ... Let's see ... the Sun is 93 million miles away . So, if we drove 93 miles per hour the trip would only take us 1 million hours." ... One hundred years would be 876,000 hours, still a little short of the 1 million hour drive time -- so the Sun is really quite far away . ...

Function: SPFPLF Purpose: Converts Single Precision Floating Point numbers from Local format to Foreign format. Category: DATA File: floating.c Author: K.G. Begeman Use: INTEGER SPFPLF( FTYPE , Input INTEGER FIN , Input REAL ARRAY FOUT , Output REAL ARRAY NF ) Input INTEGER SPFPLF Returns the number of BLANKS inserted because input reals cannot be represented in local reals, or -1 if FTYPE is unknown. ... FOUT Output real array containing the converted reals in foreign format. ...

. ___________________________________________________________________ The Electronic Universe Project e-mail: nuts@moo.uoregon.edu

... function getBinNumber(xBinEdges, x) result(binNum) real(single), intent(in) :: xBinEdges(:), x integer(int32) :: binNum end function . In a commonly encountered situation, one has a set of bins defined by a vector of bin edges xBinEdges, plus a real number x, and it is desired to know into which bin x falls. ... The returned value obeys in general the rule . ... It is up to the calling routine to catch these instances if it is necessary to prevent this return value from occurring. ...

PROGRAM SUMMATION ! Summation forwards and backwards of 1/n^2 IMPLICIT NONE INTEGER :: N, NMAX CHARACTER :: ANSWER REAL :: SUM_SP, TEMP DOUBLE PRECISION :: SUM_DP INTEGER, PARAMETER :: QUAD = SELECTED_REAL_KIND(20,1000) REAL(KIND=QUAD) :: SUM_QUAD SUM_SP = 0.0 SUM_DP = 0.0D0 SUM_QUAD = 0.0_QUAD 1 WRITE(*,'(A)', ADVANCE='NO') 'How many numbers do you wish to add? ... 10) THEN WRITE(*,*) 'Too few numbers!' GO TO 1 ELSE IF (NMAX .GT. 100000000) THEN WRITE(*,*) 'Too many numbers!' ...

... Space Flight . ... Earth Satellites . ... The first satellite launched into orbit was Sputnik€а 1 (meaning ?Traveller?), launched in 1957 by the Soviet Union. ... Space Shuttle creeping to the pad to launch the Misty satellite into orbit? ... The Misty is not the only mystery in orbit, another potential covert satellite is known as Prowler. ... However there does seem to be enough substantiated sightings and evidence to suggest there are or perhaps were real mystery satellites orbiting the Earth. ...

Astronomy Discussion Forums . ... Not Really . ... Posted by Harvey on October 28, 2002 05:34:32 UTC . ... Trudging through murky waters - harvey1 - October 30, 2002 - 15:30 UTC . What are you afraid of? - doctordick - November 1, 2002 - 02:34 UTC . Nothing psychological here - harvey1 - November 1, 2002 - 19:32 UTC . ... Chuckle (nt) - harvey1 - November 1, 2002 - 21:59 UTC . Dick is in serious need of rewording - harvey1 - November 1, 2002 - 22:03 UTC . ... www.astronomy.net . ...

... number of particles integer, parameter :: max_list = 100 ! max number of particles per cell integer, parameter :: ncell = 20 ! ... cell size real(dp) posn(3, npart) ! ... initialise cell list call init_cell_list(npart, ncell, max_list, cell_size, posn, & cell_num, cell_list) ! now go and do something interesting with it... contains subroutine init_cell_list(npart, ncell, max_list, cell_size, posn, & cell_num, cell_list) implicit none integer, parameter :: dp = kind(1.0d0) integer npart ! ...