% --------------------------------------------------------
  Samecoding

  The samecoding script lines below should be copied into
  a THERMOCALC script file to tell it to make additional 
  copies of an x-eos with their own names and composition/order
  starting guesses. For example, the script
       samecoding cpx pig
  says "make a copy of cpx, called pig" (multiple copies 
  can be made).
  To use the samecoding script, there must be a xyzguess 
  starting guess block, as shown below, for the duplicate phase.
% --------------------------------------------------------

samecoding mu pa       % make paragonite from muscovite
samecoding sp mt       % make high-T magnetite from spinel
samecoding ilm hem     % make FTO hematite from FTO ilmenite
samecoding ilmm hemm   % make FMMnTO hematite from FMMnTO ilmenite



% --------------------------------------------------------
  Starting guesses for composition/order variables

  Some possible starting guesses are given here that MIGHT help 
  (but make sure they represent a plausible composition for 
  the phases in your calcs). 

  Copy the correct starting guesses for your system and phases
  from the block below:
  
% --------------------------------------------------------

% --------------------------------------------------------
  Starting guesses in KFMASH
  for g liq mu bi opx sa cd st chl ctd sp1
% --------------------------------------------------------

xyzguess x(g)          0.828230

xyzguess q(liq)        0.361210
xyzguess fsp(liq)      0.298204
xyzguess ol(liq)      0.0452697
xyzguess x(liq)        0.811725
xyzguess h2o(liq)      0.273973

xyzguess x(mu)         0.424480
xyzguess y(mu)         0.855215  range  0.000 2.000

xyzguess x(bi)         0.515248
xyzguess y(bi)         0.181294
xyzguess Q(bi)         0.135847

xyzguess x(opx)        0.725005
xyzguess y(opx)        0.157290  range  0.000 2.000
xyzguess Q(opx)        0.258819

xyzguess  x(sa)         0.1
xyzguess  y(sa)         0.3
xyzguess  Q(sa)         0.05 range -1 1

xyzguess x(cd)         0.529141
xyzguess h(cd)         0.259128

xyzguess x(st)         0.9

xyzguess x(chl)        0.412420
xyzguess y(chl)        0.610079
xyzguess QAl(chl)      0.389713  range -1.000 1.000
xyzguess Q1(chl)      0.0751369  range -1.000 1.000
xyzguess Q4(chl)      0.0641869  range -1.000 1.000

xyzguess x(ctd)           0.88

xyzguess x(sp1)           0.9


% --------------------------------------------------------
  Starting guesses in NCKFMASHTO
  for g liq pl ksp ep ma mu pa bi opx sa cd st chl ctd sp mt ilmm hemm ilm hem mt1
% --------------------------------------------------------

xyzguess x(g)          0.833575
xyzguess z(g)         0.0735303
xyzguess f(g)         0.0524207 

xyzguess q(L)          0.260829
xyzguess fsp(L)        0.332998
xyzguess na(L)         0.267890
xyzguess an(L)        0.0124108
xyzguess ol(L)       0.00460699
xyzguess x(L)          0.799969
xyzguess h2o(L)        0.376568

xyzguess ca(pl4tr)        0.410144
xyzguess k(pl4tr)        0.0182303 

xyzguess na(k4tr)       0.159152
xyzguess ca(k4tr)     0.00450582

xyzguess f(ep)         0.379418
xyzguess Q(ep)         0.346850  range  0.000 0.500 

xyzguess x(ma)         0.6  
xyzguess y(ma)         0.96
xyzguess f(ma)         0.001
xyzguess n(ma)         0.05
xyzguess c(ma)         0.94

xyzguess x(mu)         0.501982
xyzguess y(mu)         0.839614
xyzguess f(mu)        0.0172093
xyzguess n(mu)         0.144000
xyzguess c(mu)       0.00179401 

xyzguess x(pa)         0.501982
xyzguess y(pa)         0.998030
xyzguess f(pa)       0.00182412
xyzguess n(pa)         0.945628
xyzguess c(pa)        0.0116010

xyzguess x(bi)         0.698859
xyzguess y(bi)         0.268818
xyzguess f(bi)         0.158096
xyzguess t(bi)        0.0981352
xyzguess Q(bi)        0.0683120

xyzguess x(opx)        0.811609
xyzguess y(opx)        0.128377  range  0.000 2.000
xyzguess f(opx)            0.01
xyzguess c(opx)            0.01
xyzguess Q(opx)        0.216433 

xyzguess  x(sa)            0.1
xyzguess  y(sa)            0.3
xyzguess  f(sa)            0.05
xyzguess  Q(sa)            0.05 range -1 1

xyzguess x(cd)         0.480790
xyzguess h(cd)         0.427693 

xyzguess  x(st)            0.88
xyzguess  f(st)            0.05
xyzguess  t(st)            0.04

xyzguess x(chl)        0.551609
xyzguess y(chl)        0.328449
xyzguess f(chl)        0.418479
xyzguess QAl(chl)      0.253018  range -1.000 1.000
xyzguess Q1(chl)       0.123137  range -1.000 1.000
xyzguess Q4(chl)       0.121632  range -1.000 1.000

xyzguess x(ctd)        0.990857
xyzguess f(ctd)            0.01

xyzguess  x(sp)    0.6    
xyzguess  y(sp)    0.95   
xyzguess  z(sp)    0.01  

xyzguess  x(mt)    0.85    
xyzguess  y(mt)    0.05   
xyzguess  z(mt)    0.01  

xyzguess i(ilmm)       0.890349
xyzguess g(ilmm)      0.0148847
xyzguess Q(ilmm)       0.828083  range -1.000 1.000

xyzguess i(hemm)       0.380640
xyzguess g(hemm)     0.00296953
xyzguess Q(hemm)     -0.0102634  range -0.300 0.300

xyzguess  x(ilm)       0.80           
xyzguess  Q(ilm)       0.8   range -0.99 0.99  

xyzguess  x(hem)       0.20           
xyzguess  Q(hem)       0.8   range -0.99 0.99   

xyzguess x(mt1)        0.683170
xyzguess Q(mt1)        0.727847


% --------------------------------------------------------
  Starting guesses in MnNCKFMASHTO
  for g liq pl ksp ep ma mu pa bi opx sa cd st chl ctd sp mt ilmm hemm ilm hem mt1  
% --------------------------------------------------------


xyzguess x(g)          0.824169
xyzguess z(g)         0.0317199
xyzguess m(g)          0.118530
xyzguess f(g)         0.0260643

xyzguess q(L)          0.173460
xyzguess fsp(L)        0.311414
xyzguess na(L)         0.443405
xyzguess an(L)       0.00913561
xyzguess ol(L)       0.00192499
xyzguess x(L)          0.746571
xyzguess h2o(L)        0.485792

xyzguess ca(pl)        0.377110
xyzguess k(pl)        0.0370401

xyzguess na(ksp)       0.227897
xyzguess ca(ksp)      0.0114380

xyzguess f(ep)         0.379418
xyzguess Q(ep)         0.346850  range  0.000 0.500 

xyzguess x(ma)         0.6  
xyzguess y(ma)         0.96
xyzguess f(ma)         0.001
xyzguess n(ma)         0.05
xyzguess c(ma)         0.94

xyzguess x(mu)         0.501982
xyzguess y(mu)         0.839614
xyzguess f(mu)        0.0172093
xyzguess n(mu)         0.144000
xyzguess c(mu)       0.00179401 

xyzguess x(pa)         0.501982
xyzguess y(pa)         0.998030
xyzguess f(pa)       0.00182412
xyzguess n(pa)         0.945628
xyzguess c(pa)        0.0116010

xyzguess x(bi)         0.607873
xyzguess m(bi)       0.00462747
xyzguess y(bi)         0.264120
xyzguess f(bi)         0.132141
xyzguess t(bi)         0.140166
xyzguess Q(bi)        0.0850578

xyzguess x(opx)        0.811609
xyzguess m(opx)           0.001
xyzguess y(opx)        0.128377  range  0.000 2.000
xyzguess f(opx)            0.01
xyzguess c(opx)            0.01
xyzguess Q(opx)        0.216433 

xyzguess  x(sa)            0.1
xyzguess  y(sa)            0.3
xyzguess  f(sa)            0.05
xyzguess  Q(sa)            0.05 range -1 1

xyzguess x(cd)         0.407167
xyzguess m(cd)        0.0213095
xyzguess h(cd)         0.597164

xyzguess  x(st)            0.88
xyzguess  m(st)            0.02
xyzguess  f(st)            0.05
xyzguess  t(st)            0.04

xyzguess x(chl)        0.551609
xyzguess y(chl)        0.328449
xyzguess f(chl)        0.418479
xyzguess m(chl)      0.00762984
xyzguess QAl(chl)      0.253018  range -1.000 1.000
xyzguess Q1(chl)       0.123137  range -1.000 1.000
xyzguess Q4(chl)       0.121632  range -1.000 1.000

xyzguess x(ctd)        0.990857
xyzguess m(ctd)           0.001
xyzguess f(ctd)            0.01

xyzguess  x(sp)    0.6    
xyzguess  y(sp)    0.95   
xyzguess  z(sp)    0.01  

xyzguess  x(mt)    0.85    
xyzguess  y(mt)    0.05   
xyzguess  z(mt)    0.01  

xyzguess i(ilmm)       0.858568
xyzguess g(ilmm)      0.0294376
xyzguess m(ilmm)      0.0323075
xyzguess Q(ilmm)       0.691587  range -1.000 1.000

xyzguess i(hemm)       0.380640
xyzguess g(hemm)     0.00296953
xyzguess m(hemm)      0.0305831
xyzguess Q(hemm)     -0.0102634  range -0.300 0.300

xyzguess  x(ilm)       0.80           
xyzguess  Q(ilm)       0.8   range -0.99 0.99  

xyzguess  x(hem)       0.20           
xyzguess  Q(hem)       0.8   range -0.99 0.99   

xyzguess x(mt1)        0.632160
xyzguess Q(mt1)        0.564334


% --------------------------------------------------------