Searched refs:const_colv_molname (Results 1 – 6 of 6) sorted by relevance
497 ALLOCATE (cons_info%const_colv_molname(ncons))513 cons_info%const_colv_molname(ig) = "UNDEF"539 c_val=cons_info%const_colv_molname(ig))541 …IF (((cons_info%const_colv_mol(ig) /= 0) .AND. (cons_info%const_colv_molname(ig) /= "UNDEF"))) THEN544 …IF ((cons_info%const_colv_mol(ig) == 0) .AND. (cons_info%const_colv_molname(ig) == "UNDEF") .AND. &
83 CHARACTER(LEN=default_string_length), POINTER :: const_colv_molname(:) component330 NULLIFY (constraint_info%const_colv_molname)604 IF (ASSOCIATED(constraint_info%const_colv_molname)) THEN605 DEALLOCATE (constraint_info%const_colv_molname)
292 CALL reallocate(cons_info%const_colv_molname, 1, cons_info%nconst_colv)361 cons_info%const_colv_molname(nhdist + n_start_colv) = "UNDEF"391 cons_info%const_colv_molname, &