Symbol Description Uses
chk4 4



File Line number Procedure Code
./pkg/exch2/w2_set_f2f_index.F 238 W2_SET_F2F_INDEX
         chk4 = facet_pij(3,i,j)*facet_pij(2,ii,jj)
./pkg/exch2/w2_set_f2f_index.F 248 W2_SET_F2F_INDEX
     &        chk3.NE.0 .OR. chk4.NE.1 .OR. chk6.NE.0 ) THEN
./pkg/exch2/w2_set_f2f_index.F 254 W2_SET_F2F_INDEX
     &      ' Bug in Matrix Product:',chk1,chk2,chk3,chk4,chk5,chk6
./pkg/exch2/w2_set_f2f_index.F 39 W2_SET_F2F_INDEX
      INTEGER chk1, chk2, chk3, chk4, chk5, chk6