Wanted: Mandelbrot vectorizeable in Fortran

[Klaus Singvogel]

I'm searching for the Mandelbrot-algorithm in Fortran, which can be vectorized 
on a Cray-Ymp.
Please don't send me the usual algorithm - 'cause it cannot be vectorized with
the following depedecy of x:  ;-)

	...
	DO 30 i=1, X_PIXEL
		DO 30 j=1, Y_PIXEL
			DO 10 k=1, max_iteration
				x = x * x + c
				IF (abs(x).gt.4) GOTO 20
10 			CONTINUE
20		field(i,j)=k
		...
30	CONTINUE

							 
Thank's in advance,
	Klaus.
---
Name    : Klaus Singvogel
Nickname: Pacman
E-Mail  : kssingvo at medusa.informatik.uni-erlangen.de