FPEvalDataset/LeetCodeProblem

1 2module Main = struct3    open OUnit24 5    (* Program start *)6    let modifiedMatrix (matrix: int list list) : int list list =   failwith "Not implemented"7 8    (* Program end *)9 10    (* Test cases *)11    12let test1 _ = assert_equal [[1;2;9];[4;8;6];[7;8;9]] (modifiedMatrix [[1;2;-1];[4;-1;6];[7;8;9]])13 14let test2 _ = assert_equal [[3;2];[5;2]] (modifiedMatrix [[3;-1];[5;2]])15 16let test3 _ = assert_equal [[3;2];[5;2]] (modifiedMatrix [[99; 89; 89; 70; 89; 100; 93; 97; 21; 89; 95; 70; 93; 93; 55; 23; 86; 77; 13; 100; 92; 99; 89; 34; 94; 94; 99; 98; 84; 10; 80; 35; 99; 99; 93; 95; 63; 78; 48; 60; 75; 94]; [14; 89; 85; 100; 89; 1; 93; 64; 98; 89; 95; 100; 93; 100; 95; 29; 86; 31; 94; 100; 99; 13; 37; 93; 94; 94; 100; 98; 96; 83; 97; 65; 83; 99; 19; 95; 13; 99; 83; 53; 75; 55]; [1; 89; 97; 100; 89; 100; 93; 30; 8; 45; 95; 100; 62; 100; 95; 90; 86; 90; 94; 91; 54; 99; 89; 93; 94; 94; 17; 77; 96; 1; 95; 95; 99; 43; 56; 95; 28; 73; 83; 92; 74; 26]; [55; 66; 97; 8; 89; 34; 93; 56; 98; 89; 95; 100; 93; 100; 19; 90; 27; 45; 94; 100; 71; 20; 89; 93; 91; 94; 28; 98; 96; 83; 97; 85; 20; 13; 93; 95; 98; 38; 78; 92; 6; 94]; [2; 82; 97; 100; 38; 100; 93; 32; 65; 89; 95; 76; 93; 44; 64; 35; 37; 21; 2; 100; 99; 31; 26; 57; 22; 94; 63; 36; 31; 83; 69; 27; 86; 58; 93; 64; 98; 99; 83; 92; 75; 94]; [82; 89; 97; 0; 6; 16; 91; 97; 98; 89; 95; 100; 93; 28; 95; 30; 86; 90; 20; 22; 64; 57; 9; 80; 94; 26; 100; 86; 6; 83; 38; 74; 25; 33; 51; 63; 63; 63; 6; 92; 75; 94]; [96; 56; 48; 56; 89; 16; 74; 97; 29; 63; 40; 36; 93; 100; 95; 34; 86; 55; 94; 61; 34; 47; 66; 93; 94; 94; 13; 98; 96; 83; 97; 95; 16; 99; 93; 16; 46; 99; 83; 92; 75; 58]; [99; 89; 97; 97; 89; 100; 93; 97; 98; 89; 95; 100; 57; 100; 75; 90; 86; 52; 55; 100; 99; 85; 87; 29; 94; 94; 49; 98; 25; 83; 29; 14; 99; 42; 78; 54; 60; 46; 83; 70; 75; 94]; [96; 89; 47; 55; 89; 100; 85; 97; 98; 89; 95; 100; 20; 65; 76; 90; 86; 90; 86; 100; 15; 99; 89; 2; 94; 94; 40; 60; 68; 83; 97; 5; 99; 99; 62; 95; 98; 99; 83; 6; 75; 60]; [3; 89; 16; 100; 89; 84; 93; 97; 98; 89; 17; 100; 73; 100; 36; 90; 77; 8; 69; 100; 99; 69; 89; 93; 51; 79; 100; 98; 96; 83; 97; 82; 14; 28; 93; 11; 98; 51; 65; 92; 58; 94]; [46; 89; 6; 100; 49; 64; 53; 97; 4; 88; 95; 100; 32; 100; 44; 90; 48; 19; 94; 100; 50; 53; 62; 22; 94; 13; 100; 32; 96; 83; 64; 95; 7; 86; 47; 72; 61; 99; 83; 92; 75; 84]; [99; 89; 97; 100; 89; 75; 93; 97; 98; 51; 95; 100; 92; 94; 85; 89; 0; 90; 32; 70; 16; 7; 14; 55; 94; 38; 72; 78; 96; 83; 85; 5; 99; 42; 93; 8; 98; 99; 83; 8; 75; 2]; [99; 26; 26; 87; 89; 100; 93; 97; 98; 89; 95; 51; 93; 100; 95; 31; 45; 65; 37; 100; 13; 58; 74; 93; 5; 94; 100; 4; 96; 6; 97; 21; 90; 51; 93; 88; 98; 99; 66; 92; 3; 94]; [37; 45; 49; 100; 54; 100; 93; 59; 20; 89; 95; 6; 89; 100; 95; 90; 86; 90; 94; 14; 99; 99; 27; 93; 94; 94; 64; 67; 9; 83; 62; 65; 85; 20; 93; 95; 41; 11; 35; 72; 75; 94]; [99; 89; 52; 100; 89; 100; 93; 97; 59; 89; 66; 100; 93; 100; 93; 90; 86; 42; 94; 32; 99; 34; 64; 24; 94; 22; 62; 65; 96; 22; 24; 95; 74; 99; 23; 95; 74; 99; 5; 55; 75; 75]; [76; 76; 97; 29; 89; 1; 11; 72; 70; 65; 95; 90; 93; 100; 95; 90; 86; 90; 81; 7; 99; 99; 48; 42; 94; 18; 67; 98; 96; 83; 97; 95; 72; 54; 24; 95; 98; 99; 83; 92; 75; 15]; [99; 89; 97; 100; 89; 100; 18; 64; 20; 16; 44; 46; 60; 90; 95; 3; 46; 83; 94; 64; 64; 80; 89; 32; 26; 94; 100; 64; 96; 48; 97; 27; 90; 99; 20; 95; 49; 99; 1; 92; 75; 36]; [13; 89; 18; 100; 2; 57; 9; 1; 98; 89; 30; 100; 66; 100; 95; 90; 86; 5; 70; 100; 95; 8; 25; 93; 89; 94; 100; 73; 96; 83; 97; 4; 99; 99; 65; 9; 98; 10; 64; 92; 1; 25]; [6; 89; 76; 100; 89; 100; 7; 40; 98; 89; 95; 56; 43; 63; 95; 90; 1; 0; 17; 76; 99; 83; 89; 93; 94; 94; 90; 98; 96; 9; 97; 95; 30; 99; 23; 95; 16; 99; 78; 23; 75; 94]; [98; 18; 80; 100; 89; 100; 55; 97; 0; 89; 24; 43; 89; 18; 95; 90; 84; 90; 30; 41; 99; 64; 89; 78; 94; 70; 45; 59; 18; 83; 32; 95; 13; 99; 93; 95; 98; 99; 83; 78; 75; 64]; [99; 71; 15; 100; 89; 79; 93; 73; 98; 89; 95; 20; 19; 96; 82; 61; 45; 31; 58; 63; 85; 34; 89; 74; 94; 94; 18; 98; 53; 63; 97; 95; 99; 99; 72; 28; 34; 23; 83; 14; 75; 94]; [79; 89; 75; 100; 89; 3; 93; 97; 98; 89; 67; 100; 93; 0; 95; 90; 41; 76; 94; 100; 99; 94; 82; 93; 26; 43; 67; 53; 35; 83; 50; 64; 88; 50; 15; 95; 35; 27; 83; 55; 69; 94]; [81; 89; 31; 91; 89; 100; 93; 97; 9; 89; 95; 100; 93; 100; 95; 90; 23; 90; 94; 100; 99; 74; 89; 93; 68; 49; 100; 23; 19; 83; 97; 95; 99; 24; 69; 95; 47; 99; 83; 92; 75; 81]; [77; 89; 65; 100; 27; 45; 93; 40; 19; 89; 35; 100; 93; 100; 95; 90; 60; 90; 32; 52; 99; 99; 40; 93; 70; 28; 62; 98; 96; 40; 58; 95; 31; 99; 43; 95; 98; 5; 80; 92; 75; 94]; [99; 89; 59; 54; 89; 7; 66; 54; 98; 89; 57; 100; 93; 100; 95; 15; 86; 90; 94; 100; 99; 41; 89; 90; 50; 55; 100; 94; 96; 67; 97; 61; 99; 32; 38; 95; 98; 56; 21; 92; 75; 13]; [99; 21; 97; 100; 42; 100; 93; 97; 49; 3; 95; 100; 53; 93; 95; 77; 86; 3; 1; 100; 99; 99; 7; 93; 94; 94; 100; 53; 96; 83; 9; 95; 99; 58; 10; 95; 42; 99; 68; 67; 58; 94]; [99; 25; 97; 100; 89; 2; 80; 97; 5; 45; 19; 66; 88; 100; 95; 65; 74; 90; 12; 62; 99; 99; 89; 93; 83; 94; 81; 15; 96; 83; 97; 8; 99; 99; 93; 53; 9; 99; 83; 92; 64; 83]; [99; 57; 97; 100; 47; 100; 82; 97; 98; 89; 95; 58; 6; 81; 95; 90; 66; 90; 86; 16; 89; 39; 7; 93; 94; 5; 19; 7; 75; 83; 97; 95; 57; 99; 93; 38; 43; 96; 83; 52; 28; 94]; [77; 59; 20; 100; 89; 100; 93; 97; 50; 89; 95; 4; 93; 41; 38; 76; 86; 30; 94; 100; 60; 84; 69; 93; 94; 94; 97; 74; 81; 83; 11; 95; 63; 44; 1; 95; 83; 99; 44; 57; 75; 94]])17 18let test4 _ = assert_equal [[3;2];[5;2]] (modifiedMatrix [[55; 64; 2; 93; 51; 52; 98; 39; 50; 25; 90; 72; 16; 84; 10; 5; 45; 55; 91; 67; 93; 84; 95; 99; 94; 88; 28; 100; 99]; [98; 86; 100; 93; 96; 96; 98; 70; 80; 97; 69; 15; 94; 39; 53; 62; 98; 63; 29; 70; 84; 84; 95; 99; 94; 88; 41; 55; 99]; [1; 86; 39; 93; 92; 96; 98; 40; 80; 96; 90; 53; 63; 84; 87; 82; 98; 40; 91; 65; 93; 52; 95; 99; 37; 7; 81; 39; 31]; [55; 49; 100; 93; 96; 88; 69; 99; 80; 97; 90; 99; 69; 84; 87; 82; 98; 63; 30; 92; 80; 84; 18; 70; 6; 88; 92; 100; 99]; [98; 86; 71; 93; 96; 96; 37; 53; 80; 72; 38; 99; 94; 59; 87; 0; 98; 9; 87; 75; 41; 47; 95; 28; 94; 88; 42; 18; 27]; [98; 86; 21; 68; 61; 96; 98; 95; 31; 97; 90; 99; 75; 84; 87; 66; 54; 63; 91; 77; 42; 65; 3; 44; 21; 27; 92; 23; 99]; [98; 86; 100; 44; 92; 33; 98; 99; 9; 47; 12; 23; 77; 84; 87; 82; 27; 31; 91; 92; 93; 15; 58; 99; 9; 88; 92; 90; 61]; [15; 86; 100; 10; 77; 96; 52; 99; 80; 88; 75; 80; 48; 9; 48; 35; 98; 63; 91; 81; 60; 84; 95; 99; 18; 88; 85; 24; 20]; [98; 86; 100; 93; 32; 96; 98; 40; 80; 53; 5; 99; 85; 84; 69; 82; 48; 63; 91; 92; 67; 13; 88; 44; 27; 8; 12; 100; 99]; [98; 26; 14; 12; 96; 96; 58; 6; 80; 52; 90; 99; 94; 84; 87; 82; 98; 63; 91; 79; 93; 84; 95; 53; 30; 63; 37; 92; 27]; [98; 86; 100; 22; 96; 96; 98; 43; 53; 44; 78; 73; 94; 84; 87; 82; 98; 3; 91; 28; 79; 79; 95; 99; 94; 88; 77; 53; 79]; [73; 86; 52; 93; 96; 96; 44; 65; 80; 97; 58; 51; 94; 84; 14; 82; 98; 13; 39; 92; 38; 38; 82; 41; 93; 86; 23; 100; 50]; [98; 86; 100; 93; 96; 96; 60; 99; 80; 97; 90; 99; 94; 84; 41; 82; 98; 54; 84; 67; 93; 84; 95; 99; 66; 88; 92; 100; 12]; [98; 83; 22; 50; 30; 47; 98; 35; 29; 97; 90; 33; 94; 78; 87; 82; 98; 31; 91; 92; 39; 84; 25; 99; 88; 59; 92; 5; 99]; [61; 11; 100; 93; 96; 96; 98; 21; 80; 97; 85; 17; 15; 4; 13; 82; 94; 30; 91; 0; 93; 56; 74; 73; 94; 88; 53; 46; 85]; [98; 86; 23; 83; 96; 96; 43; 99; 80; 29; 90; 99; 94; 7; 75; 75; 30; 63; 91; 92; 93; 64; 92; 91; 94; 45; 14; 97; 99]; [98; 68; 44; 63; 96; 67; 91; 99; 80; 60; 68; 99; 65; 84; 87; 82; 16; 63; 91; 46; 36; 7; 78; 99; 94; 63; 25; 100; 99]; [1; 86; 100; 43; 94; 86; 63; 87; 0; 97; 77; 99; 75; 84; 87; 82; 98; 59; 44; 50; 29; 66; 95; 99; 94; 88; 62; 100; 58]; [98; 37; 100; 66; 96; 96; 14; 99; 40; 97; 90; 99; 21; 34; 17; 82; 98; 63; 67; 92; 0; 51; 95; 99; 94; 61; 44; 100; 99]])19 20let test5 _ = assert_equal [[3;2];[5;2]] (modifiedMatrix [[94; 97; 99; 15; 56; 10; 97; 58; 90; 73; 100; 89; 98; 9; 100; 72; 100; 91; 93; 41; 10; 89; 84; 88; 45; 100; 85; 40; 38; 78; 78; 64; 71; 33; 77; 45; 100; 100; 92; 13; 67; 97; 10; 53; 84]; [94; 97; 99; 86; 13; 70; 97; 32; 90; 14; 51; 13; 8; 81; 11; 88; 100; 7; 93; 100; 26; 48; 84; 88; 62; 75; 29; 95; 92; 100; 78; 27; 71; 80; 77; 56; 81; 65; 92; 100; 27; 97; 86; 81; 84]; [94; 40; 99; 89; 90; 90; 26; 79; 90; 33; 14; 89; 98; 81; 14; 88; 100; 91; 5; 56; 48; 89; 84; 88; 96; 100; 85; 42; 29; 87; 78; 85; 65; 62; 39; 56; 56; 37; 92; 9; 53; 31; 86; 67; 50]; [94; 95; 29; 89; 90; 90; 62; 89; 67; 73; 71; 89; 98; 79; 7; 88; 100; 45; 72; 100; 65; 75; 84; 88; 96; 100; 85; 90; 20; 88; 73; 65; 69; 71; 77; 31; 100; 89; 92; 100; 67; 11; 48; 81; 5]; [94; 70; 84; 5; 86; 73; 17; 89; 0; 23; 100; 77; 26; 81; 100; 88; 100; 32; 93; 92; 65; 89; 84; 75; 96; 84; 8; 24; 92; 100; 30; 11; 71; 15; 17; 56; 53; 54; 92; 100; 67; 68; 45; 56; 65]; [22; 68; 99; 12; 17; 59; 97; 89; 25; 73; 100; 89; 34; 17; 81; 88; 100; 91; 76; 62; 64; 50; 84; 45; 80; 74; 47; 58; 24; 100; 78; 40; 1; 80; 77; 56; 100; 100; 92; 100; 51; 97; 32; 23; 24]; [94; 45; 97; 89; 10; 90; 97; 89; 20; 55; 3; 65; 98; 81; 100; 7; 72; 42; 21; 68; 57; 8; 46; 84; 34; 36; 1; 95; 8; 78; 73; 6; 71; 68; 77; 26; 30; 98; 39; 63; 24; 97; 14; 81; 84]; [83; 97; 13; 89; 90; 62; 97; 6; 90; 73; 100; 31; 98; 81; 100; 63; 45; 53; 30; 3; 65; 48; 59; 17; 96; 100; 81; 58; 92; 40; 78; 51; 71; 42; 77; 39; 100; 53; 29; 100; 16; 97; 86; 72; 24]; [94; 32; 99; 89; 72; 90; 44; 89; 90; 73; 17; 89; 98; 81; 28; 88; 100; 91; 89; 18; 65; 54; 84; 88; 84; 100; 42; 34; 92; 73; 8; 62; 43; 8; 52; 56; 100; 72; 92; 100; 32; 97; 86; 81; 84]; [64; 97; 77; 82; 75; 87; 97; 53; 90; 73; 100; 89; 26; 81; 9; 66; 17; 26; 33; 10; 65; 89; 6; 32; 56; 100; 46; 95; 92; 100; 78; 82; 71; 80; 77; 56; 100; 21; 92; 49; 0; 97; 86; 81; 84]; [94; 97; 3; 24; 72; 39; 97; 89; 89; 73; 100; 89; 98; 70; 4; 88; 49; 91; 54; 14; 65; 50; 73; 86; 96; 88; 85; 95; 79; 20; 25; 85; 71; 80; 64; 56; 37; 34; 39; 100; 54; 57; 32; 81; 84]; [94; 8; 42; 13; 78; 19; 59; 89; 5; 73; 100; 89; 98; 78; 100; 88; 12; 91; 45; 100; 65; 89; 84; 88; 28; 100; 4; 9; 92; 100; 78; 85; 39; 52; 77; 56; 100; 78; 22; 100; 67; 80; 86; 56; 84]])21 22let test6 _ = assert_equal [[3;2];[5;2]] (modifiedMatrix [[95; 96; 19; 88; 100; 92; 98; 85; 18; 98; 71; 56; 88; 80; 100; 87; 31; 92; 75; 91; 65; 42; 84; 52; 81; 17; 22; 77; 73; 41]; [73; 96; 99; 51; 85; 63; 67; 85; 53; 98; 71; 46; 100; 80; 35; 87; 93; 92; 24; 26; 52; 87; 36; 91; 100; 90; 97; 88; 85; 96]; [68; 27; 62; 88; 25; 86; 98; 49; 45; 0; 35; 90; 100; 80; 100; 87; 58; 8; 54; 91; 98; 45; 18; 91; 100; 75; 66; 88; 7; 96]; [95; 94; 99; 88; 100; 22; 98; 32; 100; 80; 50; 59; 100; 78; 100; 87; 83; 69; 100; 74; 98; 100; 38; 14; 41; 90; 97; 88; 85; 96]; [95; 96; 80; 88; 100; 68; 98; 85; 100; 30; 26; 90; 100; 23; 100; 87; 93; 49; 18; 91; 98; 11; 84; 91; 60; 74; 97; 12; 77; 96]; [95; 71; 79; 88; 58; 92; 98; 85; 100; 20; 64; 90; 100; 5; 58; 87; 93; 1; 100; 91; 98; 50; 84; 38; 58; 90; 97; 84; 85; 84]; [95; 73; 99; 88; 36; 92; 98; 85; 51; 42; 31; 69; 68; 80; 100; 67; 93; 88; 100; 91; 13; 63; 46; 5; 100; 90; 97; 88; 37; 50]; [23; 96; 99; 64; 100; 89; 98; 85; 100; 71; 19; 90; 100; 0; 73; 87; 93; 92; 37; 91; 98; 100; 84; 91; 57; 90; 30; 31; 65; 96]; [52; 96; 87; 88; 14; 56; 76; 85; 100; 98; 71; 35; 100; 80; 100; 40; 89; 92; 100; 91; 98; 79; 84; 91; 14; 90; 5; 49; 85; 96]; [16; 52; 99; 64; 100; 24; 53; 85; 87; 98; 71; 56; 11; 80; 81; 15; 93; 92; 100; 3; 12; 100; 84; 91; 78; 30; 31; 88; 45; 83]; [34; 96; 77; 88; 98; 39; 98; 20; 100; 76; 71; 77; 100; 80; 100; 87; 30; 20; 55; 91; 63; 100; 84; 11; 22; 9; 97; 88; 85; 9]; [1; 96; 99; 78; 100; 42; 98; 85; 77; 98; 3; 90; 100; 80; 71; 29; 61; 92; 15; 51; 98; 90; 17; 91; 100; 90; 97; 88; 85; 96]; [95; 96; 99; 80; 6; 26; 98; 85; 22; 98; 42; 36; 24; 38; 44; 48; 55; 92; 74; 28; 98; 41; 6; 91; 100; 28; 24; 86; 85; 96]; [95; 44; 99; 23; 100; 42; 90; 85; 100; 98; 61; 69; 100; 80; 85; 87; 93; 69; 43; 10; 98; 100; 63; 7; 62; 21; 97; 82; 20; 96]; [20; 96; 72; 88; 100; 45; 45; 74; 58; 65; 25; 90; 77; 43; 82; 47; 65; 11; 100; 58; 98; 100; 37; 48; 87; 66; 97; 59; 59; 5]; [95; 96; 99; 88; 100; 84; 27; 41; 20; 98; 71; 90; 82; 34; 44; 86; 86; 92; 100; 54; 98; 100; 84; 91; 69; 45; 23; 88; 34; 31]; [95; 91; 99; 15; 100; 92; 98; 41; 100; 93; 65; 90; 14; 39; 69; 87; 93; 13; 77; 68; 77; 100; 66; 91; 94; 90; 27; 74; 85; 96]; [95; 58; 99; 53; 3; 52; 21; 85; 100; 98; 71; 90; 100; 10; 100; 39; 21; 35; 94; 91; 98; 100; 55; 45; 100; 46; 97; 88; 85; 82]; [75; 96; 95; 40; 8; 92; 69; 85; 100; 98; 36; 90; 100; 80; 100; 87; 63; 92; 100; 91; 98; 91; 84; 91; 100; 30; 97; 88; 85; 96]; [95; 96; 71; 88; 88; 8; 98; 21; 18; 98; 71; 12; 76; 80; 19; 28; 93; 92; 48; 91; 90; 100; 75; 27; 100; 90; 97; 42; 9; 28]; [95; 96; 17; 88; 100; 92; 98; 62; 100; 98; 8; 47; 63; 61; 100; 81; 93; 92; 67; 59; 98; 100; 84; 11; 65; 90; 97; 11; 85; 77]])23 24let test7 _ = assert_equal [[3;2];[5;2]] (modifiedMatrix [[60; 95; 0]; [51; 67; 93]; [99; 55; 93]; [99; 97; 93]; [99; 97; 93]; [99; 4; 93]; [99; 38; 78]; [99; 97; 93]; [99; 28; 93]; [29; 97; 40]; [99; 47; 55]; [62; 59; 93]; [67; 3; 8]; [70; 44; 93]; [99; 32; 93]; [84; 97; 93]; [99; 97; 40]; [59; 54; 7]; [11; 0; 93]; [99; 48; 93]; [17; 17; 93]; [99; 97; 93]; [99; 68; 39]; [74; 97; 93]; [99; 97; 23]; [59; 21; 93]; [99; 66; 93]; [99; 97; 93]; [71; 56; 20]; [2; 17; 21]; [99; 26; 93]; [40; 26; 16]; [80; 31; 56]; [75; 97; 29]; [32; 19; 93]; [99; 97; 93]; [99; 97; 14]; [84; 97; 15]; [28; 97; 93]; [99; 97; 86]])25 26 27    (* Grouping test cases *)28    let suite = "Test Suite for modifiedMatrix" >::: [29        30  "test1" >:: test1;31  "test2" >:: test2;32  "test3" >:: test3;33  "test4" >:: test4;34  "test5" >:: test5;35  "test6" >:: test6;36  "test7" >:: test7;37    ]38 39 40    (* Running the tests *)41    let () = run_test_tt_main suite42end43