Subversion Repositories wimsdev

Rev

Rev 6557 | Rev 8582 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6557 Rev 8580
Line 47... Line 47...
47 
 xrange -$slib_rg,$slib_rg\
 47 
 xrange -$slib_rg,$slib_rg\
48 
 yrange -$slib_rg,$slib_rg\
 48 
 yrange -$slib_rg,$slib_rg\
49 
 linewidth 1
 49 
 linewidth 1
50 
!if nohour notwordof $slib_option
 50 
!if nohour notwordof $slib_option
51 
 slib_out=$slib_out\
 51 
 slib_out=$slib_out\
52 
 fpoly $slib_ch, $slib_h1*$slib_hl,$slib_h2*$slib_hl, $slib_h2*(-$slib_hw),$slib_h1*$slib_hw, $slib_h1*(-$slib_sb),$slib_h2*(-$slib_sb), $slib_h2*$slib_hw,$slib_h1*(-$slib_hw)\
 52 
 fpoly $slib_ch,$[ $slib_h1*$slib_hl],$[$slib_h2*$slib_hl],$[ $slib_h2*(-$slib_hw)],$[$slib_h1*$slib_hw],$[ $slib_h1*(-$slib_sb)],$[$slib_h2*(-$slib_sb)],$[$slib_h2*$slib_hw],$slib_h1*(-$slib_hw)]\
53 
 poly $slib_ch, $slib_h1*$slib_hl,$slib_h2*$slib_hl, $slib_h2*(-$slib_hw),$slib_h1*$slib_hw, $slib_h1*(-$slib_sb),$slib_h2*(-$slib_sb), $slib_h2*$slib_hw,$slib_h1*(-$slib_hw)
 53 
 poly $slib_ch, $slib_h1*$slib_hl,$slib_h2*$slib_hl, $slib_h2*(-$slib_hw),$slib_h1*$slib_hw, $slib_h1*(-$slib_sb),$slib_h2*(-$slib_sb),$[$slib_h2*$slib_hw],$slib_h1*(-$slib_hw)
54 
!endif
 54 
!endif
55 
!if nominute notwordof $slib_option
 55 
!if nominute notwordof $slib_option
56 
 slib_out=$slib_out\
 56 
 slib_out=$slib_out\
57 
 fpoly $slib_cm, $slib_m1*$slib_ml,$slib_m2*$slib_ml, $slib_m2*(-$slib_mw),$slib_m1*$slib_mw, $slib_m1*(-$slib_sb),$slib_m2*(-$slib_sb), $slib_m2*$slib_mw,$slib_m1*(-$slib_mw)\
 57 
 fpoly $slib_cm,$[$slib_m1*$slib_ml],$slib_m2*$slib_ml,$[$slib_m2*(-$slib_mw)],$slib_m1*$slib_mw,$[$slib_m1*(-$slib_sb)],$slib_m2*(-$slib_sb),$[$slib_m2*$slib_mw],$slib_m1*(-$slib_mw)\
58 
 poly $slib_cm, $slib_m1*$slib_ml,$slib_m2*$slib_ml, $slib_m2*(-$slib_mw),$slib_m1*$slib_mw, $slib_m1*(-$slib_sb),$slib_m2*(-$slib_sb), $slib_m2*$slib_mw,$slib_m1*(-$slib_mw)
 58 
 poly $slib_cm,$[$slib_m1*$slib_ml],$[$slib_m2*$slib_ml],$[$slib_m2*(-$slib_mw)],$[$slib_m1*$slib_mw],$[$slib_m1*(-$slib_sb)],$[$slib_m2*(-$slib_sb)],$[$slib_m2*$slib_mw],$[$slib_m1*(-$slib_mw)]
59 
!endif
 59 
!endif
60 
slib_out=$slib_out\
 60 
slib_out=$slib_out\
61 
 linewidth $slib_md\
 61 
 linewidth $slib_md\
62 
 point 0,0,$slib_cm
 62 
 point 0,0,$slib_cm
63 
 
 63 
 
64 
!if nosecond notwordof $slib_option
 64 
!if nosecond notwordof $slib_option
65 
 slib_out=$slib_out\
 65 
 slib_out=$slib_out\
66 
 linewidth $slib_sw\
 66 
 linewidth $slib_sw\
67 
 line $slib_s1*(-$slib_sb),$slib_s2*(-$slib_sb), $slib_s1*$slib_sl,$slib_s2*$slib_sl,$slib_cs\
 67 
 line $slib_s1*(-$slib_sb),$[$slib_s2*(-$slib_sb)],$[$slib_s1*$slib_sl],$[$slib_s2*$slib_sl],$[$slib_cs]\
68 
 linewidth $slib_sd\
 68 
 linewidth $slib_sd\
69 
 point 0,0,$slib_cs
 69 
 point 0,0,$slib_cs
70 
!endif
 70 
!endif
71 
 
 71 
 
72 
!if url iswordof $slib_option or html iswordof $slib_option
 72 
!if url iswordof $slib_option or html iswordof $slib_option