all/00.initial.ncl
author Forrest Hoffman <forrest@climatemodeling.org>
Thu, 26 Mar 2009 14:02:21 -0400
changeset 1 4be95183fbcd
permissions -rw-r--r--
Modifications to scoring and graphics production for the final version of code for the C-LAMP paper in GCB.
forrest@0
     1
;*****************************************************
forrest@0
     2
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"
forrest@0
     3
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"
forrest@0
     4
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"
forrest@0
     5
;****************************************************************************
forrest@0
     6
; Main code.
forrest@0
     7
;****************************************************************************
forrest@0
     8
begin
forrest@0
     9
forrest@0
    10
;--------------------------------------------------
forrest@0
    11
; edit table.html of current model for movel1_vs_model2
forrest@0
    12
forrest@0
    13
 if (isvar("compare")) then
forrest@0
    14
    html_name2 = compare+"/table.html"  
forrest@0
    15
    html_new2  = html_name2 +".new" 
forrest@0
    16
forrest@0
    17
    system("sed -e '/"+modeln+"/s/"+modeln+"/"+model_name+"/' "+html_name2+" > "+html_new2+";"+ \
forrest@0
    18
           "mv -f "+html_new2+" "+html_name2)
forrest@0
    19
 end if
forrest@0
    20
;-------------------------------------
forrest@0
    21
; edit table.html for current model
forrest@0
    22
forrest@0
    23
 html_name = model_name+"/table.html"  
forrest@0
    24
 html_new  = html_name +".new"
forrest@0
    25
 system("sed s#model_name#"+model_name+"# "+html_name+" > "+html_new+";"+ \
forrest@0
    26
        "mv -f "+html_new+" "+html_name)
forrest@0
    27
forrest@0
    28
;---------------------------------------------------------------------------
forrest@0
    29
forrest@0
    30
end
forrest@0
    31