00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00012
00013
00014
00015
00016
00017
00018
00019 #ifndef STARLAB_HARP3_H
00020 # define STARLAB_HARP3_H
00021
00022 extern "C" void h3open_();
00023 extern "C" void h3close_();
00024 extern "C" int h3npipe_();
00025 extern "C" void h3setnboards_(int * );
00026 extern "C" int h3getnboards_();
00027 extern "C" unsigned int h3wait_();
00028 extern "C" void h3setti_(double * ti);
00029 extern "C" void h3setmode_(int * mode, int * iboard);
00030 extern "C" void h3setled_(int * mode, int * iboard);
00031 extern "C" int h3jpmax_();
00032 extern "C" void h3jpdma_indirect_(int * nj,int * hostindex, vec * xj, vec * vj,vec * aj,vec * jj,real * mj,real * tj,int *mode);
00033 extern "C" void h3mjpdma_indirect_(int * nj,int * hostindex, vec * xj, vec * vj,vec * aj,vec * jj, real * mj,real * tj,int *mode, int * buff_id);
00034 extern "C" void h3mjpdma_start_(int * buff_id);
00035 extern "C" void h3mjpdma_flush_();
00036 extern "C" void h3calc_(int * nj,int * ni,vec * xi,vec * vi,real * eps2,real* h2,
00037 vec * acc,vec * jerk,real * pot);
00038 extern "C" void h3calc_firsthalf_(int * nj,int *ni,vec * xi,vec * vi,real *eps2,real *h2);
00039 extern "C" void h3calc_lasthalf_(int *ni,vec * acc,vec * jerk,real *pot);
00040 extern "C" void h3nbread_(int *nboards);
00041 extern "C" int h3nblist_(int *board, int *chip, int *nblist);
00042 extern "C" int count_nblist_low(int board, int chip);
00043 extern "C" void h3setdebuglevel_(int * debug_level);
00044 extern "C" void h3checkdmabuffers_();
00045 extern "C" void set_time_check_mode(int mode);
00046
00047 #endif
00048
00049
00050
00051
00052
00053
00054