Searched refs:do_symm (Results 1 – 2 of 2) sorted by relevance
1294 do_symm = .FALSE. local1317 IF (do_symm) CALL cp_fm_create(h_block_t, fm_struct_tmp, name="h block t")1332 IF (do_symm) THEN1364 IF (do_symm) CALL cp_fm_release(h_block_t)
1314 do_symm = .FALSE. local1337 IF (do_symm) CALL cp_fm_create(h_block_t, fm_struct_tmp, name="h block t")1352 IF (do_symm) THEN1384 IF (do_symm) CALL cp_fm_release(h_block_t)