equal
deleted
inserted
replaced
1 #!/usr/bin/perl -w |
1 #!/usr/bin/perl -w |
2 # RCSid $Id: falsecolor.pl,v 2.4 2011/03/23 21:57:11 greg Exp $ |
2 # RCSid $Id: falsecolor.pl,v 2.4 2011/03/23 21:57:11 greg Exp $ |
|
3 |
|
4 ###################################################################### |
|
5 # |
|
6 # Please don't tinker with falsecolor.pl |
|
7 # This is an old version. The most recent version is in Radiance HEAD. |
|
8 # |
|
9 # Axel, Dec 2011 |
|
10 # |
|
11 ###################################################################### |
3 |
12 |
4 use strict; |
13 use strict; |
5 use File::Temp qw/ tempdir /; |
14 use File::Temp qw/ tempdir /; |
6 use POSIX qw/ floor /; |
15 use POSIX qw/ floor /; |
7 |
16 |