+module DemoPropAngleSelect(c){
+ color(c) difference(){
+ union(){ children(); }
+ translate([ prop_x_pos, -400, -200 ])
+ cube([ 400,800,400 ]);
+ }
+}
+
+module DemoPropAngle(ang){
+ hL = [0, -(phone_height - hppT[0]), hppT[1]];
+ hC = [0, -(phone_height - hppB[0]), hppB[1] + hp_k*2];
+
+ DemoPropAngleSelect("red") Case();
+
+ translate([0,0, -hp_k*2])
+ translate(hC)
+ rotate([-ang/2,0,0])
+ translate(-hC)
+ translate(hL)
+ rotate([-ang/2,0,0])
+ translate(-hL)
+ DemoPropAngleSelect("blue") Lid();
+
+ color("orange")
+ translate([prop_x_pos, -prlp10[0], prlp10[1]])
+ rotate([90,0,90])
+ Prop();
+}
+
+module DemoPropAngles(){ ////toplevel
+ DemoPropAngle(15);
+}
+