startshape feather background { b -1 }

rule feather 50 {

atom {}
feather { y -.45 r .4 b .0001 hue .3 alpha .1}

}

rule feather 50{

atom {}
feather { y -.45 r .3 b .0001 hue .3 alpha .1}

}

rule feather {

atom {}
feather { y -.45 r .3 flip 90 b .0001 hue .3 alpha .1}

}

rule feather 0.05 {

atom {}
featherB { y -.45 r .3 flip 90 b .0001 hue .3 alpha .1}

}

rule featherB 100{

atom {}
featherB { s 0.999 y -.45 r .3 b .0001 hue .3 alpha .1}

} rule featherB {

atom {}
featherB { s 0.999 y -.45 r .3 flip 90 b .0001 hue .3 alpha .1}

}

rule atom {proton{}} rule atom {electron {}}

rule proton {

SEED{}
proton {y .25 r .25 s .999 b .001 alpha -.001}

}

rule proton .015 {electron{}}

rule electron {

SEED{}
electron {y .25 r -.25 s .999 b .001 alpha -.001}

} rule electron .015 {

proton{}

}

rule SEED {

CIRCLE {alpha -.75 h 120 sat .45 b .5}

}