setsol Subroutine

public subroutine setsol(mp)

Arguments

Type IntentOptional Attributes Name
integer(kind=i_d), intent(in) :: mp