Toggle navigation
?
users online
Logout
Open hangout
Open chat for current file
[]*0. [[L,W,H]|T]*V:-W=0,X is 4*pi*L^3/3,T*Y,V is X+Y;X is L*W*H,T*Y,V is X+Y. p(L):-L*V,write(V). % p([[1,4,3],[2,2,2],[3,0,0],[4,4,4]]). 197.09733552923257 % p([[5,0,0]]). 523.5987755982989