ADAMS-Callback subroutine cbksub