/***********************************************
          * Collapsible Frames script- (c) Dynamic Drive (www.dynamicdrive.com)
          * This notice must stay intact for use
          * Visit http://www.dynamicdrive.com/ for full source code
          ***********************************************/

          var columntype=""
          var defaultsetting=""

          function getCurrentSetting(){
          if (document.body)
          return (document.body.cols)? document.body.cols : document.body.rows
          }

          function setframevalue(coltype, settingvalue){
          if (coltype=="rows")
          document.body.rows=settingvalue
          else if (coltype=="cols")
          document.body.cols=settingvalue
          }

          function resizeFrame(contractsetting){
          if (getCurrentSetting()!=defaultsetting)
          setframevalue(columntype, defaultsetting)
          else
          setframevalue(columntype, contractsetting)
          }

          function init(){
          if (!document.all && !document.getElementById) return
          if (document.body!=null){
          columntype=(document.body.cols)? "cols" : "rows"
          defaultsetting=(document.body.cols)? document.body.cols : document.body.rows
          }
          else
          setTimeout("init()",100)
          }

          setTimeout("init()",100)