# | Line 30 | Line 30 | static char SCCSid[] = "$SunId$ LBL"; | |
---|---|---|
30 | ||
31 | #include "otypes.h" | |
32 | ||
33 | + | int dimlist[MAXDIM]; /* sampling dimensions */ |
34 | + | int ndims = 0; /* number of sampling dimensions */ |
35 | + | int samplendx = 0; /* index for this sample */ |
36 | + | |
37 | int imm_irrad = 0; /* compute immediate irradiance? */ | |
38 | ||
39 | int inform = 'a'; /* input format */ | |
# | Line 106 | Line 110 | char *fname; | |
110 | fflush(stdout); | |
111 | continue; | |
112 | } | |
113 | + | samplendx++; |
114 | /* compute and print */ | |
115 | if (imm_irrad) | |
116 | irrad(orig, direc); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |