test_mapl_leap Subroutine

public subroutine test_mapl_leap()

Arguments

None

Calls

proc~~test_mapl_leap~~CallsGraph proc~test_mapl_leap test_mapl_leap assertfalse assertfalse proc~test_mapl_leap->assertfalse asserttrue asserttrue proc~test_mapl_leap->asserttrue interface~mapl_leap MAPL_LEAP proc~test_mapl_leap->interface~mapl_leap

Source Code

   subroutine test_mapl_leap()
      @assertTrue(mapl_leap(4))
      @assertTrue(mapl_leap(96))
      @assertFalse(mapl_leap(100))
      @assertTrue(mapl_leap(2000))
      @assertFalse(mapl_leap(1900))
      @assertTrue(mapl_leap(2004))
   end subroutine test_mapl_leap