/* DO NOT EDIT.
 * Generated by ../bin/vtkEncodeString
 * 
 * Define the vtkHAVSVolumeMapper_k6EndFP string.
 *
 * Generated from file: /home/dorado1/vtk/VTK5.10.1/VolumeRendering/vtkHAVSVolumeMapper_k6EndFP.asm
 */
#include "vtkHAVSVolumeMapper_k6EndFP.h"
const char *vtkHAVSVolumeMapper_k6EndFP =
"!!ARBfp1.0\n"
"# -----------------------------------------------------------------------------\n"
"# Copyright 2005 by University of Utah\n"
"#\n"
"# Hardware-Assisted Visibility Sorting\n"
"# \n"
"# The program consists of the following steps:\n"
"#\n"
"# 1. Find the first and second entries in the fixed size k-buffer list sorted \n"
"#    by z (6+1 entries)\n"
"# 2. Perform a 3D pre-integrated transfer function lookup using front and back\n"
"#    scalar data values + the segment length computed from the depth values\n"
"#    of the first and second entries from the k-buffer.\n"
"# 3. Composite the color and opacity from the transfer funcion with the\n"
"#    color and opacity from the framebuffer. Discard winning k-buffer entry,\n"
"#    write the remaining k-buffer entries.\n"
"#\n"
"# The following textures are used:\n"
"# \n"
"#   Tex 0: framebuffer (pbuffer, 2D RGBA 8/16 bpp int or 16/32 bpp float)\n"
"#   Tex 1: k-buffer entries 1 and 2(same)\n"
"#   Tex 2: k-buffer entries 3 and 4(same)\n"
"#   Tex 3: k-buffer entries 5 and 6(same)\n"
"#   Tex 4: transfer function (regular, 3D RGBA 8/16 bpp int)\n"
"#\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# use the ATI_draw_buffers extension\n"
"OPTION ATI_draw_buffers;\n"
"# this may matter on future ATI hardware\n"
"OPTION ARB_precision_hint_nicest;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# input and temporaries\n"
"ATTRIB p = fragment.position; # fragment position in screen space\n"
"PARAM sz = program.local[0]; # texture scale and max gap length parameters\n"
"                             # {1/pw, 1/ph, max, not_used)}\n"
"PARAM half = { 0.5, 0.5, 0.0, 0.0 };\n"
"PARAM exp = { 0.0, 0.0, 0.0, 1.44269504 }; # 1/ln2 \n"
"\n"
"TEMP a1, a2, a3, a4, a5, a6; # k-buffer entries\n"
"TEMP r0, r1, r2, r3, r4, r5, r6; # sorted results\n"
"TEMP c, c0; # color and opacity\n"
"TEMP t; # temporary variable\n"
"TEMP colorBack,colorFront;\n"
"TEMP taud, zeta, gamma, Psi;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# compute texture coordinates from window position so that it is not \n"
"# interpolated perspective correct.  Then look up the color and opacity from \n"
"# the framebuffer\n"
"MUL t, p, sz; # t.xy = p.xy * sz.xy, only x and y are used for texture lookup\n"
"TEX c0, t, texture[0], 2D; # framebuffer color\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# Check opacity and kill fragment if it is greater than tolerance\n"
"SUB t.w, 0.99, c0.w;\n"
"KIL t.w;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# set up the k-buffer entries a1, a2\n"
"# each k-buffer entry consists of the scalar data value in x or z and the \n"
"# depth value in y or w\n"
"TEX a1, t, texture[1], 2D; # k-buffer entry 1\n"
"TEX a3, t, texture[2], 2D; # k-buffer entry 3\n"
"TEX a5, t, texture[3], 2D; # k-buffer entry 5\n"
"MOV a2, a1.zwzw; # k-buffer entry 2\n"
"MOV a4, a3.zwzw; # k-buffer entry 4\n"
"MOV a6, a5.zwzw; # k-buffer entry 6\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# find fragment with minimum z (r0), save the other to r1\n"
"\n"
"# r0 = min_z(a1.y, a2.y); r1 = max_z(a1.y, a2.y);\n"
"SUB t.w, a1.y, a2.y; # t.w < 0 iff a1.y < a2.y\n"
"CMP r1, t.w, a2, a1; # r1 = (a1.y < a2.y ? a2 : a1)\n"
"CMP r0, t.w, a1, a2; # r0 = (a1.y < a2.y ? a1 : a2)\n"
"\n"
"# r0 = min_z(r0.y, a3.y); r2 = max_z(r0.y, a3.y)\n"
"SUB t.w, r0.y, a3.y; # t.w < 0 iff r0.y < a3.y\n"
"CMP r2, t.w, a3, r0; # r2 = (r0.y < a3.y ? a3 : r0);\n"
"CMP r0, t.w, r0, a3; # r0 = (r0.y < a3.y ? r0 : a3);\n"
"\n"
"# r0 = min_z(r0.y, a4.y); r3 = max_z(r0.y, a4.y)\n"
"SUB t.w, r0.y, a4.y; # t.w < 0 iff r0.y < a4.y\n"
"CMP r3, t.w, a4, r0; # r3 = (r0.y < a4.y ? a4 : r0)\n"
"CMP r0, t.w, r0, a4; # r0 = (r0.y < a4.y ? r0 : a4);\n"
"\n"
"# r0 = min_z(r0.y, a5.y); r4 = max_z(r0.y, a5.y)\n"
"SUB t.w, r0.y, a5.y; # t.w < 0 iff r0.y < a5.y\n"
"CMP r4, t.w, a5, r0; # r4 = (r0.y < a5.y ? a5 : r0);\n"
"CMP r0, t.w, r0, a5; # r0 = (r0.y < a5.y ? r0 : a5);\n"
"\n"
"# r0 = min_z(r0.y, a6.y); r5 = max_z(r0.y, a6.y)\n"
"SUB t.w, r0.y, a6.y; # t.w < 0 iff r0.y < a6.y\n"
"CMP r5, t.w, a6, r0; # r5 = (r0.y < a6.y ? a6 : r0);\n"
"CMP r0, t.w, r0, a6; # r0 = (r0.y < a6.y ? r0 : a6);\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# find fragment with minimum d (r7) from r1, r2, r3, r4, r5\n"
"\n"
"# r6 = min_z(r1.y, r2.y);\n"
"SUB t.w, r1.y, r2.y; # t.w < 0 iff r1.y < r2.y\n"
"CMP r6, t.w, r1, r2; # r6 = (r1.y < r2.y ? r1 : r2);\n"
"\n"
"# r6 = min_z(r6.y, r3.y);\n"
"SUB t.w, r6.y, r3.y; # t.w < 0 iff r6.y < r3.y\n"
"CMP r6, t.w, r6, r3; # r6 = (r6.y < r3.y ? r6 : r3);\n"
"\n"
"# r6 = min_z(r6.y, r4.y);\n"
"SUB t.w, r6.y, r4.y; # t.w < 0 iff r6.y < r4.y\n"
"CMP r6, t.w, r6, r4; # r6 = (r6.y < r4.y ? r6 : r4);\n"
"\n"
"# r6 = min_z(r6.y, r5.y);\n"
"SUB t.w, r6.y, r5.y; # t.w < 0 iff r6.y < r5.y\n"
"CMP r6, t.w, r6, r5; # r6 = (r6.y < r5.y ? r6 : r5);\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# set up texture coordinates for transfer function lookup\n"
"MOV t.x, r0.x; # front scalar\n"
"MOV t.y, r6.x; # back scalar\n"
"SUB t.z, r6.y, r0.y; # z distance between front and back\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# nullify fragment if distance is greater than unit scale (non-convexities)\n"
"SUB t.w, sz.z, t.z; \n"
"CMP t.z, t.w, 0.0, t.z; \n"
"	\n"
"# -----------------------------------------------------------------------------\n"
"# transfer function lookup\n"
"TEX colorFront, t.x, texture[5], 1D;\n"
"TEX colorBack,  t.y, texture[5], 1D;\n"
"MUL taud.x, t.z, colorBack.a;\n"
"MUL taud.y, t.z, colorFront.a;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# compute zeta = exp(-0.5*(taudf+taudb))\n"
"DP3 zeta.w, taud, half;\n"
"MUL zeta.w, exp.w, zeta.w;\n"
"EX2 zeta.w, -zeta.w;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# compute gamma = taud/(1+taud);\n"
"ADD t, taud, 1.0;\n"
"RCP t.x, t.x;\n"
"RCP t.y, t.y; \n"
"MUL gamma, taud, t;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# lookup Psi\n"
"TEX Psi.w, gamma, texture[4], 2D;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# compute color = cb(psi-zeta) + cf(1.0-psi) \n"
"SUB t.w, Psi.w, zeta.w;\n"
"MUL colorBack, colorBack, t.w; \n"
"SUB t.w, 1.0, Psi.w;	\n"
"MUL colorFront, colorFront, t.w; \n"
"ADD c, colorBack, colorFront; \n"
"SUB c.a, 1.0, zeta.w;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# nullify winning entry if the scalar value < 0\n"
"CMP c, r0.x, 0.0, c;\n"
"CMP c, r6.x, 0.0, c;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# composite color with the color from the framebuffer !!!front to back!!! \n"
"SUB t.w, 1.0, c0.w;\n"
"MAD result.color[0], c, t.w, c0;\n"
"\n"
"# -----------------------------------------------------------------------------\n"
"# write remaining k-buffer entry and invalidate one entry\n"
"MOV r1.zw, r2.xxxy;\n"
"MOV r3.zw, r4.xxxy;\n"
"MOV r5.z, -1.0;\n"
"MOV r5.w, 10000.0;\n"
"MOV result.color[1], r1;\n"
"MOV result.color[2], r3;\n"
"MOV result.color[3], r5;\n"
"\n"
"END\n"
"\n";