#! /bin/bash
global WHAT := $1
global DIR := $2
global MINIC := $3
global MAXIC := $4
global MINOC := $5
global MAXOC := $6
global prefix := $8

global meanstatsfilename := "$2/mean.html"

global WORK_DIR := 'tmp'
mkdir $WORK_DIR

global DATA_FILE := $[find $DIR -name "*.dat" | grep _$(WHAT)]

if test -n $DATA_FILE {

  echo ""
  echo "$1..."
  for FILE in [$DATA_FILE]
  {
          ##echo hello world
          ##echo "mk_mean_script1" ${FILE}
    global BASE := $(FILE##*/) ; global BASE := $(FILE##*/) ; global AVANT := "bench_$(WHAT)_" ; global REDUC := $(BASE##*$AVANT) ; global TITLE := $(REDUC%.dat)

    ##echo "mk_mean_script1" ${TITLE}
    cp $FILE $(WORK_DIR)/$(TITLE)

  }

  cd $WORK_DIR
  ../main $1 $3 $4 $5 $6 * >> ../$meanstatsfilename
  ../mk_new_gnuplot.sh $1 $2 $7
  rm -f *.gnuplot
  cd ..

  echo '<br/>' >> $meanstatsfilename

  global webpagefilename := "$2/index.html"
  # echo '<h3>'${WHAT}'</h3>'  >> $webpagefilename
  echo '<hr/><a href="'$prefix$1'.pdf"><img src="'$prefix$1'.png" alt="'$(WHAT)'" /></a><br/>'  >> $webpagefilename

}

rm -R $WORK_DIR






(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:WHAT) op:Equal rhs:{($ VSub_Number "$1")} spids:[3])]
      spids: [3]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:DIR) op:Equal rhs:{($ VSub_Number "$2")} spids:[6])]
      spids: [6]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:MINIC) op:Equal rhs:{($ VSub_Number "$3")} spids:[9])]
      spids: [9]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:MAXIC) op:Equal rhs:{($ VSub_Number "$4")} spids:[12])]
      spids: [12]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:MINOC) op:Equal rhs:{($ VSub_Number "$5")} spids:[15])]
      spids: [15]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:MAXOC) op:Equal rhs:{($ VSub_Number "$6")} spids:[18])]
      spids: [18]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:prefix) op:Equal rhs:{($ VSub_Number "$8")} spids:[21])]
      spids: [21]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:meanstatsfilename)
          op: Equal
          rhs: {($ VSub_Number "$2") (/mean.html)}
          spids: [25]
        )
      ]
      spids: [25]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:WORK_DIR) op:Equal rhs:{(tmp)} spids:[30])]
      spids: [30]
    )
    (C {(mkdir)} {($ VSub_Name "$WORK_DIR")})
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:DATA_FILE)
          op: Equal
          rhs: 
            {
              (CommandSubPart
                command_list: 
                  (CommandList
                    children: [
                      (Pipeline
                        children: [
                          (C {(find)} {($ VSub_Name "$DIR")} {(-name)} {(DQ ("*.dat"))})
                          (C {(grep)} {(_) (${ VSub_Name WHAT)})
                        ]
                        negated: False
                      )
                    ]
                  )
                left_token: <Left_Backtick "`">
                spids: [39 58]
              )
            }
          spids: [38]
        )
      ]
      spids: [38]
    )
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: (C {(Lit_Other "[")} {(-n)} {(DQ ($ VSub_Name "$DATA_FILE"))} {(Lit_Other "]")})
              terminator: <Op_Semi ";">
            )
          ]
          action: [
            (C {(echo)} {(DQ )})
            (C {(echo)} {(DQ ($ VSub_Number "$1") (...))})
            (ForEach
              iter_name: FILE
              iter_words: [{($ VSub_Name "$DATA_FILE")}]
              do_arg_iter: False
              body: 
                (DoGroup
                  children: [
                    (Sentence
                      child: 
                        (Assignment
                          keyword: Assign_None
                          pairs: [
                            (assign_pair
                              lhs: (LhsName name:BASE)
                              op: Equal
                              rhs: 
                                {
                                  (BracedVarSub
                                    token: <VSub_Name FILE>
                                    suffix_op: 
                                      (StringUnary
                                        op_id: VOp1_DPound
                                        arg_word: {("*") (Lit_Slash /)}
                                      )
                                    spids: [113 118]
                                  )
                                }
                              spids: [112]
                            )
                          ]
                          spids: [112]
                        )
                      terminator: <Op_Semi ";">
                    )
                    (Sentence
                      child: 
                        (Assignment
                          keyword: Assign_None
                          pairs: [
                            (assign_pair
                              lhs: (LhsName name:BASE)
                              op: Equal
                              rhs: 
                                {
                                  (BracedVarSub
                                    token: <VSub_Name FILE>
                                    suffix_op: 
                                      (StringUnary
                                        op_id: VOp1_DPound
                                        arg_word: {("*") (Lit_Slash /)}
                                      )
                                    spids: [123 128]
                                  )
                                }
                              spids: [122]
                            )
                          ]
                          spids: [122]
                        )
                      terminator: <Op_Semi ";">
                    )
                    (Sentence
                      child: 
                        (Assignment
                          keyword: Assign_None
                          pairs: [
                            (assign_pair
                              lhs: (LhsName name:AVANT)
                              op: Equal
                              rhs: {(bench_) (${ VSub_Name WHAT) (_)}
                              spids: [132]
                            )
                          ]
                          spids: [132]
                        )
                      terminator: <Op_Semi ";">
                    )
                    (Sentence
                      child: 
                        (Assignment
                          keyword: Assign_None
                          pairs: [
                            (assign_pair
                              lhs: (LhsName name:REDUC)
                              op: Equal
                              rhs: 
                                {
                                  (BracedVarSub
                                    token: <VSub_Name BASE>
                                    suffix_op: 
                                      (StringUnary
                                        op_id: VOp1_DPound
                                        arg_word: {("*") ($ VSub_Name "$AVANT")}
                                      )
                                    spids: [142 147]
                                  )
                                }
                              spids: [141]
                            )
                          ]
                          spids: [141]
                        )
                      terminator: <Op_Semi ";">
                    )
                    (Assignment
                      keyword: Assign_None
                      pairs: [
                        (assign_pair
                          lhs: (LhsName name:TITLE)
                          op: Equal
                          rhs: 
                            {
                              (BracedVarSub
                                token: <VSub_Name REDUC>
                                suffix_op: (StringUnary op_id:VOp1_Percent arg_word:{(.dat)})
                                spids: [152 156]
                              )
                            }
                          spids: [151]
                        )
                      ]
                      spids: [151]
                    )
                    (C {(cp)} {($ VSub_Name "$FILE")} {(${ VSub_Name WORK_DIR) (/) (${ VSub_Name TITLE)})
                  ]
                  spids: [101 178]
                )
              spids: [97 -1]
            )
            (C {(cd)} {($ VSub_Name "$WORK_DIR")})
            (SimpleCommand
              words: [
                {(../main)}
                {($ VSub_Number "$1")}
                {($ VSub_Number "$3")}
                {($ VSub_Number "$4")}
                {($ VSub_Number "$5")}
                {($ VSub_Number "$6")}
                {(Lit_Other "*")}
              ]
              redirects: [
                (Redir
                  op_id: Redir_DGreat
                  fd: -1
                  arg_word: {(../) ($ VSub_Name "$meanstatsfilename")}
                  spids: [201]
                )
              ]
            )
            (C {(../mk_new_gnuplot.sh)} {($ VSub_Number "$1")} {($ VSub_Number "$2")} 
              {($ VSub_Number "$7")}
            )
            (C {(rm)} {(-f)} {(Lit_Other "*") (.gnuplot)})
            (C {(cd)} {(..)})
            (SimpleCommand
              words: [{(echo)} {(SQ <"<br/>">)}]
              redirects: [
                (Redir
                  op_id: Redir_DGreat
                  fd: -1
                  arg_word: {($ VSub_Name "$meanstatsfilename")}
                  spids: [236]
                )
              ]
            )
            (Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (LhsName name:webpagefilename)
                  op: Equal
                  rhs: {($ VSub_Number "$2") (/index.html)}
                  spids: [242]
                )
              ]
              spids: [242]
            )
            (SimpleCommand
              words: [
                {(echo)}
                {(SQ <"<hr/><a href=\"">) ($ VSub_Name "$prefix") ($ VSub_Number "$1") 
                  (SQ <".pdf\"><img src=\"">) ($ VSub_Name "$prefix") ($ VSub_Number "$1") (SQ <".png\" alt=\"">) (${ VSub_Name WHAT) 
                  (SQ <"\" /></a><br/>">)
                }
              ]
              redirects: [
                (Redir
                  op_id: Redir_DGreat
                  fd: -1
                  arg_word: {($ VSub_Name "$webpagefilename")}
                  spids: [273]
                )
              ]
            )
          ]
          spids: [-1 74]
        )
      ]
      spids: [-1 278]
    )
    (C {(rm)} {(-R)} {($ VSub_Name "$WORK_DIR")})
  ]
)