86 |
|
#include <string.h> |
87 |
|
#include <ctype.h> |
88 |
|
#include "rtmath.h" |
89 |
+ |
#include "rtio.h" |
90 |
|
#include "resolu.h" |
91 |
|
#include "platform.h" |
92 |
|
#include "color.h" |
556 |
|
break; |
557 |
|
case 'f': |
558 |
|
for (j = 0; j < ntsteps; j++) { |
559 |
< |
fwrite(mtx_data+mtx_offset, sizeof(float), 3, |
559 |
> |
putbinary(mtx_data+mtx_offset, sizeof(float), 3, |
560 |
|
stdout); |
561 |
|
mtx_offset += 3*nskypatch; |
562 |
|
} |
567 |
|
ment[0] = mtx_data[mtx_offset]; |
568 |
|
ment[1] = mtx_data[mtx_offset+1]; |
569 |
|
ment[2] = mtx_data[mtx_offset+2]; |
570 |
< |
fwrite(ment, sizeof(double), 3, stdout); |
570 |
> |
putbinary(ment, sizeof(double), 3, stdout); |
571 |
|
mtx_offset += 3*nskypatch; |
572 |
|
} |
573 |
|
break; |
1128 |
|
double aas; /* Sun-sky point azimuthal angle */ |
1129 |
|
double sspa; /* Sun-sky point angle */ |
1130 |
|
double zsa; /* Zenithal sun angle */ |
1131 |
+ |
|
1132 |
+ |
perez_param[0], perez_param[1], perez_param[2], perez_param[3], perez_param[4]); |
1133 |
|
|
1134 |
|
for (i = 1; i < nskypatch; i++) |
1135 |
|
{ |