pnt p1 0 0 0
pnt p2 0 100 0
#pnt p3 45 45 0
#pnt p4 45 55 0
line l1 p1 p2
#line l2 p3 p4
seta se1 l l1
#seta se2 l l2
swep se1 ses1 tra 100 0 0
#swep se2 ses2 tra 10 0 0
seta ses s A001
swep ses ses3 tra 0 0 -4
#seta ses4 s A002
#swep ses4 ses5 tra 0 0 -4
#meshing
div all 10
elty all he8
mesh all
send all abq
plot f all
view edge off
view elem
#qadd load
#mode:a
#type in f
#278 e:441 s:3 n= 650 661 540 529
#279 e:450 s:5 n= 539 550 671 660
#done
#will assign the mass-flow of 100 to all element-faces of the given set
#send load abq dflux 100
#To be specific of a surface a heat is applyed to I can use this
#send surf abq dflux lc1 e1
#but how can I check the serface/face is choosen correctly
#seta new f 278
#plot e all
#plus fa new b
#ok this is the face the heat is applyed to
#then
#send serf abq dflux new e441
#please wait for ‘ready’
#write file: serf.dfl
#ready
#ready
#File serf.dfl appeared to be emty though all went nicely.
#prnt se
#1 all stat:o n:1331 e:1000 f:600 p:8 l:12 c:0 s:6 b:1 L:0 S:0 se:0 sh:0 v:0
#3 se1 stat:c n:9 e:0 f:0 p:0 l:1 c:0 s:0 b:0 L:0 S:0 se:0 sh:0 v:0
#4 ses1 stat:c n:11 e:0 f:0 p:2 l:1 c:0 s:0 b:0 L:0 S:0 se:0 sh:0 v:0
#5 ses stat:c n:81 e:0 f:64 p:0 l:0 c:0 s:1 b:0 L:0 S:0 se:0 sh:0 v:0
#6 ses3 stat:c n:121 e:0 f:100 p:4 l:4 c:0 s:1 b:0 L:0 S:0 se:0 sh:0 v:0
#7 new stat:c n:0 e:0 f:1 p:0 l:0 c:0 s:0 b:0 L:0 S:0 se:0 sh:0 v:0
#8 -NJBY stat:c n:0 e:0 f:0 p:0 l:0 c:0 s:0 b:0 L:0 S:0 se:0 sh:0 v:0
#9 new1 stat:c n:0 e:0 f:1 p:0 l:0 c:0 s:0 b:0 L:0 S:0 se:0 sh:0 v:0
#10 serf stat:c n:0 e:0 f:0 p:0 l:0 c:0 s:0 b:0 L:0 S:0 se:0 sh:0 v:0
#I do something wrong. Any ideas are appreciated.
#this is my answer
#seta newe e 441
#plus e newe b
#no way file is empty
#send serf abq dflux newe e441
#please wait for ‘ready’
#write file: serf.dfl
#ready
#ready