--implementation(helper)
generate :: Int -> [Int] -> [String] -> Node
generate idVal nextNodes specialInfo = Node { myId=idVal
                                            , nexts=nextNodes
                                            , special=specialInfo }
generate :: Int -> [Int] -> [String] -> Node
generate idVal nextNodes specialInfo = Node { myId=idVal
                                            , nexts=nextNodes
                                            , special=specialInfo }
generate idVal nextNodes specialInfo = Node { myId=idVal
                                            , nexts=nextNodes
                                            , special=specialInfo }