Code Golf: Parenthesis

Our previous code golf ended with an overwhelming win, so now it's time for another one.
Parenthesis Hell is a Lisp-like esoteric programming language(esolang).
As a Lisp-like language, the code consists only of nested matched pairs of opened and closed parenthesis.
Your task is to write a method that receives a string of parenthesis and returns 1 if the order of the parenthesis is valid. For example, the string of parenthesis (())() is valid because it contains a matched pair of opened and closed parenthesis at each position. The string ()((()))) is not valid because it contains one unmatched parenthesis.

Input

"(()()())" 

Output

1

Note

• Characters other than parentheses )( must be ignored, such as braces {}, brackets [], chevrons <>, etc.
• Use this code to check the solution length

Rules

1. The signature of the contest entry MUST be:

   Class codeGolf.ParenthesisHell
   {
   
   ClassMethod IsValid(s As %String) As %Boolean
   {
       // Your solution here
   }
   
   }
   

2. It is forbidden to modify class/signature, including but not limited to:
   • Adding inheritance
   • Setting default argument values
   • Adding class elements (Parameters, Methods, Includes, etc).

3. It is forbidden to refer to non-system code from your entry. For example, this is not a valid entry:

   ClassMethod Build(f As %Integer)
   {
     W ##class(myPackage.myClass).test(a)
   }
   

4. The use of $ZWPACK and $ZWBPACK is also discouraged.

5. You can use this test case:

   Class codeGolf.unittests.ParenthesisHell Extends %UnitTest.TestCase
   {
   
   Method TestValid()
   {
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("()"), $$$YES)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("(()())"), $$$YES)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("(((())))"), $$$YES)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("()(())((()))(())()"), $$$YES)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("(]{)"), $$$YES)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("(()()(()()(()()()()((()()(()(()((()((()()()((()((()()()((()((((()()(()()()()()()(((()(((()((()((((()(((()()(()()((()((()()()((()()(()()()()(()()()()(()()()()(()(())))))))))))))))))))))))))))))))))))))))))))))))))"), $$$YES)
   }
   
   Method TestInValid()
   {
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("(]"), $$$NO)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("()(()(()))(()()"), $$$NO)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid(")("), $$$NO)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("()()("), $$$NO)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("((())"), $$$NO)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("())(()"), $$$NO)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid(")()"), $$$NO)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid(")"), $$$NO)
       Do $$$AssertEquals(##class(codeGolf.ParenthesisHell).IsValid("(()()(()()(()()()()((()()(()(()((()((()()()((()((()()()((()((((()()(()()()()()()(((()(((()((()((((()(((()()(()()((()((()()()((()()(()()()()(()()()()(()()()()(()(()))))))))))))))))))))))))))))))))))))))))))))))))"), $$$NO)
   }
   }