aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

new files

Browse source
This commit is contained in:
Ingy döt Net 2013-04-10 12:38:42 -07:00
parent 3af7344581
commit 86c034bb8b
1364 changed files with 21352 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

21
Task/Balanced-brackets/AWK/balanced-brackets.awk Normal file
View file

@ -0,0 +1,21 @@
#!/usr/bin/awk -f
BEGIN {
print isbb("[]")
print isbb("][")
print isbb("][][")
print isbb("[][]")
print isbb("[][][]")
print isbb("[]][[]")
}
function isbb(x) {
s = 0;
for (k=1; k<=length(x); k++) {
c = substr(x,k,1);
if (c=="[") {s++;}
else { if (c=="]") s--; }
if (s<0) {return 0};
}
return (s==0);
}