// Persistence of Vision Ray Tracer Scene Description File
// File: ?.pov
// Vers: 3.5
// Desc: scence template
// Date: 10/06/04
// Auth: mrg
//
/*
Antialias=on

Antialias_Threshold=0.2
Antialias_Depth=3
Input_File_Name=vfield_charge.pov

Initial_Frame=1
Final_Frame=120
Initial_Clock=0
Final_Clock=1

Cyclic_Animation=off
Pause_when_Done=off

+FC
*/
#version 3.5;

#include "colors.inc"
// general math functions and macros
// 
#include "math.inc"
//#include "mrg_textures.inc"
#include "mrg_misc3.inc"


global_settings {
  assumed_gamma 1.0
  ambient_light color rgb <1,1,1>
}
#declare cpos= <15,25, -35.0>*3;
background { color rgb <.05, 0.05, 0.05> }
#declare fprad = 1;
#declare lclock=clock+.0;
#declare cp=<(-1+2*lclock)*3,0,0>;
cylinder{-6*x,6*x,.015 
        texture {
          pigment {          // (---surface color---)
                color rgbt <.7,0.0,0,.5>
          }
          finish {           // (---surface finish---)
            ambient 1.0
            specular 0.1     // shiny
          }
        }
no_reflection no_shadow
}

torus{fprad,.02  
        texture {
          pigment {          // (---surface color---)
                color rgbt <.4,.4,.4,.8>
          }
          finish {           // (---surface finish---)
            ambient 1.0
            specular 0.1     // shiny
          }
        }
        rotate z*90
}
#declare mrg_red_texture=        texture {
          pigment {          // (---surface color---)
                color rgbt <.7,0.0,0,.0>
          }
          finish {           // (---surface finish---)
            ambient 1.0
            specular 0.1     // shiny
          }
        };
#declare mrg_aqua_texture=        texture {
          pigment {          // (---surface color---)
                color rgbt <.0,.6,.6,.0>
          }
          finish {           // (---surface finish---)
            ambient 1.0
            specular 0.1     // shiny
          }
        };


sphere{cp, .1 
        texture {mrg_red_texture}

}
object{orient_text(cp-.35*x-.15*y,cpos,"q",.5)
        texture {mrg_red_texture}
}


#declare awidth=.03;
#declare headl= 10*awidth;
#declare headw= 3*awidth;



object{ Make_Vector(1.0*x,headl,awidth,headw) //velocity
     texture { 
          pigment {color rgb <.0,.7,.0> }
          finish {  ambient 1.0 specular 0.1 }
     }

          translate cp}
object{orient_text(cp+1.2*x,cpos,"v",.5)
     texture { 
          pigment {color rgb <.0,.7,.0> }
          finish {  ambient 1.0 specular 0.1 }
     }
}


object{ Make_Vector(fprad*y-cp,headl,awidth,headw)
                 texture {
                    pigment {  color rgb <.05,.05,.8> }
                    finish { ambient 1.0 specular 0.1  }
                  }
          translate cp}
object{orient_text((fprad+.3)*y-.0*x,cpos,"r",.5)
                 texture {
                    pigment {  color rgb <.05,.05,.8> }
                    finish { ambient 1.0 specular 0.1  }
                  }
}


#declare rr =  (fprad*y-cp);
#declare rhat= rr/vlength(rr);
#declare B = -vcross(x,rr)/pow(vlength(rr),3)*10;

object{ Make_Vector(B,headl,awidth,headw)
                 texture {mrg_aqua_texture}

          translate fprad*y}

object{orient_text(fprad*y+1.1*B-.3*y,cpos,"B",.5)
                 texture {mrg_aqua_texture }
}



box { -.01*y+6.*(x+z), +.01*y-6.05*(x+z)      
    pigment {
//      brick color Yellow, color rgbt <1,1,1,1>  
      brick color rgbt <.75,.5,.1,.7> , color rgbt <.1,.1,.1,1>  
      brick_size <1,1,1>*2
      mortar .035  
      //rotate 90*y    
      translate -.2*y-z*1
        
    } finish{ambient 1} 

}
camera {
  location  cpos
  right     x*image_width/image_height
  look_at   cp/2
  angle 4
}