work Subroutine

public recursive subroutine work(de, deCount)

Arguments

Type IntentOptional Attributes Name
integer :: de
integer :: deCount