assign_logical Module Procedure

module procedure assign_logical module subroutine assign_logical(lhs, rhs)

Arguments

Type IntentOptional Attributes Name
class(test_diagnosis_t), intent(out) :: lhs
logical, intent(in) :: rhs