The R Project SVN R

Rev

Rev 7081 | Rev 7701 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7081 Rev 7527
Line 1... Line 1...
1 
/*
 1 
/*
2 
 *  R : A Computer Language for Statistical Data Analysis
 2 
 *  R : A Computer Language for Statistical Data Analysis
3 
 *  Copyright (C) 1995, 1996, 1997 Robert Gentleman and Ross Ihaka
 3 
 *  Copyright (C) 1995, 1996, 1997 Robert Gentleman and Ross Ihaka
4 
 *  Copyright (C) 1998-1999	The R Development Core Team
 4 
 *  Copyright (C) 1998-2000	The R Development Core Team
5 
 *
 5 
 *
6 
 *  This source code module:
 6 
 *  This source code module:
7 
 *  Copyright (C) 1997, 1998 Paul Murrell and Ross Ihaka
 7 
 *  Copyright (C) 1997, 1998 Paul Murrell and Ross Ihaka
8 
 *
 8 
 *
9 
 *  This program is free software; you can redistribute it and/or modify
 9 
 *  This program is free software; you can redistribute it and/or modify
Line 2907... Line 2907...
2907 
	CurrentY = ReferenceY + bboxDepth(bbox)
 2907 
	CurrentY = ReferenceY + bboxDepth(bbox)
2908 
	    - yc * (bboxHeight(bbox) + bboxDepth(bbox));
 2908 
	    - yc * (bboxHeight(bbox) + bboxDepth(bbox));
2909 
    else
 2909 
    else
2910 
	CurrentY = ReferenceY;
 2910 
	CurrentY = ReferenceY;
2911 
    CurrentAngle = rot;
 2911 
    CurrentAngle = rot;
2912 
    rot *= M_PI_half / 90 ;/* radians */
 2912 
    rot *= M_PI_2 / 90 ;/* radians */
2913 
    CosAngle = cos(rot);
 2913 
    CosAngle = cos(rot);
2914 
    SinAngle = sin(rot);
 2914 
    SinAngle = sin(rot);
2915 
    RenderElement(expr, 1);
 2915 
    RenderElement(expr, 1);
2916 
}
 2916 
}
2917 
 
 2917