Go to the documentation of this file.

00001 SUBROUTINE abort
00002 #ifdef __NAGf95
00003   USE f90_unix_proc, ONLY: nag_abort => abort
00004 
00005   IMPLICIT NONE
00006 
00007   CALL nag_abort()
00008 #endif
00009 END SUBROUTINE abort