source: branches/sandbox/single.tcl @ 1212

Last change on this file since 1212 was 1014, checked in by toby, 10 years ago

add home for single xtal work

File size: 316 bytes
RevLine 
[1014]1# file for overall single crystal panel
2proc MakeSinglePane {} {     ;# called to create the panel intially
3    label $::expgui(singFrame).l -text "Single Crystal Parameters"
4    grid $::expgui(singFrame).l -column 1 -row 1
5    ResizeNotebook
6}
7
8proc DisplaySingle {} {     ;# called each time the panel is raised
9
10}
Note: See TracBrowser for help on using the repository browser.