Artifact 3de2ea619be1dd3277fed361a0f5f1eb2441d156:

• File demos/max-translated.tcl — part of check-in [23635a08f9] at 2011-11-23 03:34:40 on branch infinite-plane — Updated the demos of the remaining binary operators to show how they perform on images translated relative to each other. (user: andreask size: 242) [more...]

def op_max_translated {
    label Max/Translated
    active { expr { [bases] == 2 } }
    setup_image {
	show_image [crimp alpha opaque \
			[crimp max \
			     [crimp place [base 0] -50 -50] \
			     [crimp place [base 1] 60 70]]]
    }
}