1 | # LOGIN.CL -- User login file for the IRAF command language. |
---|
2 | |
---|
3 | # Identify login.cl version (checked in images.cl). |
---|
4 | if (defpar ("logver")) |
---|
5 | logver = "IRAF V2.14EXPORT November 2007" |
---|
6 | |
---|
7 | set home = "/iraf/iraf/unix/hlib/" |
---|
8 | set imdir = "/tmp/mario/" |
---|
9 | set uparm = "home$uparm/" |
---|
10 | set userid = "mario" |
---|
11 | set tfred = "/iraf/iraf/TFRED2/" |
---|
12 | set lacos = "/iraf/iraf/" |
---|
13 | #set mscred = "/iraf/iraf/extern/mscred/" |
---|
14 | set ctio = "/iraf/iraf/extern/ctio/" |
---|
15 | |
---|
16 | # Set the terminal type. We assume the user has defined this correctly |
---|
17 | # when issuing the MKIRAF and no longer key off the unix TERM to set a |
---|
18 | # default. |
---|
19 | if (access (".hushiraf") == no) |
---|
20 | print "setting terminal type to xterm..." |
---|
21 | stty xgterm |
---|
22 | |
---|
23 | |
---|
24 | # Uncomment and edit to change the defaults. |
---|
25 | #set editor = vi |
---|
26 | #set printer = lp |
---|
27 | #set pspage = "letter" |
---|
28 | #set stdimage = imt800 |
---|
29 | #set stdimcur = stdimage |
---|
30 | #set stdplot = lw |
---|
31 | #set clobber = no |
---|
32 | #set filewait = yes |
---|
33 | #set cmbuflen = 512000 |
---|
34 | #set min_lenuserarea = 64000 |
---|
35 | set imtype = fits |
---|
36 | #set imtype = "imh" |
---|
37 | #set imextn = "oif:imh fxf:fits,fit plf:pl qpf:qp stf:hhh,??h" |
---|
38 | |
---|
39 | |
---|
40 | # XIMTOOL/DISPLAY stuff. Set node to the name of your workstation to |
---|
41 | # enable remote image display. The trailing "!" is required. |
---|
42 | #set node = "my_workstation!" |
---|
43 | |
---|
44 | # CL parameters you mighth want to change. |
---|
45 | #ehinit = "nostandout eol noverify" |
---|
46 | #epinit = "standout showall" |
---|
47 | showtype = yes |
---|
48 | |
---|
49 | |
---|
50 | # Load the default CL package. Doing so here allows us to override package |
---|
51 | # paths and load personalized packages from our loginuser.cl. |
---|
52 | clpackage |
---|
53 | |
---|
54 | |
---|
55 | # Default USER package; extend or modify as you wish. Note that this can |
---|
56 | # be used to call FORTRAN programs from IRAF. |
---|
57 | |
---|
58 | package user |
---|
59 | |
---|
60 | task $adb $bc $cal $cat $comm $cp $csh $date $dbx $df $diff = "$foreign" |
---|
61 | task $du $find $finger $ftp $grep $lpq $lprm $ls $mail $make = "$foreign" |
---|
62 | task $man $mon $mv $nm $od $ps $rcp $rlogin $rsh $ruptime = "$foreign" |
---|
63 | task $rwho $sh $spell $sps $strings $su $telnet $tip $top = "$foreign" |
---|
64 | task $vi $emacs $w $wc $less $rusers $sync $pwd $gdb = "$foreign" |
---|
65 | |
---|
66 | task $xc $mkpkg $generic $rtar $wtar $buglog = "$foreign" |
---|
67 | #task $fc = "$xc -h $* -limfort -lsys -lvops -los" |
---|
68 | task $fc = ("$" // envget("iraf") // "unix/hlib/fc.csh" // |
---|
69 | " -h $* -limfort -lsys -lvops -los") |
---|
70 | task $nbugs = ("$(setenv EDITOR 'buglog -e';" // |
---|
71 | "less -Cqm +G " // envget ("iraf") // "local/bugs.*)") |
---|
72 | task $cls = "$clear;ls" |
---|
73 | task $clw = "$clear;w" |
---|
74 | task $pg = ("$(less -Cqm $*)") |
---|
75 | task tfred.pkg = tfred$tfred.cl |
---|
76 | task lacos_im = lacos$lacos_im.cl |
---|
77 | #task mscred.pkg = mscred$mscred.cl |
---|
78 | |
---|
79 | if (access ("home$loginuser.cl")) |
---|
80 | cl < "home$loginuser.cl" |
---|
81 | ; |
---|
82 | |
---|
83 | keep |
---|
84 | |
---|
85 | |
---|
86 | prcache directory |
---|
87 | cache directory page type help |
---|
88 | |
---|
89 | # Print the message of the day. |
---|
90 | if (access (".hushiraf")) |
---|
91 | menus = no |
---|
92 | else { |
---|
93 | clear; type hlib$motd |
---|
94 | } |
---|
95 | |
---|
96 | # Delete any old MTIO lock (magtape position) files. |
---|
97 | if (deftask ("mtclean")) |
---|
98 | mtclean |
---|
99 | else |
---|
100 | delete uparm$mt?.lok,uparm$*.wcs verify- |
---|
101 | |
---|
102 | # List any packages you want loaded at login time, ONE PER LINE. |
---|
103 | images # general image operators |
---|
104 | plot # graphics tasks |
---|
105 | dataio # data conversions, import export |
---|
106 | lists # list processing |
---|
107 | |
---|
108 | # The if(deftask...) is needed for V2.9 compatibility. |
---|
109 | if (deftask ("proto")) |
---|
110 | proto # prototype or ad hoc tasks |
---|
111 | |
---|
112 | tv # image display |
---|
113 | utilities # miscellaneous utilities |
---|
114 | noao # optical astronomy packages |
---|
115 | |
---|
116 | set stdimage=imt4096 #imt4096 |
---|
117 | keep |
---|