Loading image file: /usr/lib/reduce/pslbuild/red/reduce.img 
Reduce (Free PSL version, revision 4715),  9-Aug-2018 ...

1: 
2: 
(drop model_state midmodel_add massolve equationlist feyrshow midmodel 
particle_table symbole_list_gen model_gen model_gen1 particle_table_gen 
feynman_rules model_input matterintinput symbole_list add_vertices 
physical_parameters physical_parameters_gen)

(sout alldiagramlist outadir fout amp_information option)

(showmore selfenergy justnumber ndiagfile ncolor nout nsy nsym state set_ext_sym
mkpsymboleok)

phys_cut := {}

phyinput_add := {}

ok

hpux

no

model_generator1

model_generator2

model_generator3

*** local variable n_coupling in procedure diagram_generator not used 

diagram_generator

write_diagram_information

write_next_amplitude

write_next_kinematic

generation_kinematics

process_chose23

gen_phyinput

get_x

amplitude_evaluation

model_chose

model_chose1

write_build_model_first

write_build_model

write_start_process

write_start_process1

write_model_information

write_process_information

process_chose

gmprocess

gen_wdlist

add_d0

add_d

d_alg

drop_zero_pa

mk_fpa_diag

gen_fit_parameter_list

find_n_it

gen_resonace_list

get_fasl_type

*** nonlocal use of undeclared variable new_parameter_list in procedure gmhtml 

gmhtml

ghtml

start_fdc
fdc_home:="/home/fdcpwa/fdc-pwa3.0/"$


op_system:='linux$


$

end$

model_state := model_state

"debug/massolve"

"debug/equationlist"

"debug/debug_input"

feyrshow := feynman_rule_show

drop := vertices_drop_list

add_vertices

"system/midmodel"

"system/midmodel_add"

"system/physical_parameters"

"debug/debug_input"

"diagram/"

"diagram/sout"

amp_information

option
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%---FDC---%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  Now, you have just load the FDC package for Feynman Diagram Calculation  %
 %  The First step, you should choose a Physical model by perform:           %
 %  model_chose(aa);                                                         %
 %  Where aa refer to the file in which the model definition information is  %
 %  stored. The example of it could be found in file:                        %
 %  /home/fdcpwa/fdc-pwa3.0/example/model.def
 %  If the model is already built,  you can go directly to chose             %
 %  Physical process by perform:                                             %
 %  process_chose(aa);                                                       %
 %  Where aa refer to the file in which the process definition information   %
 %  is stored. The example of it could be found in file:                     %
 %  /home/fdcpwa/fdc-pwa3.0/example/process.def
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3: 
*** psi already defined as operator 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%---FDC---%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 Now, You are working on the 
The Phenomenology Lagrangian Model for $J/\Psi$ Physics in the directory, 
../model/  which is inputed by Jian-Xiong Wang and Rui-Chang Niu on 
April 15, 2022.   You choose the pr24 --->pr2 pr1 pr1     in the directory nil, 
  which is inputed by Jian-Xiong Wang and FDC system and FDC system on 
Novemember 6, 2002.   So you can start to generate all the Feynman Diagram for 
  the process by  diagram_generator(n) 
  where n means within n-th perturbative order you want to find the leading
  diagrams of this process. 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
4: 4: a=(pr2 pr1 pr1 pr24) any_list=(any_nf any_ext proton any any_f any_b any_b1 
any_b0 any_q any_l any_v any_exp) n= nil    n===2
The leading order for the process is ((g . 2))
 
There are 49 diagrams for this order,
 
 The next step is to evaluate the amplitude by performing 
 amplitude_evaluation()
 The next step is to generate kinematics by performing 
 generation_kinematics()
Time: 10 ms
     *  ...... Successed in Feynman Diagram Generation
5: 
Quitting
