stephenbrooks.org : SolenoidsTo15cm.txt

› 2002-1
› 2003-1
› 2003-2
› 2004-1
› 2004-2
› 2004-4
› 2004-5
› 2004-6
› 2004-7
› 2005-2
› 2005-3
› 2005-4
› 2005-5
› 2005-7
› 2005-8
› 2005-9
› 2006-1
› 2006-2
› 2006-3
› 2006-4
› 2006-5
› 2006-6
› 2006-8
› 2006-9
› 2007-2
› 2007-3
› 2008-1
› 2008-2
› 2008-3
› 2008-4
› 2009-2
› 2009-4
› 2009-5
› 2009-6
› 2009-7
› 2010-1
› 2010-2
› 2010-3
› 2010-4
› 2010-5
› 2010-6
› 2010-7
› 2010-8
› 2011-1
› 2011-2
› 2011-3
› 2011-4
› 2011-5
› 2011-6

SolenoidsTo15cm.txt

{
SolenoidsTo15cm - September 26th, 2003
The solenoid decay channel, optimised in high generality.
Identical to SolenoidsOnly except last solenoid fixed in radius.
}

{RodSource File X Y Z RodAngle}
TantalumRod 'pi_plus_2G2eV' 0 0 [0,0.45] [0,0.5]

#z=0; ok=1;
#for (n=1;ok;n++)
#{
{Solenoid Length Radius Field}
# if (n==1) #S1 [0.2,0.45] 0.1 [0,20];#;
# else {S[n]# [0.2,0.6] [0.1,0.4] #if (n<=4) #[-5,5];#; else #[-4,4];#;}
# z+=S[n].Length;
{Drift Length}
#D[n]# [0.5,1]
# z+=D[n].Length;
# if (z>=30) ok=0;
#}
#MaxSol=n-1;
{Solenoid Length Radius Field}
Sfinal [0.2,0.6] 0.15 [-4,4]

{Finish-aperture radius} END 0.5

DecayChannel: #for (n=1;n<=MaxSol;n++) {S[n]#,#D[n]#,#}#Sfinal;

TantalumRod,DecayChannel,END;

E-mail: sb strudel character

stephenbrooks.org

Yahoo: scrutney_mallard

Jabber: stephenbrooks strudel character

jabber.org

Twitter: stephenjbrooks