let rec formatEqual firstList secondList =
match firstList with
| [ ] -> if secondList.Equals ( [ ] ) true
| h :: t ->
let format = System.Console .ReadLine ( )
let name = System.Console .ReadLine ( )
let res = formatEqual format name
printfn "%b" res
bGV0IHJlYyBmb3JtYXRFcXVhbCBmaXJzdExpc3Qgc2Vjb25kTGlzdCA9IAogbWF0Y2ggZmlyc3RMaXN0IHdpdGggCiAgICB8IFtdIC0+IGlmIHNlY29uZExpc3QuRXF1YWxzKFtdKSB0cnVlCiAgICB8IGggOjogdCAtPiAKICAgICAgICBwcmludGYgIiVkXG4iIGgKCmxldCBmb3JtYXQgPSBTeXN0ZW0uQ29uc29sZS5SZWFkTGluZSgpCmxldCBuYW1lID0gU3lzdGVtLkNvbnNvbGUuUmVhZExpbmUoKQpsZXQgcmVzID0gZm9ybWF0RXF1YWwgZm9ybWF0IG5hbWUKCnByaW50Zm4gIiViIiByZXM=
compilation info
/home/IdWmDs/prog.fs(4,5): error FS0010: Incomplete structured construct at or before this point in expression
/home/IdWmDs/prog.fs(3,13): error FS0589: Unmatched 'if'
stdout