/[ascend]/trunk/models/ternary_plot.a4l
ViewVC logotype

Diff of /trunk/models/ternary_plot.a4l

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1 by aw0a, Fri Oct 29 20:54:12 2004 UTC revision 576 by johnpye, Tue May 9 03:42:08 2006 UTC
# Line 180  MODEL ternary_plot_equilateral_all( Line 180  MODEL ternary_plot_equilateral_all(
180    
181  METHODS  METHODS
182  METHOD default_self;  METHOD default_self;
183      tcomp1[0..58].fixed := TRUE;      FIX tcomp1[0..58];
184      tcomp2[0..58].fixed := TRUE;      FIX tcomp2[0..58];
185    
186      tcomp1[0] := 1;      tcomp1[0] := 1;
187      tcomp2[0] := 0;      tcomp2[0] := 0;
# Line 371  MODEL ternary_plot_equilateral( Line 371  MODEL ternary_plot_equilateral(
371    
372  METHODS  METHODS
373  METHOD default_self;  METHOD default_self;
374      tcomp1[0..58].fixed := TRUE;      FIX tcomp1[0..58];
375      tcomp2[0..58].fixed := TRUE;      FIX tcomp2[0..58];
376    
377    
378      tcomp1[0] := 1;      tcomp1[0] := 1;
# Line 448  METHOD check_all; Line 448  METHOD check_all;
448      RUN check_self;      RUN check_self;
449  END check_all;  END check_all;
450  METHOD seqmod;  METHOD seqmod;
451      tcomp1[0..60].fixed := TRUE;      FIX tcomp1[0..60];
452      tcomp2[0..60].fixed := TRUE;      FIX tcomp2[0..60];
453  END seqmod;  END seqmod;
454  METHOD reset;  METHOD reset;
455      RUN seqmod;      RUN seqmod;
456      comp_data[components][npnts].fixed := TRUE;      FIX comp_data[components][npnts];
457  END reset;  END reset;
458  END ternary_plot_equilateral;  END ternary_plot_equilateral;
459    
# Line 491  MODEL ternary_plot_equilateral2( Line 491  MODEL ternary_plot_equilateral2(
491    
492  METHODS  METHODS
493  METHOD default_self;  METHOD default_self;
494      tcomp1[0..58].fixed := TRUE;      FIX tcomp1[0..58];
495      tcomp2[0..58].fixed := TRUE;      FIX tcomp2[0..58];
496    
497    
498      tcomp1[0] := 1;      tcomp1[0] := 1;
# Line 573  END check_all; Line 573  END check_all;
573  METHOD values;  METHOD values;
574  END values;  END values;
575  METHOD seqmod;  METHOD seqmod;
576      tcomp1[0..60].fixed := TRUE;      FIX tcomp1[0..60];
577      tcomp2[0..60].fixed := TRUE;      FIX tcomp2[0..60];
578  END seqmod;  END seqmod;
579  END ternary_plot_equilateral2;  END ternary_plot_equilateral2;

Legend:
Removed from v.1  
changed lines
  Added in v.576

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22