finalArrayLength :: TypeNode -> [[String]] -> SemanticUnit -> Expression -> Bool
finalArrayLength db imps su (Attribute s m _) = case (typeS, m) of
                                                    (Array _, "length") -> False
                                                    _ -> True
        where
            [typeS] = typeLinkingExpr db imps su s
finalArrayLength :: TypeNode -> [[String]] -> SemanticUnit -> Expression -> Bool
finalArrayLength db imps su (Attribute s m _) = case (typeS, m) of
                                                    (Array _, "length") -> False
                                                    _ -> True
        where
            [typeS] = typeLinkingExpr db imps su s
finalArrayLength db imps su (Attribute s m _) = case (typeS, m) of
                                                    (Array _, "length") -> False
                                                    _ -> True
        where
            [typeS] = typeLinkingExpr db imps su s