From 8777ff071f7bb37631baa7b6717ad29961e50911 Mon Sep 17 00:00:00 2001 From: "H.J" Date: Wed, 9 Oct 2024 11:36:55 -0400 Subject: sorting by language --- leetcode/lc-1299-replace-with-greatest-to-right.rkt | 8 -------- 1 file changed, 8 deletions(-) delete mode 100644 leetcode/lc-1299-replace-with-greatest-to-right.rkt (limited to 'leetcode/lc-1299-replace-with-greatest-to-right.rkt') diff --git a/leetcode/lc-1299-replace-with-greatest-to-right.rkt b/leetcode/lc-1299-replace-with-greatest-to-right.rkt deleted file mode 100644 index 34d3eae..0000000 --- a/leetcode/lc-1299-replace-with-greatest-to-right.rkt +++ /dev/null @@ -1,8 +0,0 @@ -#lang racket -(define/contract (replace-elements arr) - (-> (listof exact-integer?) (listof exact-integer?)) - (cond [(= 1 (length arr)) '(-1)] - [else (cons (apply max (cdr arr)) - (replace-elements (cdr arr)))])) - -(replace-elements '(17 18 5 4 6 1)) \ No newline at end of file -- cgit v1.2.3