model1 Subroutine

subroutine model1(comm1)

Arguments

Type IntentOptional Attributes Name
integer :: comm1