The R Project SVN R

Rev

Rev 80633 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 80633 Rev 87891
Line 84... Line 84...
84 
		REAL(at)[i] = (fabs(a_i) < small) ? 0. : a_i;
 84 
		REAL(at)[i] = (fabs(a_i) < small) ? 0. : a_i;
85 
	    }
 85 
	    }
86 
	}
 86 
	}
87 
    }
 87 
    }
88 
    else { /* ------ log axis ----- */
 88 
    else { /* ------ log axis ----- */
89 
	Rboolean reversed = FALSE;
 89 
	bool reversed = false;
90 
	double
 90 
	double
91 
	    umin = usr[0],
 91 
	    umin = usr[0],
92 
	    umax = usr[1];
 92 
	    umax = usr[1];
93 
	n = (int)(axp[2] + 0.5);
 93 
	n = (int)(axp[2] + 0.5);
94 
	/* {xy}axp[2] for 'log': GLpretty() [./graphics.c] sets
 94 
	/* {xy}axp[2] for 'log': GLpretty() [./graphics.c] sets