Changeset 867 for trunk/gsascmds.tcl


Ignore:
Timestamp:
Dec 4, 2009 5:13:24 PM (11 years ago)
Author:
toby
Message:

# on 2006/02/22 00:28:44, toby did:
Allow composition to work on Magnetic phases

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  
    11751175    set Z 1
    11761176    foreach phase $expmap(phaselist) type $expmap(phasetype) {
    1177         if {$type > 2} continue
     1177        if {$type == 4} continue
    11781178        catch {unset total}
    11791179        foreach atom $expmap(atomlist_$phase) {
Note: See TracChangeset for help on using the changeset viewer.