Document & eyewitness series
All Automatic Image Production Unit:2wb_bva2
CRT projection of a 4D-Camera shot Orbital clock variation on 2wb_bvap

//Declaration of variables
//Colormap0

declare Col00 = 0.8660

declare Col01 = 0.1120

declare Col02 = 0.0570

//Colormap1 #declare Col10 = 0.4880

declare Col11 = 0.5550

declare Col12 = 0.5000

//Colormap2

declare Col20 = 0.6690

declare Col21 = 0.0880

declare Col22 = 0.1310

//Colormap3

declare Col30 = 0.2330

declare Col31 = 0.0110

declare Col32 = 0.8930

//Determination of transformation
//and some global vars
//Fractrans0

declare TRA00 = 0.0880

declare TRA01 = 0.0830

declare TRA02 = 0.7610

//Fractrans1 #declare TRA10 = 0.5880

declare TRA11 = 0.8000

declare TRA12 = 0.5390

//Fractrans2

declare TRA20 = 0.2160

declare TRA21 = 0.5990 #declare TRA22 = 0.1000 //Fractrans3 #declare TRA30 = 0.9850 #declare TRA31 = 0.5230 #declare TRA32 = 0.2040 //Fractrans4 #declare TRA40 = 0.2740 #declare TRA41 = 0.3030 #declare TRA42 = 0.5660 //Fractrans5 #declare TRA50 = 0.0010 #declare TRA51 = 0.1560 #declare TRA52 = 0.8080 //Fractrans6 #declare TRA60 = 0.6490 #declare TRA61 = 0.5540 #declare TRA62 = 0.7680 //Fractrans7 #declare TRA70 = 0.9530 #declare TRA71 = 0.8140 #declare TRA72 = 0.8070 //Fractrans8 #declare TRA80 = 0.2870 #declare TRA81 = 0.8470 #declare TRA82 = 0.4890

//Determination of fractal objects
//A_0 - 4 = q(quaternion) = x+yi+zj+wk
//as fourdimensional extension of the
//complex numbers.
//seen as a pars pro toto function it gives a
//detailed view of the inner state of the void (*object)
//at a certain time
and
a certain space.
//Fractal0

declare A00 = 0.2970

declare A01 = 0.2490

declare A02 = 0.2240

declare A03 = 0.1150

//Fractal1 #declare A10 = 0.7240

declare A11 = 0.2020

declare A12 = 0.1370

declare A13 = 0.0580

//Fractal2 #declare A20 = 0.8050

declare A21 = 0.5780

declare A22 = 0.3090

declare A23 = 0.2730

include "mapdec.inc"

//Redeclaration of CLUT

declare CM0=

color_map{
[0.057 MCOL00]
[0.088 MCOL01]
[0.112 MCOL02]
[0.131 MCOL03]
[0.488 MCOL04]
[0.500 MCOL05]
[0.555 MCOL06]
[0.669 MCOL07]
[0.866 MCOL08]
} #declare CM1=
color_map{
[0.011 MCOL10]
[0.083 MCOL11]
[0.088 MCOL12]
[0.233 MCOL13]
[0.539 MCOL14]
[0.588 MCOL15]
[0.761 MCOL16]
[0.800 MCOL17]
[0.893 MCOL18]
} #declare CM2=
color_map{
[0.100 MCOL20]
[0.204 MCOL21]
[0.216 MCOL22]
[0.274 MCOL23]
[0.303 MCOL24]
[0.523 MCOL25]
[0.566 MCOL26]
[0.599 MCOL27]
[0.985 MCOL28]
}

declare CM3=

color_map{
[0.001 MCOL30]
[0.156 MCOL31]
[0.554 MCOL32]
[0.649 MCOL33]
[0.768 MCOL34]
[0.807 MCOL35]
[0.808 MCOL36]
[0.814 MCOL37]
[0.953 MCOL38]
} > //Determination of Viewpoint
for clock = .333 ->
camera
location
up y
right x
angle 7
look_at
rotate
//Determination of Lightning
light
color rgb 0.98
rotate
rotate
// Berlin Inselstr.13
// Date : 1996:25:7
// Time : 16:00:24.09
// File : 2wb_bvap.inc
// Procurator: H.C.Wilp