The R Project SVN – R – Diff – /trunk/src/main/plotmath.c



    case sigma6:  /* quad */
	return Quad(gc, dd);
 
    case sigma8:  /* num1 */
	return AxisHeight(gc, dd)
	    + 3.51 * RuleThickness()
	    + 0.15 * XHeight(gc, dd)		/* 54/36 * 0.1 */
	    + SUBS * DescDepth(gc, dd);
    case sigma9:  /* num2 */
	return AxisHeight(gc, dd)
	    + 1.51 * RuleThickness()
	    + 0.08333333 * XHeight(gc, dd);	/* 30/36 * 0.1 */
    case sigma10: /* num3 */
	return AxisHeight(gc, dd)
	    + 1.51 * RuleThickness()
	    + 0.1333333 * XHeight(gc, dd);	/* 48/36 * 0.1 */
    case sigma11: /* denom1 */
	return	- AxisHeight(gc, dd)
	    + 3.51 * RuleThickness()
	    + SUBS * FigHeight(gc, dd)
	    + 0.344444 * XHeight(gc, dd);	/* 124/36 * 0.1 */
    case sigma12: /* denom2 */
	return	- AxisHeight(gc, dd)
	    + 1.51 * RuleThickness()
	    + SUBS * FigHeight(gc, dd)
	    + 0.08333333 * XHeight(gc, dd);	/* 30/36 * 0.1 */
 
    case sigma13: /* sup1 */
	return 0.95 * xHeight(gc, dd);

 
    case sigma22: /* axis_height */
	return AxisHeight(gc, dd);
 
    case xi8:	  /* default_rule_thickness */
	return RuleThickness();
 
    case xi9:	  /* big_op_spacing1 */
    case xi10:	  /* big_op_spacing2 */
    case xi11:	  /* big_op_spacing3 */
    case xi12:	  /* big_op_spacing4 */

Rev 31430	Rev 31989
Line 250...	Line 250...
250	`case sigma6: /* quad */`	250	`case sigma6: /* quad */`
251	`return Quad(gc, dd);`	251	`return Quad(gc, dd);`
252		252
253	`case sigma8: /* num1 */`	253	`case sigma8: /* num1 */`
254	`return AxisHeight(gc, dd)`	254	`return AxisHeight(gc, dd)`
255	`+ 3.51 * RuleThickness(gc, dd)`	255	`+ 3.51 * RuleThickness()`
256	`+ 0.15 * XHeight(gc, dd) /* 54/36 * 0.1 */`	256	`+ 0.15 * XHeight(gc, dd) /* 54/36 * 0.1 */`
257	`+ SUBS * DescDepth(gc, dd);`	257	`+ SUBS * DescDepth(gc, dd);`
258	`case sigma9: /* num2 */`	258	`case sigma9: /* num2 */`
259	`return AxisHeight(gc, dd)`	259	`return AxisHeight(gc, dd)`
260	`+ 1.51 * RuleThickness(gc, dd)`	260	`+ 1.51 * RuleThickness()`
261	`+ 0.08333333 * XHeight(gc, dd); /* 30/36 * 0.1 */`	261	`+ 0.08333333 * XHeight(gc, dd); /* 30/36 * 0.1 */`
262	`case sigma10: /* num3 */`	262	`case sigma10: /* num3 */`
263	`return AxisHeight(gc, dd)`	263	`return AxisHeight(gc, dd)`
264	`+ 1.51 * RuleThickness(gc, dd)`	264	`+ 1.51 * RuleThickness()`
265	`+ 0.1333333 * XHeight(gc, dd); /* 48/36 * 0.1 */`	265	`+ 0.1333333 * XHeight(gc, dd); /* 48/36 * 0.1 */`
266	`case sigma11: /* denom1 */`	266	`case sigma11: /* denom1 */`
267	`return - AxisHeight(gc, dd)`	267	`return - AxisHeight(gc, dd)`
268	`+ 3.51 * RuleThickness(gc, dd)`	268	`+ 3.51 * RuleThickness()`
269	`+ SUBS * FigHeight(gc, dd)`	269	`+ SUBS * FigHeight(gc, dd)`
270	`+ 0.344444 * XHeight(gc, dd); /* 124/36 * 0.1 */`	270	`+ 0.344444 * XHeight(gc, dd); /* 124/36 * 0.1 */`
271	`case sigma12: /* denom2 */`	271	`case sigma12: /* denom2 */`
272	`return - AxisHeight(gc, dd)`	272	`return - AxisHeight(gc, dd)`
273	`+ 1.51 * RuleThickness(gc, dd)`	273	`+ 1.51 * RuleThickness()`
274	`+ SUBS * FigHeight(gc, dd)`	274	`+ SUBS * FigHeight(gc, dd)`
275	`+ 0.08333333 * XHeight(gc, dd); /* 30/36 * 0.1 */`	275	`+ 0.08333333 * XHeight(gc, dd); /* 30/36 * 0.1 */`
276		276
277	`case sigma13: /* sup1 */`	277	`case sigma13: /* sup1 */`
278	`return 0.95 * xHeight(gc, dd);`	278	`return 0.95 * xHeight(gc, dd);`
Line 299...	Line 299...
299		299
300	`case sigma22: /* axis_height */`	300	`case sigma22: /* axis_height */`
301	`return AxisHeight(gc, dd);`	301	`return AxisHeight(gc, dd);`
302		302
303	`case xi8: /* default_rule_thickness */`	303	`case xi8: /* default_rule_thickness */`
304	`return RuleThickness(gc, dd);`	304	`return RuleThickness();`
305		305
306	`case xi9: /* big_op_spacing1 */`	306	`case xi9: /* big_op_spacing1 */`
307	`case xi10: /* big_op_spacing2 */`	307	`case xi10: /* big_op_spacing2 */`
308	`case xi11: /* big_op_spacing3 */`	308	`case xi11: /* big_op_spacing3 */`
309	`case xi12: /* big_op_spacing4 */`	309	`case xi12: /* big_op_spacing4 */`

The R Project SVN R

(root)/trunk/src/main/plotmath.c @ 28362 – Rev 31430 → 31989