forked from ellisk42/ec
-
Notifications
You must be signed in to change notification settings - Fork 0
/
phone-2_short.sl
58 lines (24 loc) · 1020 Bytes
/
phone-2_short.sl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
(set-logic SLIA)
(synth-fun f ((name String)) String
((Start String (ntString))
(ntString String (name " "
(str.++ ntString ntString)
(str.replace ntString ntString ntString)
(str.at ntString ntInt)
(str.substr ntString ntInt ntInt)))
(ntInt Int (0 1 2 3 4 5
(+ ntInt ntInt)
(- ntInt ntInt)
(str.len ntString)
(str.indexof ntString ntString ntInt)))
(ntBool Bool (true false
(str.prefixof ntString ntString)
(str.suffixof ntString ntString)))))
(declare-var name String)
(constraint (= (f "938-242-504") "504"))
(constraint (= (f "308-916-545") "545"))
(constraint (= (f "623-599-749") "749"))
(constraint (= (f "981-424-843") "843"))
(constraint (= (f "118-980-214") "214"))
(constraint (= (f "244-655-094") "094"))
(check-synth)