From fateman@parker.EECS.Berkeley.EDU Sun Jun 26 18:46:11 1994
Mathematica 2.2 for HP9000 Series 700
Copyright 1988-93 Wolfram Research, Inc.
-- Athena graphics initialized --
In[1]:= SetDirectory["dingle"]
Out[1]= /home/n/prof/fateman/dingle
...
In[3]:= < Cut[-Infinity, 0, (-1) #1 & ]}
In[10]:= Re[(-1)^(1/3)]
1
Out[10]= -
2
In[11]:= Im[(-1)^(1/3)]
Sqrt[3]
Out[11]= -------
2
In[12]:= BranchCuts[Fn[z,Log[z+1]-Log[z-1]]]
Out[12]= {Cut[-1, 1, Identity]}
(* but BranchCuts[Fn[z,Log[z+a]-Log[z-a]]] ==> = {} *)
In[10]:=
In[13]:= BranchCuts[Fn[z,Log[z^2+1]]]
Out[13]= {Cut[-Infinity, -1, I #1 & ], Cut[1, Infinity, I #1 & ]}
In[14]:= BranchCuts[Fn[z,Log[z^r+1]]]
(* Isn't this inconsistent with the above answer?*)
1/r
Out[14]= {Cut[-Infinity, 0, Identity], Cut[-Infinity, -1, #1 & ]}
In[15]:= BranchCuts[Fn[z,Sin[z]]]
Out[15]= {}
In[16]:= BranchCuts[Fn[z,Sin[1/z]]]
Out[16]= {}
In[17]:= BranchCuts[Fn[z,1/Sin[z]]]
Out[17]= {}
In[18]:= BranchCuts[Fn[z,Log[Sin[z]]]]
Join::heads: Heads Equal and List at positions 1 and 2
are expected to be the same.
Join::heads: Heads Equal and List at positions 1 and 2
are expected to be the same.
1
Solve::eqf: Auxiliary[Join[------------- == 0, {}]]
2
Sqrt[1 - #1 ]
is not a well-formed equation.
Join::heads: Heads Equal and List at positions 1 and 2
are expected to be the same.
General::stop: Further output of Join::heads
will be suppressed during this calculation.
ReplaceAll::reps:
1
{Join[------------- == 0, {}, {}]}
2
Sqrt[1 - #1 ]
is neither a list of replacement rules nor a valid dispatch table, and so
cannot be used for replacing.
ReplaceAll::reps:
{{#1}} is neither a list of replacement rules nor a valid dispatch table,
and so cannot be used for replacing.
1
Solve::eqf: {#1} /. Join[------------- == 0, {}, {}]
2
Sqrt[1 - #1 ]
is not a well-formed equation.
ReplaceAll::reps:
{False} is neither a list of replacement rules nor a valid dispatch table,
and so cannot be used for replacing.
General::stop: Further output of ReplaceAll::reps
will be suppressed during this calculation.
Solve::argm: Solve called with 0 arguments; 1 or more arguments are expected.
Out[18]= {}
In[19]:=