@@ -163,55 +163,55 @@ describe("Ior", () => {
163
163
})
164
164
165
165
test ("map2 This This" , () =>
166
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , This (1 ), This (2 )))-> toEqual (This (3 ))
166
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , This (1 ), This (2 )))-> toEqual (This (3 ))
167
167
)
168
168
169
169
test ("map2 This That" , () =>
170
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , This (1 ), That ("W2" )))-> toEqual (That ("W2" ))
170
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , This (1 ), That ("W2" )))-> toEqual (That ("W2" ))
171
171
)
172
172
173
173
test ("map2 This Both" , () =>
174
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , This (1 ), Both (2 , "W2" )))-> toEqual (Both (3 , "W2" ))
174
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , This (1 ), Both (2 , "W2" )))-> toEqual (Both (3 , "W2" ))
175
175
)
176
176
177
177
test ("map2 That This" , () =>
178
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , That ("W1" ), This (1 )))-> toEqual (That ("W1" ))
178
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , That ("W1" ), This (1 )))-> toEqual (That ("W1" ))
179
179
)
180
180
181
181
test ("map2 That That" , () =>
182
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , That ("W1" ), That ("W2" )))-> toEqual (That ("W1W2" ))
182
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , That ("W1" ), That ("W2" )))-> toEqual (That ("W1W2" ))
183
183
)
184
184
185
185
test ("map2 That Both" , () =>
186
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , That ("W1" ), Both (1 , "W2" )))-> toEqual (That ("W1W2" ))
186
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , That ("W1" ), Both (1 , "W2" )))-> toEqual (That ("W1W2" ))
187
187
)
188
188
189
189
test ("map2 Both This" , () =>
190
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , Both (1 , "W1" ), This (2 )))-> toEqual (Both (3 , "W1" ))
190
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , Both (1 , "W1" ), This (2 )))-> toEqual (Both (3 , "W1" ))
191
191
)
192
192
193
193
test ("map2 Both That" , () =>
194
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , Both (1 , "W1" ), That ("W2" )))-> toEqual (That ("W1W2" ))
194
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , Both (1 , "W1" ), That ("W2" )))-> toEqual (That ("W1W2" ))
195
195
)
196
196
197
197
test ("map2 Both Both" , () =>
198
- expect (Ior .map2 (\"^ " , (a , b ) => a + b , Both (1 , "W1" ), Both (2 , "W2" )))-> toEqual (Both (3 , "W1W2" ))
198
+ expect (Ior .map2 (\"++ " , (a , b ) => a + b , Both (1 , "W1" ), Both (2 , "W2" )))-> toEqual (Both (3 , "W1W2" ))
199
199
)
200
200
201
201
test ("map3 This This This" , () =>
202
- expect (Ior .map3 (\"^ " , (a , b , c ) => a + b + c , This (1 ), This (2 ), This (3 )))-> toEqual (This (6 ))
202
+ expect (Ior .map3 (\"++ " , (a , b , c ) => a + b + c , This (1 ), This (2 ), This (3 )))-> toEqual (This (6 ))
203
203
)
204
204
205
205
test ("map4 This This This This" , () =>
206
206
expect (
207
- Ior .map4 (\"^ " , (a , b , c , d ) => a + b + c + d , This (1 ), This (2 ), This (3 ), This (4 )),
207
+ Ior .map4 (\"++ " , (a , b , c , d ) => a + b + c + d , This (1 ), This (2 ), This (3 ), This (4 )),
208
208
)-> toEqual (This (10 ))
209
209
)
210
210
211
211
test ("map5 This This This This This" , () =>
212
212
expect (
213
213
Ior .map5 (
214
- \"^ " ,
214
+ \"++ " ,
215
215
(a , b , c , d , f ) => a + b + c + d + f ,
216
216
This (1 ),
217
217
This (2 ),
0 commit comments