Re: Book: The Life of the Cosmos

Michael Lorrey (retroman@tpk.net)
Mon, 07 Jul 1997 22:19:11 -0400


Hal Finney wrote:
>
>> (quoting smolin)
>
> (http://www.edge.org/3rd_culture/smolin/smolin_p1.html)
>
> If we wanted to extend this in an Extropian direction, we might assume that
> a universe which allows the formation of intelligent life will produce an
> extra-large number of progeny thanks to the intervention of those life forms.
> There are, however, some problems with this idea. Why create unpopulated
> universes?.
>
> Hal

Why create dead planets?

This presupposes that those universes most likely to create progeny are
those that develop life, that the odds of any one universe being without
life or being born by a universe without life become exceedingly smaller
as the evolution of the multiverse proceeds.

This conclusion rests on the assumption that intelligent life forms are
eventually able to create far more singluarities than would be likely to
form by normal star evolution. Of course, if constants like the
gravitational constant were any less, there would be no singularies, or
far fewer of them, and with a smaller stellar population, the potential
number of or probability of intelligent life evolving becomes less.

I'm not so cosmologically skilled, but can anyone make any guesses as to
what constants could be different enough to allow a much higher rate of
light speed, yet still allow life?

-- 
TANSTAAFL!!!
			Michael Lorrey
------------------------------------------------------------
mailto:retroman@tpk.net		Inventor of the Lorrey Drive
Agent Lorrey@ThePentagon.com
Silo_1013@ThePentagon.com	http://www.tpk.net/~retroman/

Mikey's Animatronic Factory My Own Nuclear Espionage Agency (MONEA) MIKEYMAS(tm): The New Internet Holiday Transhumans of New Hampshire (>HNH) ------------------------------------------------------------ #!/usr/local/bin/perl-0777---export-a-crypto-system-sig-RC4-3-lines-PERL @k=unpack('C*',pack('H*',shift));for(@t=@s=0..255){$y=($k[$_%@k]+$s[$x=$_ ]+$y)%256;&S}$x=$y=0;for(unpack('C*',<>)){$x++;$y=($s[$x%=256]+$y)%256; &S;print pack(C,$_^=$s[($s[$x]+$s[$y])%256])}sub S{@s[$x,$y]=@s[$y,$x]}