//@--------Include Files----------------------------------------------------------

#version unofficial MegaPov 0.7;
#declare View_POV_Include_Stack=1;  //comment this line to deactivate
           
#include "colors.inc"
#include "metals.inc"

//@--------Camera-----------------------------------------------------------------

#declare CamPos = <-5, 5,-20>;
#declare CamLook = < 0, 0, 0>;

camera{
  location  CamPos
  look_at   CamLook
}
light_source{
  CamPos + < 0, 0, 0>
  White
}

//@--------Lighting---------------------------------------------------------------



//@--------Textures---------------------------------------------------------------

#declare SkyPig =
pigment{
  bozo
  turbulence 0.65
  pigment_map{
    [ 0.00 White ]
    [ 0.25 White ]
    [ 0.50 SkyBlue ]
    [ 1.00 SkyBlue ]
  }
  rotate 90*y
  scale <.5, .2, .5>
  scale .5
}
#declare GroundTex =
texture{
  pigment{
    checker Black,White
  }
  scale .5
}
#declare SphereTex = texture{ T_Chrome_3B }

//@--------Functions--------------------------------------------------------------

#declare h=100;
#declare rsocpFunc =
function{
  "strophoid" <.2,2,0,.9>
}

//@--------Objects----------------------------------------------------------------

isosurface{
  function{ rsocpFunc(-y,x,z) }
  contained_by{ box{ <-h,-1,-h>,<h,2,h> } }
  max_gradient 35.573
  eval
  sign -1
  method 2
  accuracy .0001
  texture{
    gradient y
    translate -.5*y
    scale <0,5,0>
    texture_map{
      [ 0.0 GroundTex ]
      [ 0.5 GroundTex ]
      [ 0.5 SphereTex ]
      [ 1.0 SphereTex ]
    }
  }
  scale 4
}

//@--------Environment------------------------------------------------------------

background{ Black }
sky_sphere{ pigment{ SkyPig } }

//@-------------------------------------------------------------------------------