Changeset 867
- Timestamp:
- Dec 4, 2009 5:13:24 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsascmds.tcl
- Property rcs:date changed from 2005/03/24 21:54:28 to 2006/02/22 00:28:44
- Property rcs:lines changed from +16 -6 to +2 -2
- Property rcs:rev changed from 1.60 to 1.61
r841 r867 1175 1175 set Z 1 1176 1176 foreach phase $expmap(phaselist) type $expmap(phasetype) { 1177 if {$type > 2} continue1177 if {$type == 4} continue 1178 1178 catch {unset total} 1179 1179 foreach atom $expmap(atomlist_$phase) {
Note: See TracChangeset
for help on using the changeset viewer.