Commit | Line | Data |
---|---|---|
85a975f1 | 1 | puts "============" |
2 | puts "CR26035" | |
3 | puts "============" | |
4 | puts "" | |
5 | ####################################################################### | |
6 | # Drawing dimension between edge and point | |
7 | ####################################################################### | |
8 | ||
9 | vinit View1 | |
10 | vclear | |
11 | vaxo | |
12 | ||
13 | vertex v1 10 -10 0 | |
14 | vertex v2 10 10 0 | |
15 | edge e v1 v2 | |
16 | vdisplay e | |
17 | ||
18 | vpoint p 10 0 10 | |
19 | ||
20 | vdimension len -length -shapes e p -plane yoz | |
21 | ||
22 | vfit | |
23 | ||
24 | set only_screen 1 | |
25 |