| 112 |
|
/* run through directions */ |
| 113 |
|
for (ix = 0; ix < sqres; ix++) |
| 114 |
|
for (iy = 0; iy < sqres; iy++) { |
| 115 |
< |
RBFNODE *rbf; |
| 115 |
> |
RBFNODE *rbf; /* Klems reversal */ |
| 116 |
|
SDsquare2disk(ivec, (ix+.5)/sqres, (iy+.5)/sqres); |
| 117 |
+ |
ivec[0] = -ivec[0]; ivec[1] = -ivec[1]; |
| 118 |
|
ivec[2] = input_orient * |
| 119 |
|
sqrt(1. - ivec[0]*ivec[0] - ivec[1]*ivec[1]); |
| 120 |
|
rbf = advect_rbf(ivec); |
| 181 |
|
puts("\t\t<DetectorSpectrum>ASTM E308 1931 Y.dsp</DetectorSpectrum>"); |
| 182 |
|
puts("\t\t<WavelengthDataBlock>"); |
| 183 |
|
printf("\t\t\t<WavelengthDataDirection>%s</WavelengthDataDirection>\n", |
| 184 |
< |
bsdf_type[(input_orient>0)<<1 | (output_orient>0)]); |
| 184 |
> |
bsdf_type[(input_orient>0)<<1 | (output_orient>0)]); |
| 185 |
|
puts("\t\t\t<AngleBasis>LBNL/Shirley-Chiu</AngleBasis>"); |
| 186 |
|
puts("\t\t\t<ScatteringDataType>BTDF</ScatteringDataType>"); |
| 187 |
|
puts("\t\t\t<ScatteringData>"); |