name_dvm[CLFDVM]   = "clfdvm"; //fortran subroutine closing all opened files
name_dvm[RTLINI]   = "linit";
name_dvm[RTLEXI]   = "lexit";
name_dvm[GETAM]    = "getam";
name_dvm[GETVM]    = "getps";
name_dvm[BEGBL]    = "begbl";
name_dvm[ENDBL]    = "endbl";
name_dvm[CRTAMV]   = "crtamv";
name_dvm[DISAM]    = "distr";
name_dvm[CRTDA]    = "crtda";
name_dvm[ALGNDA]   = "align";
name_dvm[REDVAR]   = "crtred";
name_dvm[REDVARF]  = "crtrdf";
name_dvm[CRTRG]    = "crtrg";
name_dvm[INSRV]    = "insred";
name_dvm[SAVERV]   = "saverv";
name_dvm[STARTR]   = "strtrd";
name_dvm[WAITR]    = "waitrd";
name_dvm[DELRG]    = "delrg";
name_dvm[CRTSHG]   = "crtshg";
name_dvm[DATOSHG]  = "inssh";
name_dvm[STARTSH]  = "strtsh";
name_dvm[WAITSH]   = "waitsh";
name_dvm[DELSHG]   = "delshg";
name_dvm[CRTPLP]   = "crtpl";
name_dvm[BEGPLP]   = "mappl";
name_dvm[ENDPLP]   = "endpl";
name_dvm[BFIRST]   = "exfrst";
name_dvm[BLAST]    = "imlast";
name_dvm[DOLOOP]   = "dopl";
name_dvm[GETADR]   = "getadr";
name_dvm[GETAI]    = "getai";
name_dvm[GETAL]    = "getal";
name_dvm[GETAF]    = "getaf";
name_dvm[GETAD]    = "getad";
name_dvm[GETAC]    = "getac";
name_dvm[GETACH]   = "getach";
name_dvm[TSTIOP]   = "tstio";
name_dvm[GETRNK]   = "getrnk";
name_dvm[GETSIZ]   = "getsiz";
name_dvm[ARRCPY]   = "arrcpy";
name_dvm[SRMEM]    = "srmem";
name_dvm[RDISAM]   = "redis";
name_dvm[REALGN]   = "realn";
name_dvm[RWELM]    = "rwelm";
name_dvm[RWELMF]   = "rwelmf";
name_dvm[DELOBJ]   = "delobj";
name_dvm[TSTELM]   = "tstelm";
name_dvm[DLOADV]   = "dldv";
name_dvm[DSTORV]   = "dstv";
name_dvm[DPRSTV]   = "dprstv";
name_dvm[DINOUT]   = "dinout";
name_dvm[DRMBUF]   = "drmbuf";
name_dvm[DITER]    = "diter";
name_dvm[DBEGPL]   = "dbegpl";
name_dvm[DBEGSL]   = "dbegsl";
name_dvm[DENDL]    = "dendl";
name_dvm[DSKPBL]   = "dskpbl";
name_dvm[BINTER]   = "binter";
name_dvm[EINTER]   = "einter";
name_dvm[BSLOOP]   = "bsloop";
name_dvm[BPLOOP]   = "bploop";
name_dvm[ENLOOP]   = "enloop";
name_dvm[BIOF]     = "biof";
name_dvm[EIOF]     = "eiof";
name_dvm[FNAME]    = "fname";
name_dvm[LNUMB]    = "lnumb";
name_dvm[ADDHDR]   = "addhdr";
name_dvm[PSVIEW]   = "psview";
name_dvm[CRTPS]    = "crtps";
name_dvm[GETAMV]   = "getamv";
name_dvm[GETAMR]   = "getamr";
name_dvm[MAPAM]    = "mapam";
name_dvm[RUNAM]    = "runam";
name_dvm[STOPAM]   = "stopam";
name_dvm[CRTBG]    = "crtbg";
name_dvm[LOADBG]   = "loadbg";
name_dvm[WAITBG]   = "waitbg";
name_dvm[CRTRB]    = "crtrbl";
name_dvm[CRTRBP]   = "crtrbp";
name_dvm[LOADRB]   = "loadrb";
name_dvm[WAITRB]   = "waitrb";
name_dvm[INSRB]    = "insrb";
name_dvm[CRTIG]    = "crtig";
name_dvm[LOADIG]   = "loadig";
name_dvm[WAITIG]   = "waitig";
name_dvm[CRTIB]    = "crtib";
name_dvm[LOADIB]   = "loadib";
name_dvm[WAITIB]   = "waitib";
name_dvm[INSIB]    = "insib";
name_dvm[INSSHD]   = "insshd";
name_dvm[SENDSH]   = "sendsh";
name_dvm[RECVSH]   = "recvsh";
name_dvm[TRON]     = "tron";
name_dvm[TROFF]    = "troff";
name_dvm[DBEGTR]   = "dbegtr";
name_dvm[GENBLI]   = "genbli";
name_dvm[TPCNTR]   = "tpcntr";
name_dvm[RMKIND]   = "rmkind";
name_dvm[SETELW]   = "setelw";
name_dvm[DLOAD2]   = "dldv2";
name_dvm[DREADA]   = "dreada";
name_dvm[DREAD]    = "dread";
name_dvm[LINDTP]   = "lindtp";
name_dvm[DVMRM]    = "acrecv";
name_dvm[DVMSM]    = "acsend";
name_dvm[AARRCP]   = "aarrcp";
name_dvm[WAITCP]   = "waitcp";
name_dvm[ACROSS]   = "across";
name_dvm[DVMLF]    = "dvmlf";
name_dvm[ADDBND]   = "addbnd";
name_dvm[INCSH]    = "incsh";
name_dvm[INCSHD]   = "incshd";
name_dvm[DRARR]    = "drarr";
name_dvm[BARRIER]  = "bsynch";
name_dvm[DINSRD]   = "dinsrf";
name_dvm[DCRRG]    = "dcrtrg";
name_dvm[DSAVRG]   = "dsavrg";
name_dvm[DCLCRG]   = "dclcrg";
name_dvm[DDLRG]    = "ddelrg";
name_dvm[ADDSHD]   = "addshd";
name_dvm[CRTRDA]   = "crtraf";
name_dvm[STRTAC]   = "strtac";
name_dvm[WAITAC]   = "waitac";
name_dvm[CRTCG]    = "crtcg";
name_dvm[INSCG]    = "inscg";
name_dvm[STRTCG]   = "strtcg";
name_dvm[WAITCG]   = "waitcg";
name_dvm[DELCG]    = "delcg";
name_dvm[CONSDA]   = "consda";
name_dvm[INCLCG]   = "inclcg";
name_dvm[RSTRDA]   = "rstrda";
name_dvm[RSTCG]    = "rstcg";
name_dvm[CRTRA9]   = "crtra9";
name_dvm[CRTDA9]   = "crtda9";
name_dvm[FTCNTR]   = "ftcntr";
name_dvm[DACSUM]   = "dacsum";
name_dvm[ARCSF]    = "arcsf";
name_dvm[BLKDIV]   = "blkdiv";
name_dvm[DOPLMB]   = "doplmb";
name_dvm[DOSL]     = "dosl";
name_dvm[DVTR]     = "dvtr";
name_dvm[DOPLSEQ]  = "doplmbseq";
name_dvm[INIMPI]   = "linit";
name_dvm[DVMH_INIT]        = "dvmh_init2";
name_dvm[DVMH_FINISH]      = "dvmh_finish";
name_dvm[DVMH_EXIT]        = "dvmh_exit";
name_dvm[INIT_CUDA]        = "init_cuda";
name_dvm[REG_CREATE]       = "region_create";
name_dvm[REG_CREATE_2]     = "dvmh_region_create";
name_dvm[REG_END]          = "region_end";
name_dvm[REG_END_2]        = "dvmh_region_end";
name_dvm[REG_DEVICES]      = "region_execute_on_targets";
name_dvm[REG_DEVICES_2]    = "dvmh_region_execute_on_targets";
name_dvm[REG_START]        = "region_inner_start";
name_dvm[RGSTR_ARRAY_2]    = "dvmh_region_register_array";
name_dvm[RGSTR_SUBARRAY_2] = "dvmh_region_register_subarray";
name_dvm[RGSTR_SCALAR_2]   = "dvmh_region_register_scalar";
name_dvm[RGSTR_ARRAY]      = "region_register_array";
name_dvm[RGSTR_SUBARRAY]   = "region_register_subarray";
name_dvm[RGSTR_SCALAR]     = "region_register_scalar";
name_dvm[SET_NAME_ARRAY]   = "region_set_name_array";
name_dvm[SET_NAME_VAR]     = "region_set_name_variable";
name_dvm[BEFORE_LOADRB]    = "dvmh_remote_access";
name_dvm[REG_WAITRB]       = "region_after_waitrb";
name_dvm[REG_DESTROY_RB]   = "region_destroy_rb";
name_dvm[GET_ACTUAL_EDGES] = "dvmh_get_actual_edges";
name_dvm[SHADOW_RENEW]     = "dvmh_shadow_renew";
name_dvm[SHADOW_RENEW_2]   = "dvmh_shadow_renew2";
name_dvm[INDIRECT_SH_RENEW]= "dvmh_indirect_shadow_renew";
name_dvm[LOOP_CREATE]      = "loop_create";
name_dvm[LOOP_CREATE_2]    = "dvmh_loop_create";
name_dvm[REG_HANDLER]      = "loop_register_handler";
name_dvm[REG_HANDLER_2]    = "dvmh_loop_register_handler";
name_dvm[HANDLER_FUNC]     = "dvmh_handler_func";
name_dvm[LOOP_START]       = "loop_start";
name_dvm[LOOP_END]         = "loop_end";
name_dvm[LOOP_PERFORM]     = "loop_perform";
name_dvm[LOOP_PERFORM_2]   = "dvmh_loop_perform";
name_dvm[CUDA_BLOCK]       = "loop_set_cuda_block";
name_dvm[CUDA_BLOCK_2]     = "dvmh_loop_set_cuda_block";
name_dvm[LOOP_INSRED]      = "loop_insred";
name_dvm[LOOP_RED]         = "dvmh_loop_reduction";
name_dvm[SHADOW_COMPUTE]   = "loop_shadow_compute";
name_dvm[SHADOW_COMPUTE_AR]= "dvmh_loop_shadow_compute_array";
name_dvm[SHADOW_COMPUTE_2] = "dvmh_loop_shadow_compute";
name_dvm[CORRESPONDENCE]   = "dvmh_loop_array_correspondence";
name_dvm[GET_ACTUAL_ALL]   = "dvmh_get_actual_all";
name_dvm[GET_ACTUAL_ALL_2] = "dvmh_get_actual_all2";
name_dvm[GET_ACTUAL_ARRAY] = "dvmh_get_actual_array"; 
name_dvm[GET_ACTUAL_ARR_2] = "dvmh_get_actual_array2";
name_dvm[GET_ACTUAL_SUBARRAY]= "dvmh_get_actual_subarray";
name_dvm[GET_ACTUAL_SUBARR_2]= "dvmh_get_actual_subarray2";   
name_dvm[GET_ACTUAL_SCALAR]  = "dvmh_get_actual_variable";
name_dvm[GET_ACTUAL_SCALAR_2]= "dvmh_get_actual_variable2";
name_dvm[GET_ACTUAL_SUBVAR]  = "dvmh_get_actual_subvariable";
name_dvm[GET_ACTUAL_SUBVAR_2]= "dvmh_get_actual_subvariable2"; 
name_dvm[ACTUAL_ARRAY]     = "dvmh_actual_array"; 
name_dvm[ACTUAL_ARRAY_2]   = "dvmh_actual_array2";       
name_dvm[ACTUAL_SUBARRAY]  = "dvmh_actual_subarray"; 
name_dvm[ACTUAL_SUBARRAY_2]= "dvmh_actual_subarray2";   
name_dvm[ACTUAL_SCALAR]    = "dvmh_actual_variable";
name_dvm[ACTUAL_SCALAR_2]  = "dvmh_actual_variable2";
name_dvm[ACTUAL_SUBVAR]    = "dvmh_actual_subvariable";
name_dvm[ACTUAL_SUBVAR_2]  = "dvmh_actual_subvariable2";         
name_dvm[ACTUAL_ALL]       = "dvmh_actual_all";
name_dvm[ACTUAL_ALL_2]     = "dvmh_actual_all2";
name_dvm[DVMH_REDISTRIBUTE]= "dvmh_redistribute";
name_dvm[DVMH_REALIGN]     = "dvmh_realign";
name_dvm[DESTROY_ARRAY]    = "dvmh_destroy_array";   
name_dvm[DESTROY_SCALAR]   = "dvmh_destroy_variable";
name_dvm[HANDLE_CONSIST]   = "region_handle_consistent";
name_dvm[LOOP_ACROSS]      = "loop_across"; 
name_dvm[LOOP_ACROSS_2]    = "dvmh_loop_across";
name_dvm[DVMH_SET_STAGE]   = "dvmh_loop_set_stage";
name_dvm[GET_STAGE]        = "dvmh_get_next_stage";
name_dvm[MAP_TASKS]        = "map_tasks"; 
name_dvm[DATA_ENTER]       = "dvmh_data_enter";
name_dvm[DATA_EXIT]        = "dvmh_data_exit";
name_dvm[DELETE_OBJECT]    = "dvmh_delete_object";
name_dvm[FORGET_HEADER]    = "dvmh_forget_header";
name_dvm[SCOPE_START]      = "dvmh_scope_start"; 
name_dvm[SCOPE_END]        = "dvmh_scope_end";
name_dvm[SCOPE_INSERT]     = "dvmh_scope_insert";
name_dvm[LOOP_MAP]         = "dvmh_loop_map";
name_dvm[ALIGN_LINEAR]     = "dvmh_alignment_linear";
name_dvm[REGISTER_ARR]     = "dvmh_register_array";
name_dvm[GET_ADDR]         = "dvmh_get_addr";
name_dvm[STRING]           = "dvmh_string";
name_dvm[STRING_VAR]	   = "dvmh_string_var";
name_dvm[VAR_GEN_HDR]	   = "dvmh_variable_gen_header";
name_dvm[VAR_FILL_HDR]	   = "dvmh_variable_fill_header";
name_dvm[CP_CHECK_FILENAME]= "dvmh_cp_check_filename";
name_dvm[CP_NEXT_FILENAME] = "dvmh_cp_next_filename";
name_dvm[CP_SAVE_FILENAMES]= "dvmh_cp_save_filenames";
name_dvm[CP_WAIT]          = "dvmh_cp_wait";
name_dvm[CP_SAVE_ASYNC_UNIT]="dvmh_cp_save_async_unit"; 
name_dvm[DVMH_LINE]        = "dvmh_line"; 
name_dvm[CREATE_ARRAY]     = "dvmh_array_create";
name_dvm[CREATE_TEMPLATE]  = "dvmh_template_create";
name_dvm[DVMH_REPLICATED]  = "dvmh_distribution_replicated";
name_dvm[DVMH_BLOCK]       = "dvmh_distribution_block";
name_dvm[DVMH_WGTBLOCK]    = "dvmh_distribution_wgtblock";
name_dvm[DVMH_GENBLOCK]    = "dvmh_distribution_genblock";
name_dvm[DVMH_MULTBLOCK]   = "dvmh_distribution_multblock";
name_dvm[DVMH_INDIRECT]    = "dvmh_distribution_indirect";
name_dvm[DVMH_DERIVED]     = "dvmh_distribution_derived";
name_dvm[DVMH_DISTRIBUTE]  = "dvmh_distribute";
name_dvm[DVMH_REDISTR_2]   = "dvmh_redistribute2"; 
name_dvm[DVMH_ALIGN]       = "dvmh_align";
name_dvm[DVMH_REALIGN_2]   = "dvmh_realign2";
name_dvm[DVMH_HAS_ELEMENT] = "dvmh_has_element";
name_dvm[CALC_LINEAR]      = "dvmh_calc_linear";
name_dvm[LOCALIZE]         = "dvmh_indirect_localize";
name_dvm[SHADOW_ADD]       = "dvmh_indirect_shadow_add";
name_dvm[EXPR_IGNORE]      = "dvmh_derived_rhs_expr_ignore";
name_dvm[EXPR_CONSTANT]    = "dvmh_derived_rhs_expr_constant";
name_dvm[EXPR_SCAN]        = "dvmh_derived_rhs_expr_scan";
name_dvm[DERIVED_RHS]      = "dvmh_derived_rhs";
name_dvm[ARRAY_SLICE]      = "dvmh_array_slice";
name_dvm[COPY_WHOLE]       = "dvmh_array_copy_whole"; 
name_dvm[COPY_ARRAY]       = "dvmh_array_copy";
name_dvm[SET_VALUE]        = "dvmh_array_set_value";
name_dvm[LOOP_CONSISTENT]  = "dvmh_loop_consistent";
name_dvm[DVMH_REMOTE2]     = "dvmh_remote_access2";
name_dvm[LOOP_REMOTE]      = "dvmh_loop_remote_access";
name_dvm[GET_REMOTE_BUF]   = "dvmh_loop_get_remote_buf";
name_dvm[FTN_OPEN]	   = "dvmh_ftn_open";         /* IO */
name_dvm[FTN_CLOSE]	   = "dvmh_ftn_close";        /* IO */
name_dvm[FTN_READ]	   = "dvmh_ftn_read_unf";     /* IO */
name_dvm[FTN_WRITE]	   = "dvmh_ftn_write_unf";    /* IO */
name_dvm[FTN_ENDFILE]	   = "dvmh_ftn_endfile";      /* IO */
name_dvm[FTN_FLUSH]	   = "dvmh_ftn_flush";        /* IO */
name_dvm[FTN_REWIND]       = "dvmh_ftn_rewind";       /* IO */
name_dvm[FTN_CONNECTED]	   = "dvmh_ftn_connected";    /* IO */
 
//--------------------- called from host-handler ------------
name_dvm[FILL_BOUNDS]      = "loop_fill_bounds";
name_dvm[RED_INIT]         = "loop_red_init";
name_dvm[RED_POST]         = "loop_red_post";
name_dvm[SLOT_COUNT]       = "loop_get_slot_count";
name_dvm[HAS_ELEMENT]      = "loop_has_element";
name_dvm[HAS_ELEMENT_2]    = "dvmh_loop_has_element";
name_dvm[FILL_LOCAL_PART]  = "loop_fill_local_part";
name_dvm[OMP_STAT_BP]      = "dvmh_perf_before_parallel";
name_dvm[OMP_STAT_AP]      = "dvmh_perf_after_parallel";
name_dvm[OMP_STAT_BL]      = "dvmh_perf_before_loop";
name_dvm[OMP_STAT_AL]      = "dvmh_perf_after_loop";
name_dvm[OMP_STAT_BS]      = "dvmh_perf_before_synchro";
name_dvm[OMP_STAT_AS]      = "dvmh_perf_after_synchro";
//--------------------- called from cuda-handler ------------
name_dvm[GET_BASE]         = "dvmh_get_natural_base";
name_dvm[GET_BASE_C]       = "dvmh_get_natural_base_C";
name_dvm[FILL_HEADER]      = "dvmh_fill_header_";
name_dvm[FILL_HEADER_2]    = "dvmh_fill_header2_";
name_dvm[FILL_HEADER_EX]   = "dvmh_fill_header_ex_";
name_dvm[FILL_HEADER_EX_2] = "dvmh_fill_header_ex2_";
name_dvm[DO_CUDA]          = "loop_cuda_do";
name_dvm[RED_CUDA]         = "loop_cuda_register_red";
name_dvm[RED_CUDA_C]       = "dvmh_loop_cuda_register_red_C";
name_dvm[REGISTER_RED]     = "loop_cuda_register_red_";
name_dvm[RED_INIT_C]       = "loop_red_init_";
name_dvm[RED_INIT_2]       = "dvmh_loop_red_init_";
name_dvm[CUDA_RED_INIT]    = "loop_cuda_red_init";
name_dvm[CUDA_RED_INIT_2]  = "dvmh_loop_cuda_red_init_C";
name_dvm[RED_PREPARE]      = "loop_cuda_red_prepare";
name_dvm[RED_PREPARE_C]    = "dvmh_loop_cuda_red_prepare_C";
name_dvm[RED_FINISH]       = "loop_red_finish";
name_dvm[RED_FINISH_C]     = "dvmh_loop_cuda_red_finish_C";
name_dvm[SHARED_NEEDED]    = "loop_cuda_shared_needed_";
name_dvm[GET_DEVICE_ADDR]  = "dvmh_get_device_addr";
name_dvm[GET_DEVICE_ADDR_C]= "dvmh_get_device_addr_C";
name_dvm[GET_LOCAL_PART]   = "loop_cuda_get_local_part";
name_dvm[GET_LOCAL_PART_C] = "dvmh_loop_cuda_get_local_part_C";
name_dvm[GET_DEVICE_NUM]   = "loop_get_device_num_";
name_dvm[GET_DEVICE_NUM_2] = "dvmh_loop_get_device_num_C";
name_dvm[GET_OVERALL_STEP] = "loop_cuda_get_red_step";
name_dvm[FILL_BOUNDS_C]    = "loop_fill_bounds_";
name_dvm[FILL_BOUNDS_2]    = "dvmh_loop_fill_bounds_";
name_dvm[RED_POST_C]       = "loop_red_post_";
name_dvm[RED_POST_2]       = "dvmh_loop_red_post_";
name_dvm[CUDA_REPLICATE]   = "dvmh_cuda_replicate";
name_dvm[GET_DEP_MASK]     = "loop_get_dependency_mask_";
name_dvm[GET_DEP_MASK_2]   = "dvmh_loop_get_dependency_mask_";
name_dvm[GET_DEP_MASK_F]   = "loop_get_dependency_mask";
name_dvm[CUDA_TRANSFORM]   = "loop_cuda_transform_";
name_dvm[CUDA_AUTOTRANSFORM]="loop_cuda_autotransform";
name_dvm[LOOP_AUTOTRANSFORM]="dvmh_loop_autotransform_";
name_dvm[APPLY_OFFSET]     = "dvmh_apply_offset";
name_dvm[GET_CONFIG]       = "loop_cuda_get_config";
name_dvm[GET_CONFIG_C]     = "dvmh_loop_cuda_get_config_C";
name_dvm[CHANGE_BOUNDS]    = "dvmh_change_filled_bounds";
name_dvm[GUESS_INDEX_TYPE] = "loop_guess_index_type_";
name_dvm[GUESS_INDEX_TYPE_2]="dvmh_loop_guess_index_type_C";
name_dvm[RTC_SET_LANG]     = "loop_cuda_rtc_set_lang";
name_dvm[GET_REMOTE_BUF_C] = "dvmh_loop_get_remote_buf_C";
