🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: sci.math.symbolic
Article #971

Mathematica bug?

#971
From: Peter JB King
Date: Mon, 25 Jan 1993 12:45
33 lines
1570 bytes
I have found what appears to be some form of bug in Mathematica (
Version 2.1 for SPARC).  The following program includes as part of its
output

 Simplify`Gamma`Private`SimpGamma1 
 
which appears to be some sort of internal definition.  I can find no
mention of SimpGamma1 in the documentation.  Intuitively, it looks like
some sort of rule to simplify Gamma fundtions, but it does not appear to
have any arguments.  Is the answer I get correct if I replace this by
'1'?

Here is the program that demonstrates the bug.

rstar[s_] := tau / (tau + s )
rbar = 1/tau

b[t_] := mu E^(-mu t )
bstar[s_] := mu / (mu + s )
bbar = 1/mu


pstar[s_] := ( s + gamma ) Integrate[ E^(-(s+gamma)t) b[t] /
		(s + gamma(1 - rstar[s](1-E^(-(s+gamma)t)))), { t, 0,
								Infinity}] 
Print[pstar[s]]


-- 
Peter King, Computing & Electrical Eng.	JANET:	pjbk@uk.ac.hw.cee
  Heriot-Watt University		ARPA:	pjbk@cee.hw.ac.uk
  Riccarton, Edinburgh EH14 4AS 	UUCP:	..!uknet!cee.hw.ac.uk!pjbk
Phone: (+44) 31 451 3433                Fax: (+44) 31 451 3431
Technical Details
Message-ID: <1993Jan25.124536.27674@cs.hw.ac.uk>
Path: arc1-ca.pugleaf.net!sparky!uunet!pmafire!news.dell.com!natinst.com!cs.utexas.edu!zaphod.mps.ohio-state.edu!howland.reston.ans.net!spool.mu.edu!agate!doc.ic.ac.uk!uknet!edcastle!hwcs!pjbk

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!pmafire!news.dell.com!natinst.com!cs.utexas.edu!zaphod.mps.ohio-state.edu!howland.reston.ans.net!spool.mu.edu!agate!doc.ic.ac.uk!uknet!edcastle!hwcs!pjbk
From: pjbk@cs.hw.ac.uk (Peter JB King)
Newsgroups: sci.math.symbolic
Subject: Mathematica bug?
Message-ID: <1993Jan25.124536.27674@cs.hw.ac.uk>
Date: 25 Jan 93 12:45:36 GMT
Sender: news@cs.hw.ac.uk (News Administrator)
Organization: Dept of Computing & Electrical Engineering, Heriot-Watt University, Scotland
Lines: 33