/*extin do extinction of incident continuum as set by extinguish command */
void extin(float *ex1ryd);