{ServeLocalCollection (5):} {catched error from mtc-m21b.sid.inpe.br} {too many nested evaluations (infinite loop?)} {    while executing} \"if\ \[regexp\ \{\\w\}\ \$letter\]\ \{ {					lappend noMatchPattern  "\[[string tolower $letter][string toupper $letter]\]"} \t\t\t\t\}\ else\ \{ {# [**] is not an equivalen..."} {    ("foreach" body line 2)} {    invoked from within} \"foreach\ letter\ \[split\ \$pattern\ \{\}\]\ \{ \t\t\t\tif\ \[regexp\ \{\\w\}\ \$letter\]\ \{ {					lappend noMatchPattern  "\[[string tolower $letter][string toupper $letter]\]..."} {    invoked from within} \"if\ \$type\ \{ \t\t\tforeach\ letter\ \[split\ \$pattern\ \{\}\]\ \{ {				lappend noMatchPattern [string tolower $letter]} \t\t\t\} \t\t\}\ else\ \{ {			foreach letter [split $patte..."} {    (procedure "SetNoMatch" line 30)} {    invoked from within} {"SetNoMatch $pattern $accent $case 0 $intervalRepresentationFlag"} {    ("foreach" body line 9)} {    invoked from within} \"foreach\ fieldFullName\ \$fieldList\ \{ {# MATCHING (could be improved by creating repArray3 similar to repArray } {# but with the word in lower case (like re..."} {    invoked from within} \"if\ \[regexp\ \{\\*\}\ \$pattern\]\ \{ {					set pattern2 [SetNoMatch $pattern $accent $case 0 $intervalRepresentationFlag]} {# puts --$pattern2} {					set string $pa..."} {    ("foreach" body line 9)} {    invoked from within} \"foreach\ pattern\ \[CreateIntervalRepresentation\ \$word\]\ \{ {# puts [list $pattern $fieldName]} {# => 50 mark.theta*} {# => shown visibility} {# => ** *} {# return} ...\" {    ("foreach" body line 17)} {    invoked from within} \"foreach\ word\ \[eval\ concat\ \$words\]\ \{ \t\t\tif\ \$listOfWordsFlag\ \{ \t\t\t\tif\ \[info\ exists\ wordArray(\$fieldName)\]\ \{ \t\t\t\t\tif\ \{\[lsearch\ \$wordArray(\$fieldName)\ \$wo...\" {    invoked from within} \"if\ \[regexp\ \{\ and\ |\ or\ \}\ \$string\]\ \{ {# puts $string} #\t\tif\ !\[string\ equal\ \[llength\ \$string\]\ \[llength\ \[join\ \$string\]\]\]\ \{ #\ syntax\ error\ example:\ \{af\ inpe\ ...\" {    (procedure "Search" line 66)} {    invoked from within} {"Search {repository, sid.inpe.br/mtc-m21b/2016/09.12.19.32} yes no repArray @q&WWtY!Y {}"} {    ("eval" body line 1)} {    invoked from within} {"eval $virtualRepList"} {    (procedure "or" line 6)} {    invoked from within} {"or [list Search [list repository, sid.inpe.br/mtc-m21b/2016/09.12.19.32] yes no repArray @q\&WWtY!Y {}]"} {    ("eval" body line 1)} {    invoked from within} {"eval $statement"} {    ("foreach" body line 26)} {    invoked from within} \"foreach\ statement\ \[lreplace\ \[split\ \$string\ ×\]\ 0\ 0\]\ \{\t\;#\ added\ by\ GPRB\ and\ GJFB\ in\ 2025-03-25 {# puts -1->$statement--} {# puts --$codedPassword--} {#			if..."} {    invoked from within} {"if [regexp {^related:(.*?):(.*?):(.*?):(.*?):(.*?):(.*?):} $string m metadataRep-i language selectedFieldNameList numberOfCombinations importantWordLi..."} {    (procedure "dpi.inpe.br/banon/1999/04.21.17.06::MountSearch" line 24)} {    invoked from within} {"${searchRepository}::MountSearch $searchExpression $accent $case repArray $codedPassword"} {    (procedure "Select2" line 12)} {    invoked from within} {"Select2 repository [list repository, $ibi] $administratorCodedPassword"} {    (procedure "FindRepositoryNameFromIBI" line 15)} {    invoked from within} {"FindRepositoryNameFromIBI $ibi"} {    (procedure "GetURLPropertyList" line 47)} {    invoked from within} \"GetURLPropertyList\ \{clientinformation.ipaddress\ 18.191.91.228\ parsedibiurl.ibi\ sid.inpe.br/mtc-m21b/2016/09.12.19.32\ parsedibiurl.metadatafieldnamelis...\" {    ("eval" body line 1)} {    invoked from within} {"eval $cmd"}