| 1 |
pam-fi |
1.1 |
%!PS-Adobe-2.0 |
| 2 |
|
|
%%DocumentFonts: Courier Times-Bold |
| 3 |
|
|
%%Title: libtrk.txt (mpage) |
| 4 |
|
|
%%Creator: mpage 2.5.3 Oktober 2002 |
| 5 |
|
|
%%CreationDate: Fri Jun 17 17:52:57 2005 |
| 6 |
|
|
%%Orientation: Portrait |
| 7 |
|
|
%%DocumentMedia: Letter 612 792 |
| 8 |
|
|
%%BoundingBox: 18 18 594 774 |
| 9 |
|
|
%%Pages: (atend) |
| 10 |
|
|
%%EndComments |
| 11 |
|
|
|
| 12 |
|
|
%%BeginProlog |
| 13 |
|
|
|
| 14 |
|
|
/mp_stm usertime def |
| 15 |
|
|
/mp_pgc statusdict begin pagecount end def |
| 16 |
|
|
statusdict begin /jobname (libtrk.txt) def end |
| 17 |
|
|
statusdict /setduplexmode known { statusdict begin false setduplexmode end } if |
| 18 |
|
|
/reencsmalldict 12 dict def /ReEncodeSmall { reencsmalldict begin |
| 19 |
|
|
/newcodesandnames exch def /newfontname exch def /basefontname exch def |
| 20 |
|
|
/basefontdict basefontname findfont def /newfont basefontdict maxlength dict def |
| 21 |
|
|
basefontdict { exch dup /FID ne { dup /Encoding eq { exch dup length array copy newfont 3 1 roll put } { exch newfont 3 1 roll put } |
| 22 |
|
|
ifelse } |
| 23 |
|
|
{ pop pop } |
| 24 |
|
|
ifelse } forall |
| 25 |
|
|
newfont /FontName newfontname put |
| 26 |
|
|
newcodesandnames aload pop newcodesandnames length 2 idiv |
| 27 |
|
|
{ newfont /Encoding get 3 1 roll put } repeat |
| 28 |
|
|
newfontname newfont definefont pop end } def |
| 29 |
|
|
/charvec [ |
| 30 |
|
|
026 /Scaron |
| 31 |
|
|
027 /Ydieresis |
| 32 |
|
|
028 /Zcaron |
| 33 |
|
|
029 /scaron |
| 34 |
|
|
030 /trademark |
| 35 |
|
|
031 /zcaron |
| 36 |
|
|
032 /space |
| 37 |
|
|
033 /exclam |
| 38 |
|
|
034 /quotedbl |
| 39 |
|
|
035 /numbersign |
| 40 |
|
|
036 /dollar |
| 41 |
|
|
037 /percent |
| 42 |
|
|
038 /ampersand |
| 43 |
|
|
039 /quoteright |
| 44 |
|
|
040 /parenleft |
| 45 |
|
|
041 /parenright |
| 46 |
|
|
042 /asterisk |
| 47 |
|
|
043 /plus |
| 48 |
|
|
044 /comma |
| 49 |
|
|
045 /minus |
| 50 |
|
|
046 /period |
| 51 |
|
|
047 /slash |
| 52 |
|
|
048 /zero |
| 53 |
|
|
049 /one |
| 54 |
|
|
050 /two |
| 55 |
|
|
051 /three |
| 56 |
|
|
052 /four |
| 57 |
|
|
053 /five |
| 58 |
|
|
054 /six |
| 59 |
|
|
055 /seven |
| 60 |
|
|
056 /eight |
| 61 |
|
|
057 /nine |
| 62 |
|
|
058 /colon |
| 63 |
|
|
059 /semicolon |
| 64 |
|
|
060 /less |
| 65 |
|
|
061 /equal |
| 66 |
|
|
062 /greater |
| 67 |
|
|
063 /question |
| 68 |
|
|
064 /at |
| 69 |
|
|
065 /A |
| 70 |
|
|
066 /B |
| 71 |
|
|
067 /C |
| 72 |
|
|
068 /D |
| 73 |
|
|
069 /E |
| 74 |
|
|
070 /F |
| 75 |
|
|
071 /G |
| 76 |
|
|
072 /H |
| 77 |
|
|
073 /I |
| 78 |
|
|
074 /J |
| 79 |
|
|
075 /K |
| 80 |
|
|
076 /L |
| 81 |
|
|
077 /M |
| 82 |
|
|
078 /N |
| 83 |
|
|
079 /O |
| 84 |
|
|
080 /P |
| 85 |
|
|
081 /Q |
| 86 |
|
|
082 /R |
| 87 |
|
|
083 /S |
| 88 |
|
|
084 /T |
| 89 |
|
|
085 /U |
| 90 |
|
|
086 /V |
| 91 |
|
|
087 /W |
| 92 |
|
|
088 /X |
| 93 |
|
|
089 /Y |
| 94 |
|
|
090 /Z |
| 95 |
|
|
091 /bracketleft |
| 96 |
|
|
092 /backslash |
| 97 |
|
|
093 /bracketright |
| 98 |
|
|
094 /asciicircum |
| 99 |
|
|
095 /underscore |
| 100 |
|
|
096 /quoteleft |
| 101 |
|
|
097 /a |
| 102 |
|
|
098 /b |
| 103 |
|
|
099 /c |
| 104 |
|
|
100 /d |
| 105 |
|
|
101 /e |
| 106 |
|
|
102 /f |
| 107 |
|
|
103 /g |
| 108 |
|
|
104 /h |
| 109 |
|
|
105 /i |
| 110 |
|
|
106 /j |
| 111 |
|
|
107 /k |
| 112 |
|
|
108 /l |
| 113 |
|
|
109 /m |
| 114 |
|
|
110 /n |
| 115 |
|
|
111 /o |
| 116 |
|
|
112 /p |
| 117 |
|
|
113 /q |
| 118 |
|
|
114 /r |
| 119 |
|
|
115 /s |
| 120 |
|
|
116 /t |
| 121 |
|
|
117 /u |
| 122 |
|
|
118 /v |
| 123 |
|
|
119 /w |
| 124 |
|
|
120 /x |
| 125 |
|
|
121 /y |
| 126 |
|
|
122 /z |
| 127 |
|
|
123 /braceleft |
| 128 |
|
|
124 /bar |
| 129 |
|
|
125 /braceright |
| 130 |
|
|
126 /asciitilde |
| 131 |
|
|
127 /.notdef |
| 132 |
|
|
128 /fraction |
| 133 |
|
|
129 /florin |
| 134 |
|
|
130 /quotesingle |
| 135 |
|
|
131 /quotedblleft |
| 136 |
|
|
132 /guilsinglleft |
| 137 |
|
|
133 /guilsinglright |
| 138 |
|
|
134 /fi |
| 139 |
|
|
135 /fl |
| 140 |
|
|
136 /endash |
| 141 |
|
|
137 /dagger |
| 142 |
|
|
138 /daggerdbl |
| 143 |
|
|
139 /bullet |
| 144 |
|
|
140 /quotesinglbase |
| 145 |
|
|
141 /quotedblbase |
| 146 |
|
|
142 /quotedblright |
| 147 |
|
|
143 /ellipsis |
| 148 |
|
|
144 /dotlessi |
| 149 |
|
|
145 /grave |
| 150 |
|
|
146 /acute |
| 151 |
|
|
147 /circumflex |
| 152 |
|
|
148 /tilde |
| 153 |
|
|
149 /oe |
| 154 |
|
|
150 /breve |
| 155 |
|
|
151 /dotaccent |
| 156 |
|
|
152 /perthousand |
| 157 |
|
|
153 /emdash |
| 158 |
|
|
154 /ring |
| 159 |
|
|
155 /Lslash |
| 160 |
|
|
156 /OE |
| 161 |
|
|
157 /hungarumlaut |
| 162 |
|
|
158 /ogonek |
| 163 |
|
|
159 /caron |
| 164 |
|
|
160 /lslash |
| 165 |
|
|
161 /exclamdown |
| 166 |
|
|
162 /cent |
| 167 |
|
|
163 /sterling |
| 168 |
|
|
164 /currency |
| 169 |
|
|
165 /yen |
| 170 |
|
|
166 /brokenbar |
| 171 |
|
|
167 /section |
| 172 |
|
|
168 /dieresis |
| 173 |
|
|
169 /copyright |
| 174 |
|
|
170 /ordfeminine |
| 175 |
|
|
171 /guillemotleft |
| 176 |
|
|
172 /logicalnot |
| 177 |
|
|
173 /hyphen |
| 178 |
|
|
174 /registered |
| 179 |
|
|
175 /macron |
| 180 |
|
|
176 /degree |
| 181 |
|
|
177 /plusminus |
| 182 |
|
|
178 /twosuperior |
| 183 |
|
|
179 /threesuperior |
| 184 |
|
|
180 /acute |
| 185 |
|
|
181 /mu |
| 186 |
|
|
182 /paragraph |
| 187 |
|
|
183 /periodcentered |
| 188 |
|
|
184 /cedilla |
| 189 |
|
|
185 /onesuperior |
| 190 |
|
|
186 /ordmasculine |
| 191 |
|
|
187 /guillemotright |
| 192 |
|
|
188 /onequarter |
| 193 |
|
|
189 /onehalf |
| 194 |
|
|
190 /threequarters |
| 195 |
|
|
191 /questiondown |
| 196 |
|
|
192 /Agrave |
| 197 |
|
|
193 /Aacute |
| 198 |
|
|
194 /Acircumflex |
| 199 |
|
|
195 /Atilde |
| 200 |
|
|
196 /Adieresis |
| 201 |
|
|
197 /Aring |
| 202 |
|
|
198 /AE |
| 203 |
|
|
199 /Ccedilla |
| 204 |
|
|
200 /Egrave |
| 205 |
|
|
201 /Eacute |
| 206 |
|
|
202 /Ecircumflex |
| 207 |
|
|
203 /Edieresis |
| 208 |
|
|
204 /Igrave |
| 209 |
|
|
205 /Iacute |
| 210 |
|
|
206 /Icircumflex |
| 211 |
|
|
207 /Idieresis |
| 212 |
|
|
208 /Eth |
| 213 |
|
|
209 /Ntilde |
| 214 |
|
|
210 /Ograve |
| 215 |
|
|
211 /Oacute |
| 216 |
|
|
212 /Ocircumflex |
| 217 |
|
|
213 /Otilde |
| 218 |
|
|
214 /Odieresis |
| 219 |
|
|
215 /multiply |
| 220 |
|
|
216 /Oslash |
| 221 |
|
|
217 /Ugrave |
| 222 |
|
|
218 /Uacute |
| 223 |
|
|
219 /Ucircumflex |
| 224 |
|
|
220 /Udieresis |
| 225 |
|
|
221 /Yacute |
| 226 |
|
|
222 /Thorn |
| 227 |
|
|
223 /germandbls |
| 228 |
|
|
224 /agrave |
| 229 |
|
|
225 /aacute |
| 230 |
|
|
226 /acircumflex |
| 231 |
|
|
227 /atilde |
| 232 |
|
|
228 /adieresis |
| 233 |
|
|
229 /aring |
| 234 |
|
|
230 /ae |
| 235 |
|
|
231 /ccedilla |
| 236 |
|
|
232 /egrave |
| 237 |
|
|
233 /eacute |
| 238 |
|
|
234 /ecircumflex |
| 239 |
|
|
235 /edieresis |
| 240 |
|
|
236 /igrave |
| 241 |
|
|
237 /iacute |
| 242 |
|
|
238 /icircumflex |
| 243 |
|
|
239 /idieresis |
| 244 |
|
|
240 /eth |
| 245 |
|
|
241 /ntilde |
| 246 |
|
|
242 /ograve |
| 247 |
|
|
243 /oacute |
| 248 |
|
|
244 /ocircumflex |
| 249 |
|
|
245 /otilde |
| 250 |
|
|
246 /odieresis |
| 251 |
|
|
247 /divide |
| 252 |
|
|
248 /oslash |
| 253 |
|
|
249 /ugrave |
| 254 |
|
|
250 /uacute |
| 255 |
|
|
251 /ucircumflex |
| 256 |
|
|
252 /udieresis |
| 257 |
|
|
253 /yacute |
| 258 |
|
|
254 /thorn |
| 259 |
|
|
255 /ydieresis |
| 260 |
|
|
] def |
| 261 |
|
|
/Courier /OurCharSet charvec ReEncodeSmall |
| 262 |
|
|
/textfont /OurCharSet findfont 11 scalefont def |
| 263 |
|
|
/textfontbold /OurCharSet-Bold findfont 11 scalefont def |
| 264 |
|
|
/fnamefont /Times-Bold findfont 14 scalefont def |
| 265 |
|
|
/headerfont /Times-Bold findfont 12 scalefont def |
| 266 |
|
|
textfont setfont |
| 267 |
|
|
(a) stringwidth pop /mp_a_x exch def |
| 268 |
|
|
/kanj /Ryumin-Light-H findfont 11 scalefont def |
| 269 |
|
|
/han /Ryumin-Light.Hankaku findfont 11 scalefont def |
| 270 |
|
|
%%EndProlog |
| 271 |
|
|
%%Page: 1 1 |
| 272 |
|
|
save |
| 273 |
|
|
0 setlinewidth |
| 274 |
|
|
18 18 moveto 0 756 rlineto |
| 275 |
|
|
576 0 rlineto 0 -756 rlineto closepath stroke |
| 276 |
|
|
gsave |
| 277 |
|
|
18 18 translate |
| 278 |
|
|
0 0 moveto 0 756 rlineto 576 0 rlineto 0 -756 rlineto closepath clip |
| 279 |
|
|
576 80 mp_a_x mul div 756 792 div scale |
| 280 |
|
|
4 7 translate 568 576 div 784 792 div scale |
| 281 |
|
|
textfont setfont |
| 282 |
|
|
34 mp_a_x mul 780 moveto (============) show |
| 283 |
|
|
37 mp_a_x mul 768 moveto (LIBTRK) show |
| 284 |
|
|
36 mp_a_x mul 756 moveto (\(R-1.01\)) show |
| 285 |
|
|
34 mp_a_x mul 744 moveto (============) show |
| 286 |
|
|
0 720 moveto (LIBTRK is a library containing fortran subroutines of general utility. ) show |
| 287 |
|
|
0 708 moveto (The library is stored in the directory trk-software-ground/bin. Both a static) show |
| 288 |
|
|
0 696 moveto (\(.a\) and dynamic \(.so\) libraries have been created. ) show |
| 289 |
|
|
0 672 moveto (List of subroutines) show |
| 290 |
|
|
0 660 moveto (-------------------) show |
| 291 |
|
|
0 636 moveto (- TRACK) show |
| 292 |
|
|
0 624 moveto (- READ_B) show |
| 293 |
|
|
0 612 moveto (- INTER_B) show |
| 294 |
|
|
0 576 moveto (Usage:) show |
| 295 |
|
|
0 552 moveto (--------------------------------------------------------------------------------) show |
| 296 |
|
|
0 540 moveto (CALL READ_B) show |
| 297 |
|
|
0 528 moveto (--------------------------------------------------------------------------------) show |
| 298 |
|
|
0 504 moveto (Read the magnetic field maps \(rz files\) and fill related common blocks.) show |
| 299 |
|
|
0 492 moveto (===> To be called once, before using TRACK and INTER_B) show |
| 300 |
|
|
0 468 moveto (--------------------------------------------------------------------------------) show |
| 301 |
|
|
0 456 moveto (CALL TRACK\(*NPTOF,*ZIN,XOUT*,YOUT*,*AL_P,IFAIL*\)) show |
| 302 |
|
|
0 444 moveto (--------------------------------------------------------------------------------) show |
| 303 |
|
|
0 420 moveto (NPTOF \(INTEGER\) Num. points ) show |
| 304 |
|
|
0 408 moveto (ZIN\(NPTOF\) \(DOUBLE\) Input z-coordinates \(in cm\)) show |
| 305 |
|
|
0 396 moveto (XOUT\(NPTOF\) \(DOUBLE\) Output x-coordinates \(in cm\)) show |
| 306 |
|
|
0 384 moveto (YOUT\(NPTOF\) \(DOUBLE\) Output y-coordinates \(in cm\)) show |
| 307 |
|
|
0 372 moveto (AL_P\(6\) \(DOUBLE\) Track state vector) show |
| 308 |
|
|
0 360 moveto (IFAIL \(INTEGER\) Error flag \(ok if IFLAG=0\)) show |
| 309 |
|
|
0 336 moveto (Calculate particle-trajectory coordinates, for the state vector AL_P, ) show |
| 310 |
|
|
0 324 moveto (at z-coordinates set by the user. ) show |
| 311 |
|
|
0 312 moveto (\(Make use of GRKUTA, routine to solve kinematic equations in a magnetic field) show |
| 312 |
|
|
0 300 moveto (using Runge-Kutta method, adapted from GEANT3 library\)) show |
| 313 |
|
|
0 276 moveto (--------------------------------------------------------------------------------) show |
| 314 |
|
|
0 264 moveto (CALL INTER_B\(*X,*Y,*Z,B*\)) show |
| 315 |
|
|
0 252 moveto (--------------------------------------------------------------------------------) show |
| 316 |
|
|
0 228 moveto (X,Y,Z \(DOUBLE\) Coordinates \(in m\)) show |
| 317 |
|
|
0 216 moveto (B\(3\) \(DOUBLE\) Magnetic field \(in T\)) show |
| 318 |
|
|
0 192 moveto (Evaluate the three components of the magnetic field, by interpolating the) show |
| 319 |
|
|
0 180 moveto (measured magnetic field map. ) show |
| 320 |
|
|
0 168 moveto (\(Used by TRACK\)) show |
| 321 |
|
|
grestore |
| 322 |
|
|
restore |
| 323 |
|
|
showpage |
| 324 |
|
|
%%Trailer |
| 325 |
|
|
%%Pages: 1 |
Parent Directory
| 
Revision Log