00001 
00002        
00003       
00004      
00005     
00006    
00007   
00008  
00009 
00010 
00011 
00012 
00013 #include "hdyn.h"
00014 #include "../evolve/kira_defaults.h"
00015 
00016 #ifndef TOOLBOX
00017 
00018 kira_options::kira_options() {
00019 
00020     print_xreal         =       DEFAULT_PRINT_XREAL;
00021 
00022     perturber_criterion =       DEFAULT_PERTURBER_CRITERION;
00023 
00024     optimize_scheduling =       DEFAULT_OPTIMIZE_SCHEDULING;
00025     optimize_block      =       DEFAULT_OPTIMIZE_BLOCK;
00026     allow_unperturbed   =       DEFAULT_ALLOW_UNPERTURBED;
00027     allow_multiples     =       DEFAULT_ALLOW_MULTIPLES;
00028 
00029     min_unpert_steps    =       DEFAULT_MIN_UNPERT_STEPS;
00030     full_merge_tolerance =      DEFAULT_FULL_MERGE_TOLERANCE;
00031     relax_factor        =       DEFAULT_RELAX_FACTOR;
00032     partial_merge_factor =      DEFAULT_PARTIAL_MERGE_FACTOR;
00033     full_merge_tol_for_close_binary =
00034                                 DEFAULT_FULL_MERGE_TOL_FOR_CLOSE_BINARY;
00035     multiple_merge_tolerance =  DEFAULT_MULTIPLE_MERGE_TOLERANCE;
00036     unconditional_stable_fac =  DEFAULT_UNCONDITIONAL_STABLE_FAC;
00037     partial_stable_fac  =       DEFAULT_PARTIAL_STABLE_FAC;
00038 
00039     use_aarseth_criterion =     DEFAULT_USE_AARSETH_CRITERION;
00040     aarseth_stable_fac  =       DEFAULT_AARSETH_STABLE_FAC;
00041 
00042     close_criterion     =       DEFAULT_CLOSE_CRITERION;
00043 
00044     allow_keplstep      =       DEFAULT_ALLOW_KEPLSTEP;
00045 
00046     use_old_correct_acc_and_jerk =
00047                                 DEFAULT_USE_OLD_CORRECT_ACC_AND_JERK;
00048 
00049     grape_check_count   =       DEFAULT_GRAPE_CHECK_COUNT;
00050     grape_max_cpu       =       DEFAULT_GRAPE_MAX_CPU;
00051     grape_last_cpu      =       DEFAULT_GRAPE_LAST_CPU;
00052 
00053     use_perturbed_list  =       DEFAULT_USE_PERTURBED_LIST;
00054 
00055 }
00056 
00057 #define PRS(x) s << "    " << #x << " = " << x << endl
00058 
00059 void kira_options::print(ostream &s)
00060 {
00061     s << endl << "kira_options settings:" << endl;
00062 
00063     PRS(print_xreal);
00064 
00065     PRS(perturber_criterion);
00066     PRS(optimize_scheduling);
00067     PRS(optimize_block);
00068     PRS(allow_unperturbed);
00069     PRS(allow_multiples);
00070 
00071     PRS(min_unpert_steps);
00072     PRS(full_merge_tolerance);
00073     PRS(relax_factor);
00074     PRS(partial_merge_factor);
00075     PRS(full_merge_tol_for_close_binary);
00076     PRS(multiple_merge_tolerance);
00077     PRS(unconditional_stable_fac);
00078     PRS(partial_stable_fac);
00079 
00080     PRS(use_aarseth_criterion);
00081     PRS(aarseth_stable_fac);
00082 
00083     PRS(close_criterion);
00084 
00085     PRS(allow_keplstep);
00086 
00087     PRS(use_old_correct_acc_and_jerk);
00088 
00089     PRS(grape_check_count);
00090     PRS(grape_max_cpu);
00091     PRS(grape_last_cpu);
00092 
00093     PRS(use_perturbed_list);
00094 
00095 }
00096 
00097 #endif