SHARE
TWEET

Untitled

a guest Jun 20th, 2019 53 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. restart;
  2. C:=plots:-cylinderplot(0.5,theta=0..2*Pi,z=0.5..0.5+1/sqrt(2),
  3.                        style=surface):
  4. rotC:=plottools:-rotate(C,-3*Pi/4,[[0,0.5,0.5],[0,-0.5,0.5]]):
  5.  
  6. plots:-display(
  7.   rotC,
  8.   plot3d([x-1/2,x+1/2],x=-0.5..1,y=-0.75..0.75,
  9.          style=surface,color=gray,transparency=0.5),
  10.   scaling=constrained, view=-0.5..1
  11. );
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top