// Height Field Insel
// (C) 8/1996 Christian Perle

#include "colors.inc"

camera {
  location <2, .3, -6>
  direction 1.5*z
  look_at 0*z
  rotate 180*y
}

light_source { <100, 100, -100> color White }
light_source { <-100, 100, -100> color Gray80 }

// Himmel
sphere {
  0*x, 1
  pigment {
    bozo scale <1, 1/6, 1>
    turbulence .6
    color_map {
      [0 color Gray10]
      [.7 color Red]
      [1 color Orange]
    }
  }
  finish { ambient 1 diffuse 0 }
  scale 1000
  hollow
}

// Insel
height_field {
  ppm "hfimage.ppm" smooth
  pigment {
    gradient y
    color_map {
      [0 color ForestGreen]
      [0.3 color ForestGreen]
      [0.6 color Khaki]
      [0.8 color rgb<1, .9, .8>]
      [1 color White]
    }
  }
  translate <-.5, -.5, -.5>
  scale <6.4, 1.2, 4.8>
}

// Wasser
plane {
  y, -.4
  pigment { color rgb<.2, .4, 1> }
  finish { reflection .3 }
  normal { ripples .4 scale .07 }
}