#pragma include<prman.h>
#pragma opname dan_material
#pragma oplabel "VEX DPL ParaPerp"
#pragma label dnfreq "Frequency"

//smooths edges and anti-aliasing
float pulse(float a,b,fuzz,x)
{
    return(smooth(a-fuzz,a,x)-smooth(b-fuzz,b,x));
}

surface
rim(float   rim_width = 0.2,
            dnfreq = 1,          
            multdan = 1;

            )
{
    vector  nf, n;
    vector  diffusecolor;
    vector  restpos;
float  dan_noise; 
//vector dan_noise;


restpos = wo_space(P)*dnfreq;
dan_noise = snoise(restpos);



n = normalize(N);
nf = faceforward(n, I);
 
vector i = normalize(-I);
//float  dt = 1-dot(i,nf);
float dt = dot(i,nf);
Oi = smoothstep(1-rim_width, 1.0, dt)*dan_noise*multdan;

diffusecolor = 1;
Cf = Oi * Cs * diffusecolor;

}