test_alert Subroutine

public subroutine test_alert()

Arguments

None

Source Code

subroutine test_alert()
   call unit_check_start('alert',' '//OPTIONS)
   !call unit_check('alert',targetline.eq.'a b ab baaa aaCCCC CCCC CCCC a a a aa aaaaaa','example of using RANGE',targetline)
   call unit_check_done('alert')
end subroutine test_alert