Fractal.RUFF.Mandelbrot.Atom

Mu-atom coordinate and address algorithms.

Documentation

data MuAtom r

Mu-atom properties.

Constructors

MuAtom

Fields

muNucleus :: !(Complex r)

muSize :: !Double

muOrient :: !Double

muPeriod :: !Int

Instances

Eq r => Eq (MuAtom r)

Read r => Read (MuAtom r)

Show r => Show (MuAtom r)

data FindAtom r

Progress updates for findAtom.

Constructors

AtomSplitTodo

AtomSplitDone AngledInternalAddress [Angle]

AtomAnglesTodo

AtomAnglesDone !Angle !Angle

AtomRayTodo

AtomRay !Int

AtomRayDone !(Complex r)

AtomNucleusTodo

AtomNucleus !Int

AtomNucleusDone !(Complex r)

AtomBondTodo

AtomBond !Int

AtomBondDone !(Complex r)

AtomSuccess !(MuAtom r)

AtomFailed

Instances

Eq r => Eq (FindAtom r)

Read r => Read (FindAtom r)

Show r => Show (FindAtom r)

findAtom :: (Floating r, NearZero r, Real r) => AngledInternalAddress -> [FindAtom r]

Try to find an atom, providing progress updates.

findAtom' :: [FindAtom r] -> Maybe (MuAtom r)

Find the first success in the progress list.

findAtom_ :: (Floating r, NearZero r, Real r) => AngledInternalAddress -> Maybe (MuAtom r)

Find an atom from its address.

data FindAddress r

Progress updates for findAddress.

Constructors

AddressCuspTodo

AddressCuspDone !(Complex r)

AddressDwellTodo

AddressDwell !Int

AddressDwellDone !Int

AddressRayOutTodo

AddressRayOut !Double

AddressRayOutDone !(Complex r)

AddressExternalTodo

AddressExternalDone !Angle

AddressAddressTodo

AddressSuccess AngledInternalAddress

AddressFailed

Instances

Eq r => Eq (FindAddress r)

Read r => Read (FindAddress r)

Show r => Show (FindAddress r)

findAddress :: (Floating r, NearZero r, Real r, RealFrac r) => MuAtom r -> [FindAddress r]

Try to find an address, providing progress updates.

findAddress' :: [FindAddress r] -> Maybe AngledInternalAddress

Find the first success in the progress list.

findAddress_ :: (Floating r, NearZero r, Real r, RealFrac r) => MuAtom r -> Maybe AngledInternalAddress

Find an address for a mu-atom.

data Locate r

Progress updates for locate.

Constructors

LocateScanTodo

LocateScan

LocateScanDone !Int

LocateNucleusTodo

LocateNucleus !Int

LocateNucleusDone !(Complex r)

LocateBondTodo

LocateBond !Int

LocateBondDone !(Complex r)

LocateSuccess !(MuAtom r)

LocateFailed

Instances

Eq r => Eq (Locate r)

Read r => Read (Locate r)

Show r => Show (Locate r)

locate

Arguments

:: (Floating r, NearZero r, Real r)

=> Complex r

center

-> Double

radius

-> [Locate r]

Try to find an atom close to a coordinate, providing progress updates.

locate' :: [Locate r] -> Maybe (MuAtom r)

Find the first success in the progress list.

locate_ :: (Floating r, NearZero r, Real r) => Complex r -> Double -> Maybe (MuAtom r)

Find an atom close to a coordinate.