/usr/share/doc/freefem-examples/condens.pde is in freefem-examples 3.5.8-5.1ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | /* -*- Mode: pde -*- */
border(1,0,2*pi,60){
x := 5*cos(t);
y := 5*sin(t);
};
border(2,0,14,57){
if(t<=1)then { x := 2-t; y := -3};
if((1<t)and(t<=7))then {x:=1; y:=-4+t};
if((7<t)and(t<=8))then {x:=t-6; y:=3}
else if(8<t) then {x:=2; y:=11-t}
};
border(3,0,14,57){
if(t<=1)then { x := -1-t; y := -3};
if((1<t)and(t<=7))then {x:=-2; y:=-4+t};
if((7<t)and(t<=8))then {x:=t-9; y:=3}
else if(8<t) then {x:=-1; y:=11-t}
};
buildmesh(800);
solve(v){
onbdy(1) v = 0;
onbdy(2) v = 1;
onbdy(3) v = -1;
pde(v) -laplace(v) =0;
};
plot(v);
|