| 259 |
|
*c_cmaterial = *(C_MATERIAL *)lp->data; |
| 260 |
|
c_cmaterial->clock = i + 1; |
| 261 |
|
return(MG_OK); |
| 262 |
+ |
case MG_E_IR: /* set index of refraction */ |
| 263 |
+ |
if (ac != 3) |
| 264 |
+ |
return(MG_EARGC); |
| 265 |
+ |
if (!isflt(av[1]) | !isflt(av[2])) |
| 266 |
+ |
return(MG_ETYPE); |
| 267 |
+ |
c_cmaterial->nr = atof(av[1]); |
| 268 |
+ |
c_cmaterial->ni = atof(av[2]); |
| 269 |
+ |
if (c_cmaterial->nr <= FTINY) |
| 270 |
+ |
return(MG_EILL); |
| 271 |
+ |
c_cmaterial->clock++; |
| 272 |
+ |
return(MG_OK); |
| 273 |
|
case MG_E_RD: /* set diffuse reflectance */ |
| 274 |
|
if (ac != 2) |
| 275 |
|
return(MG_EARGC); |