File: dim.m

package info (click to toggle)
abinit 9.2.2-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 416,828 kB
  • sloc: xml: 667,132; f90: 543,145; python: 77,716; perl: 7,479; ansic: 4,040; sh: 1,868; javascript: 692; fortran: 557; cpp: 450; objc: 323; makefile: 73; csh: 42; pascal: 31
file content (17 lines) | stat: -rw-r--r-- 399 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
load file.out
ngx=60
ngy=50
ngz=50
isodens=0.005
x=[1:ngx]
y=[1:ngy]
z=[1:ngz]
v=file(:);
v1=reshape(v,ngx,ngy,ngz);
p=patch(isosurface(y,x,z,v1,isodens));
axis([1 ngy 1 ngx 1 ngz])
set(p,'FaceColor','blue','EdgeColor','none');
light('Position',[0 1 0],'Style','infinite')
light('Position',[1 0 0],'Style','infinite')
light('Position',[0 0 -1],'Style','infinite')
set(gca,'DataAspectRatio',[1 1 1])