subroutine f_ESMF_VMAbort() use ESMF_VMMod implicit none call ESMF_VMAbort() end subroutine f_ESMF_VMAbort