KCL test for subset of poop chute (#4343)
This would have caught the regression in https://github.com/KittyCAD/modeling-app/pull/4333 which had to be reverted in https://github.com/KittyCAD/modeling-app/pull/4339
This commit is contained in:
		
							
								
								
									
										58
									
								
								src/wasm-lib/tests/executor/inputs/poop_chute.kcl
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										58
									
								
								src/wasm-lib/tests/executor/inputs/poop_chute.kcl
									
									
									
									
									
										Normal file
									
								
							@ -0,0 +1,58 @@
 | 
			
		||||
wall_thickness = 0.125
 | 
			
		||||
back_walls_width = 2
 | 
			
		||||
front_walls_width = 2.5
 | 
			
		||||
height = 5.5
 | 
			
		||||
filletRadius = 0.050
 | 
			
		||||
back_length = 7
 | 
			
		||||
exit_height = 1
 | 
			
		||||
front_length = 6
 | 
			
		||||
Fx = 0.5
 | 
			
		||||
Fy = 0.5
 | 
			
		||||
 | 
			
		||||
sketch001 = startSketchOn('-YZ')
 | 
			
		||||
  |> startProfileAt([back_walls_width / 2, 0], %)
 | 
			
		||||
  |> xLine(wall_thickness / 2, %)
 | 
			
		||||
  |> angledLineToX({ angle: 45, to: back_walls_width }, %, $seg01)
 | 
			
		||||
  |> yLineTo(height, %)
 | 
			
		||||
  |> xLine(-wall_thickness, %)
 | 
			
		||||
  |> yLineTo(segEndY(seg01), %)
 | 
			
		||||
  |> angledLineToX({
 | 
			
		||||
       angle: 45,
 | 
			
		||||
       to: back_walls_width / 2 + wall_thickness / 2
 | 
			
		||||
     }, %)
 | 
			
		||||
  |> xLine(-wall_thickness, %)
 | 
			
		||||
  |> angledLineToX({ angle: 180 - 45, to: wall_thickness }, %)
 | 
			
		||||
  |> yLineTo(height, %)
 | 
			
		||||
  |> xLineTo(0, %)
 | 
			
		||||
  |> yLineTo(segEndY(seg01), %)
 | 
			
		||||
  |> angledLineToY({ angle: 180 - 45, to: 0 }, %)
 | 
			
		||||
  |> close(%)
 | 
			
		||||
part001 = revolve({
 | 
			
		||||
  angle: 90,
 | 
			
		||||
  axis: {
 | 
			
		||||
    custom: {
 | 
			
		||||
      axis: [1.0, 0.0],
 | 
			
		||||
      origin: [0.0, height + .0000001]
 | 
			
		||||
    }
 | 
			
		||||
  }
 | 
			
		||||
}, sketch001)
 | 
			
		||||
 | 
			
		||||
sketch002 = startSketchOn('-YZ')
 | 
			
		||||
  |> startProfileAt([back_walls_width / 2, 0], %)
 | 
			
		||||
  |> xLine(wall_thickness / 2, %)
 | 
			
		||||
  |> angledLineToX({ angle: 45, to: back_walls_width }, %, $seg02)
 | 
			
		||||
  |> yLineTo(height, %)
 | 
			
		||||
  |> xLine(-wall_thickness, %)
 | 
			
		||||
  |> yLineTo(segEndY(seg01), %)
 | 
			
		||||
  |> angledLineToX({
 | 
			
		||||
       angle: 45,
 | 
			
		||||
       to: back_walls_width / 2 + wall_thickness / 2
 | 
			
		||||
     }, %)
 | 
			
		||||
  |> xLine(-wall_thickness, %)
 | 
			
		||||
  |> angledLineToX({ angle: 180 - 45, to: wall_thickness }, %)
 | 
			
		||||
  |> yLineTo(height, %)
 | 
			
		||||
  |> xLineTo(0, %)
 | 
			
		||||
  |> yLineTo(segEndY(seg02), %)
 | 
			
		||||
  |> angledLineToY({ angle: 180 - 45, to: 0 }, %)
 | 
			
		||||
  |> close(%)
 | 
			
		||||
  |> extrude(back_length - height, %)
 | 
			
		||||
							
								
								
									
										
											BIN
										
									
								
								src/wasm-lib/tests/executor/outputs/poop_chute.png
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										
											BIN
										
									
								
								src/wasm-lib/tests/executor/outputs/poop_chute.png
									
									
									
									
									
										Normal file
									
								
							
										
											Binary file not shown.
										
									
								
							| 
		 After Width: | Height: | Size: 73 KiB  | 
@ -19,6 +19,7 @@ macro_rules! kcl_test {
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
kcl_test!("sketch_on_face", kcl_test_sketch_on_face);
 | 
			
		||||
kcl_test!("poop_chute", kcl_test_poop_chute);
 | 
			
		||||
kcl_test!("neg_xz_plane", kcl_test_neg_xz_plane);
 | 
			
		||||
kcl_test!("xz_plane", kcl_test_xz_plane);
 | 
			
		||||
kcl_test!(
 | 
			
		||||
 | 
			
		||||
		Reference in New Issue
	
	Block a user