Nicolas Cellier uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-nice.185.mcz

==================== Summary ====================

Name: KernelTests-nice.185
Author: nice
Time: 23 April 2011, 4:13:56.564 am
UUID: 441dcf6c-efec-4f3b-b3df-86614f714dc4
Ancestors: KernelTests-nice.184

More Complex functions tests

=============== Diff against KernelTests-nice.184 ===============

Item was changed:
  ----- Method: ComplexTest>>testArCosh (in category 'tests') -----
  testArCosh
  	| c |
  	c := (2.5 + 0 i).
  	self assert: (c arCosh real closeTo: c real arCosh).
  	self assert: (c arCosh imaginary closeTo: 0).
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:real |
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:imag |
+ 		c := real + imag i.
+ 		self assert: (c arCosh cosh real closeTo: c real).
+ 		self assert: (c arCosh cosh imaginary closeTo: c imaginary)]]!
- 	c := 2 + 3 i.
- 	self assert: (c arCosh cosh real closeTo: c real).
- 	self assert: (c arCosh cosh imaginary closeTo: c imaginary).
- 	c := -2 + 3 i.
- 	self assert: (c arCosh cosh real closeTo: c real).
- 	self assert: (c arCosh cosh imaginary closeTo: c imaginary).
- 	c := -2 - 3 i.
- 	self assert: (c arCosh cosh real closeTo: c real).
- 	self assert: (c arCosh cosh imaginary closeTo: c imaginary).
- 	c := 2 - 3 i.
- 	self assert: (c arCosh cosh real closeTo: c real).
- 	self assert: (c arCosh cosh imaginary closeTo: c imaginary).!

Item was changed:
  ----- Method: ComplexTest>>testArSinh (in category 'tests') -----
  testArSinh
  	| c |
  	c := (2.5 + 0 i).
  	self assert: (c arSinh real closeTo: c real arSinh).
  	self assert: (c arSinh imaginary closeTo: 0).
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:real |
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:imag |
+ 		c := real + imag i.
+ 		self assert: (c arSinh sinh real closeTo: c real).
+ 		self assert: (c arSinh sinh imaginary closeTo: c imaginary)]]!
- 	c := 2 + 3 i.
- 	self assert: (c arSinh sinh real closeTo: c real).
- 	self assert: (c arSinh sinh imaginary closeTo: c imaginary).!

Item was changed:
  ----- Method: ComplexTest>>testArTanh (in category 'tests') -----
  testArTanh
  	| c |
  	c := (0.5 + 0 i).
  	self assert: (c arTanh real closeTo: c real arTanh).
  	self assert: (c arTanh imaginary closeTo: 0).
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:real |
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:imag |
+ 		c := real + imag i.
+ 		self assert: (c arTanh tanh real closeTo: c real).
+ 		self assert: (c arTanh tanh imaginary closeTo: c imaginary)]]!
- 	c := 2 + 3 i.
- 	self assert: (c arTanh tanh real closeTo: c real).
- 	self assert: (c arTanh tanh imaginary closeTo: c imaginary).!

Item was added:
+ ----- Method: ComplexTest>>testArcCos (in category 'tests') -----
+ testArcCos
+ 	| c |
+ 	c := (0.5 + 0 i).
+ 	self assert: (c arcCos real closeTo: c real arcCos).
+ 	self assert: (c arcCos imaginary closeTo: 0).
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:real |
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:imag |
+ 		c := real + imag i.
+ 		self assert: (c arcCos cos real closeTo: c real).
+ 		self assert: (c arcCos cos imaginary closeTo: c imaginary)]]!

Item was added:
+ ----- Method: ComplexTest>>testArcSin (in category 'tests') -----
+ testArcSin
+ 	| c |
+ 	c := (0.5 + 0 i).
+ 	self assert: (c arcSin real closeTo: c real arcSin).
+ 	self assert: (c arcSin imaginary closeTo: 0).
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:real |
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:imag |
+ 		c := real + imag i.
+ 		self assert: (c arcSin sin real closeTo: c real).
+ 		self assert: (c arcSin sin imaginary closeTo: c imaginary)]]!

Item was added:
+ ----- Method: ComplexTest>>testArcTan (in category 'tests') -----
+ testArcTan
+ 	| c |
+ 	c := (0.5 + 0 i).
+ 	self assert: (c arcTan real closeTo: c real arcTan).
+ 	self assert: (c arcTan imaginary closeTo: 0).
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:real |
+ 	#(-0.5 -2 -3 0.5 2 3) do: [:imag |
+ 		c := real + imag i.
+ 		self assert: (c arcTan tan real closeTo: c real).
+ 		self assert: (c arcTan tan imaginary closeTo: c imaginary)]]!