diff options
| author | culler <culler> | 2020-11-10 13:59:25 (GMT) |
|---|---|---|
| committer | culler <culler> | 2020-11-10 13:59:25 (GMT) |
| commit | d94200fdcf927707b43670e7751208ea902b382e (patch) | |
| tree | c8f724ce055955eef67c4b799866138c5389715d /library/demos/pendulum.tcl | |
| parent | a49d6e52a72b1f086503ae32cb28b0da62e5fa99 (diff) | |
| parent | 6133a711414cfb8fcc3a8b52ecf25b59a09e5800 (diff) | |
| download | tk-d94200fdcf927707b43670e7751208ea902b382e.zip tk-d94200fdcf927707b43670e7751208ea902b382e.tar.gz tk-d94200fdcf927707b43670e7751208ea902b382e.tar.bz2 | |
Merge main
Diffstat (limited to 'library/demos/pendulum.tcl')
| -rw-r--r-- | library/demos/pendulum.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/demos/pendulum.tcl b/library/demos/pendulum.tcl index 9833e8f..04f276b 100644 --- a/library/demos/pendulum.tcl +++ b/library/demos/pendulum.tcl @@ -50,8 +50,8 @@ for {set i 90} {$i>=0} {incr i -10} { $w.k create line 0 0 1 1 -smooth true -tags graph$i -fill grey$i } -$w.k create text 0 0 -anchor ne -text "\u03b8" -tags label_theta -$w.k create text 0 0 -anchor ne -text "\u03b4\u03b8" -tags label_dtheta +$w.k create text 0 0 -anchor ne -text "θ" -tags label_theta +$w.k create text 0 0 -anchor ne -text "δθ" -tags label_dtheta pack $w.k -in $w.p.l2 -fill both -expand true # Initialize some variables |