Searched refs:second_h (Results 1 – 7 of 7) sorted by relevance
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/ |
| H A D | get_block_ind.F | 59 integer key_ix,nkey,first_h,second_h
150 second_h = ires
507 key_alpha = second_h
509 if(key_alpha.ne.second_h) then
510 write(6,*)'key_alpha second_h',key_alpha,second_h
875 integer key_ix,nkey,first_h,second_h
1265 key_alpha = second_h
1625 integer key_ix,nkey,first_h,second_h
1698 second_h = ires
2040 key_alpha = second_h
[all …]
|
| H A D | threadsafe_ga_wrappers.F | 206 integer key_ix,nkey,first_h,second_h local
284 second_h = ires
447 key_alpha = second_h
448 if(key_alpha.ne.second_h) then
449 write(6,*)'key_alpha second_h',key_alpha,second_h
599 integer key_ix,first_h,second_h
655 second_h= k - 1 + (noa+nva) * (l - 1 + (noa+nva) * (i-
658 second_h= i - 1 + (noa+nva) * (j - 1 + (noa+nva) * (k-
807 key_alpha = second_h
|
| H A D | get_block_ind_sf.F | 45 integer key_ix,nkey,first_h,second_h
138 second_h = ires
435 key_alpha = second_h
437 if(key_alpha.ne.second_h) then
438 write(6,*)'key_alpha second_h',key_alpha,second_h
736 integer key_ix,nkey,first_h,second_h
811 second_h = ires
1101 key_alpha = second_h
1103 if(key_alpha.ne.second_h) then
1104 write(6,*)'key_alpha second_h',key_alpha,second_h
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/ |
| H A D | get_block_ind.F | 59 integer key_ix,nkey,first_h,second_h
150 second_h = ires
507 key_alpha = second_h
509 if(key_alpha.ne.second_h) then
510 write(6,*)'key_alpha second_h',key_alpha,second_h
875 integer key_ix,nkey,first_h,second_h
1265 key_alpha = second_h
1625 integer key_ix,nkey,first_h,second_h
1698 second_h = ires
2040 key_alpha = second_h
[all …]
|
| H A D | threadsafe_ga_wrappers.F | 206 integer key_ix,nkey,first_h,second_h local
284 second_h = ires
447 key_alpha = second_h
448 if(key_alpha.ne.second_h) then
449 write(6,*)'key_alpha second_h',key_alpha,second_h
599 integer key_ix,first_h,second_h
655 second_h= k - 1 + (noa+nva) * (l - 1 + (noa+nva) * (i-
658 second_h= i - 1 + (noa+nva) * (j - 1 + (noa+nva) * (k-
807 key_alpha = second_h
|
| H A D | get_block_ind_sf.F | 45 integer key_ix,nkey,first_h,second_h
138 second_h = ires
435 key_alpha = second_h
437 if(key_alpha.ne.second_h) then
438 write(6,*)'key_alpha second_h',key_alpha,second_h
736 integer key_ix,nkey,first_h,second_h
811 second_h = ires
1101 key_alpha = second_h
1103 if(key_alpha.ne.second_h) then
1104 write(6,*)'key_alpha second_h',key_alpha,second_h
|
| /dports/graphics/tgif/tgif-QPL-4.2.5/ |
| H A D | edit.c | 6037 int second_h=(second_obj->obbox.rby-second_obj->obbox.lty); in DoRemoveObjectShadow() local
6039 if (first_w == second_w && first_h == second_h) { in DoRemoveObjectShadow()
6088 int second_h=(second_obj->obbox.rby-second_obj->obbox.lty); in CountObjectWithShadow() local
6090 if (first_w == second_w && first_h == second_h) { in CountObjectWithShadow()
|