File: gw

package info (click to toggle)
gwave 20060606-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 2,716 kB
  • ctags: 1,136
  • sloc: ansic: 8,839; lisp: 1,665; sh: 1,202; makefile: 170; perl: 91
file content (40 lines) | stat: -rw-r--r-- 1,324 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
#!/usr/local/bin/gwave -s
!#
; gwave script
(require-n-wavepanels 4)
(set! default-measure1-function 5)
(let ((df (if script-target-datafile
           script-target-datafile
           (find-or-load-wavefile "../examples/pd2.N"))))
 (wavepanel-add-var-setup df (nth-wavepanel 0) "Clk" 3)
 (wavepanel-add-var-setup df (nth-wavepanel 0) "vbias" 2)
 (wavepanel-add-var-setup df (nth-wavepanel 0) "inl" 1)
 (wavepanel-add-var-setup df (nth-wavepanel 0) "inh" 0)
 (wavepanel-add-var-setup df (nth-wavepanel 1) "outl" 4)
 (wavepanel-add-var-setup df (nth-wavepanel 1) "outh" 3)
 (wavepanel-add-var-setup df (nth-wavepanel 1) "dtail" 2)
 (wavepanel-add-var-setup df (nth-wavepanel 1) "gl" 1)
 (wavepanel-add-var-setup df (nth-wavepanel 1) "gh" 0)
)
(x-zoom! 0.0 4.0e-8)
(wtable-set-xlogscale! #f)
(set! default-wavepanel-type 2)
(set-wtable-vcursor! 0 7.55905511811024e-9)
(set-wtable-vcursor! 1 1.52755905511811e-8)
(gtk-tooltips-enable gwave-tooltips)
(let ((wp (nth-wavepanel 0)))
 (set-wavepanel-ylogscale! wp #f)
 (set-wavepanel-type! wp 1)
)
(let ((wp (nth-wavepanel 1)))
 (set-wavepanel-ylogscale! wp #f)
 (set-wavepanel-type! wp 0)
)
(let ((wp (nth-wavepanel 2)))
 (set-wavepanel-ylogscale! wp #f)
 (set-wavepanel-type! wp 0)
)
(let ((wp (nth-wavepanel 3)))
 (set-wavepanel-ylogscale! wp #f)
 (set-wavepanel-type! wp 0)
)