The R Project SVN R

Rev

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

Rev 78537 Rev 84215
Line 1076... Line 1076...
1076 
	    tan(angle)+2.;
 1076 
	    tan(angle)+2.;
1077 
 
 1077 
 
1078 
	xinc=1./tan(angle);
 1078 
	xinc=1./tan(angle);
1079 
    }
 1079 
    }
1080 
 
 1080 
 
1081 
    /* loop through all relevent bits in rotated image */
 1081 
    /* loop through all relevant bits in rotated image */
1082 
    for(j=0; j<item->rows_out; j++) {
 1082 
    for(j=0; j<item->rows_out; j++) {
1083 
 
 1083 
 
1084 
	/* no point re-calculating these every pass */
 1084 
	/* no point re-calculating these every pass */
1085 
	di=(double)((xl<0)?0:(int)xl)+0.5-item->cols_out/2.;
 1085 
	di=(double)((xl<0)?0:(int)xl)+0.5-item->cols_out/2.;
1086 
	byte_out=(item->rows_out-j-1)*byte_w_out;
 1086 
	byte_out=(item->rows_out-j-1)*byte_w_out;
Line 2299... Line 2299...
2299 
	    tan(angle)+2;
 2299 
	    tan(angle)+2;
2300 
 
 2300 
 
2301 
	xinc=1./tan(angle);
 2301 
	xinc=1./tan(angle);
2302 
    }
 2302 
    }
2303 
 
 2303 
 
2304 
    /* loop through all relevent bits in rotated image */
 2304 
    /* loop through all relevant bits in rotated image */
2305 
    for(j=0; j<item->rows_out; j++) {
 2305 
    for(j=0; j<item->rows_out; j++) {
2306 
 
 2306 
 
2307 
	/* no point re-calculating these every pass */
 2307 
	/* no point re-calculating these every pass */
2308 
	di=(double)((xl<0)?0:(int)xl)+0.5-(double)item->cols_out/2;
 2308 
	di=(double)((xl<0)?0:(int)xl)+0.5-(double)item->cols_out/2;
2309 
	byte_out=(item->rows_out-j-1)*byte_w_out;
 2309 
	byte_out=(item->rows_out-j-1)*byte_w_out;