if ( test_HIERID_belongs_to_distgrid(distgrid) ) { distid_HIERID_arr[DISTID "|" HIERID] = 1 #print " found distid_HIERID_arr[" DISTID "|" HIERID "]=[" distid_HIERID_arr[DISTID "|" HIERID] "]" #print " distid_to_wbd_type_arr[" DISTID "] = [" distid_to_wbd_type_arr[DISTID] "]" # keep a list if DISTID, for each HIERID if ( distid_to_wbd_type_arr[DISTID] == "MANAGEMENT" ) { # for HIERIDx mng distid processing if ( mng_HIERID_distidlist_arr[HIERID] != "" ) mng_HIERID_distidlist_arr[HIERID] = mng_HIERID_distidlist_arr[HIERID] "|" DISTID else mng_HIERID_distidlist_arr[HIERID] = DISTID } else { # for HIERIDx distid processing if ( HIERID_distidlist_arr[HIERID] != "" ) HIERID_distidlist_arr[HIERID] = HIERID_distidlist_arr[HIERID] "|" DISTID else HIERID_distidlist_arr[HIERID] = DISTID } # keep a list of T21 egrids in each mng distids # keep a list of DISTID's for each T21 egrid split(HIER_t21egrid_list_arr[HIER], xhier_t21egrid_arr, "|") for ( i in xhier_t21egrid_arr ) { if ( distid_to_wbd_type_arr[DISTID] == "MANAGEMENT" ) { # for T21 management data if ( mng_egrid_distidlist_arr[Xegrid] != "" ) mng_egrid_distidlist_arr[Xegrid] = mng_egrid_distidlist_arr[Xegrid] "|" DISTID else mng_egrid_distidlist_arr[Xegrid] = DISTID #print "mng_egrid_distidlist_arr[" Xegrid "] = [" mng_egrid_distidlist_arr[Xegrid] "]" } #else { # # for T21 data # if ( egrid_distidlist_arr[Xegrid] != "" ) # egrid_distidlist_arr[Xegrid] = egrid_distidlist_arr[Xegrid] "|" DISTID # else # egrid_distidlist_arr[Xegrid] = DISTID # print "egrid_distidlist_arr[" Xegrid "] = [" egrid_distidlist_arr[Xegrid] "]" #} # for direnq from telmax21 directory # store a list of egrids for each distid if ( distid_to_egridlist_arr[DISTID] != "" ) distid_to_egridlist_arr[DISTID] = distid_to_egridlist_arr[DISTID] "|" distid_to_egridlist_arr[DISTID] = distid_to_egridlist_arr[DISTID] grid print " distid_to_egridlist_arr[" DISTID "] = [" distid_to_egridlist_arr[DISTID] "]" } }