bonded_terminate Subroutine

public subroutine bonded_terminate(bds)

Just terminate every "submodule" in bonded, deallocating arrays and disabling the potential terms

Arguments

Type IntentOptional Attributes Name
type(ommp_bonded_type), intent(inout) :: bds

Calls

proc~~bonded_terminate~~CallsGraph proc~bonded_terminate bonded_terminate proc~angtor_terminate angtor_terminate proc~bonded_terminate->proc~angtor_terminate proc~strtor_terminate strtor_terminate proc~bonded_terminate->proc~strtor_terminate proc~bond_terminate bond_terminate proc~bonded_terminate->proc~bond_terminate proc~strbnd_terminate strbnd_terminate proc~bonded_terminate->proc~strbnd_terminate proc~urey_terminate urey_terminate proc~bonded_terminate->proc~urey_terminate proc~opb_terminate opb_terminate proc~bonded_terminate->proc~opb_terminate proc~angle_terminate angle_terminate proc~bonded_terminate->proc~angle_terminate proc~pitors_terminate pitors_terminate proc~bonded_terminate->proc~pitors_terminate proc~torsion_terminate torsion_terminate proc~bonded_terminate->proc~torsion_terminate proc~imptorsion_terminate imptorsion_terminate proc~bonded_terminate->proc~imptorsion_terminate proc~tortor_terminate tortor_terminate proc~bonded_terminate->proc~tortor_terminate interface~mfree mfree proc~angtor_terminate->interface~mfree proc~strtor_terminate->interface~mfree proc~bond_terminate->interface~mfree proc~strbnd_terminate->interface~mfree proc~urey_terminate->interface~mfree proc~opb_terminate->interface~mfree proc~angle_terminate->interface~mfree proc~pitors_terminate->interface~mfree proc~torsion_terminate->interface~mfree proc~imptorsion_terminate->interface~mfree proc~tortor_terminate->interface~mfree proc~r_free1 r_free1 interface~mfree->proc~r_free1 proc~i_free2 i_free2 interface~mfree->proc~i_free2 proc~i_free1 i_free1 interface~mfree->proc~i_free1 proc~r_free2 r_free2 interface~mfree->proc~r_free2 proc~r_free3 r_free3 interface~mfree->proc~r_free3 proc~i_free3 i_free3 interface~mfree->proc~i_free3 proc~l_free1 l_free1 interface~mfree->proc~l_free1 proc~l_free2 l_free2 interface~mfree->proc~l_free2 proc~chk_free chk_free proc~r_free1->proc~chk_free proc~i_free2->proc~chk_free proc~i_free1->proc~chk_free proc~r_free2->proc~chk_free proc~r_free3->proc~chk_free proc~i_free3->proc~chk_free proc~l_free1->proc~chk_free proc~l_free2->proc~chk_free proc~fatal_error fatal_error proc~chk_free->proc~fatal_error proc~ommp_message ommp_message proc~fatal_error->proc~ommp_message proc~close_output close_output proc~fatal_error->proc~close_output proc~close_output->proc~ommp_message

Called by

proc~~bonded_terminate~~CalledByGraph proc~bonded_terminate bonded_terminate proc~init_bonded_for_link_atom init_bonded_for_link_atom proc~init_bonded_for_link_atom->proc~bonded_terminate proc~mmpol_terminate mmpol_terminate proc~mmpol_terminate->proc~bonded_terminate proc~ommp_create_link_atom ommp_create_link_atom proc~ommp_create_link_atom->proc~init_bonded_for_link_atom proc~ommp_terminate ommp_terminate proc~ommp_terminate->proc~mmpol_terminate proc~c_ommp_create_link_atom C_ommp_create_link_atom proc~c_ommp_create_link_atom->proc~ommp_create_link_atom proc~c_ommp_terminate C_ommp_terminate proc~c_ommp_terminate->proc~ommp_terminate

Contents

Source Code


Source Code

    subroutine bonded_terminate(bds)
        !! Just terminate every "submodule" in bonded, 
        !! deallocating arrays and disabling the potential terms
        implicit none
    
        type(ommp_bonded_type), intent(inout) :: bds
        ! Bonded potential data structure

        call bond_terminate(bds)
        call angle_terminate(bds)
        call strbnd_terminate(bds)
        call urey_terminate(bds)
        call opb_terminate(bds)
        call pitors_terminate(bds)
        call torsion_terminate(bds)
        call imptorsion_terminate(bds)
        call tortor_terminate(bds)
        call angtor_terminate(bds)
        call strtor_terminate(bds)

    end subroutine bonded_terminate