test_juown1 Subroutine

subroutine test_juown1()

call unit_test(‘juown1’, 0.eq.0, ‘checking’,100)

Arguments

None

Source Code

subroutine test_juown1()

   call unit_test_start('juown1',msg='')
   !!call unit_test('juown1', 0.eq.0, 'checking',100)
   call unit_test_end('juown1',msg='')
end subroutine test_juown1