991 |
|
resize_inparr(nmats+1); /* extra matrix at end for result */ |
992 |
|
mop[nmats].inspec = "trailing_ops"; |
993 |
|
/* load final concatenation matrix */ |
994 |
< |
if (mcat_spec && !(mcat = rmx_load(mcat_spec, RMPnone))) { |
994 |
> |
if (mcat_spec && !(mcat = rmx_load(mcat_spec))) { |
995 |
|
fprintf(stderr, "%s: error loading concatenation matrix: %s\n", |
996 |
|
argv[0], mcat_spec); |
997 |
|
return(1); |
1034 |
|
return(1); |
1035 |
|
mop[nmats].rmp->ncols = mcat->ncols; |
1036 |
|
} |
1037 |
+ |
#if DTrmx_native==DTfloat |
1038 |
+ |
if (outfmt == DTdouble) |
1039 |
+ |
fprintf(stderr, "%s: warning - writing float result as double\n", argv[0]); |
1040 |
+ |
#endif |
1041 |
|
newheader("RADIANCE", stdout); /* write output header */ |
1042 |
|
if (echoheader) |
1043 |
|
output_headinfo(stdout); |