26 lines
850 B
HTML
26 lines
850 B
HTML
|
|
c===============================================================================
|
|
c COM_TD_INT.INC
|
|
c===============================================================================
|
|
|
|
c Dieser include-file declariert diejenigen Variablen, die den Routinen in
|
|
c der Fortran-Text-Datei SUB-TD-CALC gemeinsam zugaenglich sind, und definiert
|
|
c den zugehoerigen COMMON-Block:
|
|
|
|
c - die Teilchen-Parameter Ladung, Masse, Ort, Geschw., Startenergie
|
|
real q, m, t, x, y, z, v_x, v_y, v_z, E0
|
|
|
|
c - was ausgegeben werden soll:
|
|
logical DEBUG, GRAPHICS
|
|
|
|
c - die Return-Variable:
|
|
integer n_return
|
|
|
|
c - logicals, die anzeigen, ob das Teilchen schon einmal reflektiert wurde:
|
|
logical log_refl_Vh, log_refl_V3
|
|
|
|
c - der COMMON-Block:
|
|
COMMON /INTERN/ q, m, t, x, y, z, v_x, v_y, v_z, E0
|
|
COMMON /INTERN/ DEBUG,GRAPHICS, n_return,log_refl_VH,log_refl_V3
|
|
|