Context Navigation

vripnew.csh @ 37

Last change on this file since 37 was 37, checked in by (none), 14 years ago
Added original make3d
Property svn:executable set to ``*
File size: 909 bytes

Line
1	#!/bin/csh -f
2
3	if (! $?VRIP_DIR) then
4	setenv VRIP_DIR /usr/graphics/project/dmich/ply/src/vrip
5	endif
6
7	if (! $?VRIP_TCL_LIBRARY) then
8	if (-f /usr/common/tcl8.0/lib/tcl8.0) then
9	setenv VRIP_TCL_LIBRARY /usr/common/tcl8.0/lib/tcl8.0
10	else
11	setenv VRIP_TCL_LIBRARY ${VRIP_DIR}/lib/tcl
12	endif
13	endif
14
15	if (! $?VRIP_TK_LIBRARY) then
16	if (-f /usr/common/tcl8.0/lib/tk8.0) then
17	setenv VRIP_TK_LIBRARY /usr/common/tcl8.0/lib/tk8.0
18	else
19	setenv VRIP_TK_LIBRARY ${VRIP_DIR}/lib/tk
20	endif
21	endif
22
23	setenv TCL_LIBRARY ${VRIP_TCL_LIBRARY}
24	setenv TK_LIBRARY ${VRIP_TK_LIBRARY}
25
26
27	set noui = 1
28
29	foreach vripSwitch ($argv)
30
31	if ("$vripSwitch" == "-slicer") then
32	set noui = 0
33	endif
34
35	if ("$vripSwitch" == "-show_render") then
36	set noui = 0
37	endif
38
39	end
40
41	if ($noui) then
42	${VRIP_DIR}/vrip ${VRIP_DIR}/vripnew.tcl $argv[*] -noui
43	else
44	${VRIP_DIR}/vrip ${VRIP_DIR}/vripnew.tcl $argv[*]
45	endif
46

Note: See TracBrowser for help on using the repository browser.