Changeset 4320 for branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_Drake.pro

Timestamp:

2013-11-28T12:41:27+01:00 (10 years ago)

Author:

flavoni

Message:

update IDL_scripts for ORCA2_LIM and ORCA2_LIM3, add plot of max_mld output 5days, see ticket: #724

File:

• branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_Drake.pro (modified) (2 diffs)

branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_Drake.pro

@@ -32 +32 @@
   u1 = rseries_ncdf(vU1, date1, date2, prefix, suffix, FIRSTONLY = 1 - allrec, /nostruct)
   drk1 = fltarr(jpt)
-  trans = strlowcase(getenv('VAR1_U')) EQ 'uocetr_eff'
+   ;SF trans = strlowcase(getenv('VAR1_U')) EQ 'uocetr_eff'
+   trans = strlowcase(getenv('VAR1_U')) EQ 'vozoeftr'
   FOR t = 0, jpt-1 DO BEGIN
     tmp = bsf(u1[*, *, *, t], TRANSPORT = trans, /nostruct)
@@ -48 +49 @@
     u2 = rseries_ncdf(vU2, date1_2, date2_2, prefix2, suffix2, FIRSTONLY = 1 - allrec, /nostruct)
     drk2 = fltarr(jpt)
-    trans = strlowcase(getenv('VAR2_U')) EQ 'uocetr_eff'
+    ;SF trans = strlowcase(getenv('VAR2_U')) EQ 'uocetr_eff'
+    trans = strlowcase(getenv('VAR1_U')) EQ 'vozoeftr'
     FOR t = 0, jpt-1 DO BEGIN
       tmp = bsf(u2[*, *, *, t], TRANSPORT = trans, /nostruct)