[Thread Prev][Thread Next][Index]
[las_users] LAS 8.6.8 CSV download error on some data sets
- To: "las_users@xxxxxxxx" <las_users@xxxxxxxx>
- Subject: [las_users] LAS 8.6.8 CSV download error on some data sets
- From: "Littlefield, Bryan" <bryan.littlefield@xxxxxxxxxx>
- Date: Fri, 17 Jan 2020 13:17:11 -0800
- Arc-authentication-results: i=4; mx.google.com; arc=pass (i=2); spf=fail (google.com: domain of bryan.littlefield@xxxxxxxxxx does not designate 209.85.219.72 as permitted sender) smtp.mailfrom=bryan.littlefield@xxxxxxxxxx
- Arc-authentication-results: i=3; mx.google.com; arc=pass (i=2); spf=fail (google.com: domain of bryan.littlefield@xxxxxxxxxx does not designate 209.85.219.72 as permitted sender) smtp.mailfrom=bryan.littlefield@xxxxxxxxxx
- Arc-authentication-results: i=2; mx.google.com; arc=pass (i=1 spf=pass spfdomain=ssaihq.com); spf=fail (google.com: domain of bryan.littlefield@xxxxxxxxxx does not designate 65.153.203.170 as permitted sender) smtp.mailfrom=bryan.littlefield@xxxxxxxxxx
- Arc-authentication-results: i=1; mx.google.com; spf=pass (google.com: domain of bryan.littlefield@xxxxxxxxxx designates 74.209.170.190 as permitted sender) smtp.mailfrom=bryan.littlefield@xxxxxxxxxx
- Arc-message-signature: i=4; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=arc-20160816; h=list-archive:list-help:list-post:list-id:mailing-list:precedence :message-id:content-language:mime-version:user-agent:date :organization:subject:from:cc:to:sender:dkim-signature; bh=xn93dAYf73ZxQ4dZWBXu+kcW7Uw/YnxT14mrlg9f4Eg=; b=Ulfv2kb/OfF8HjPHaBx/PKVe8lpUGPB7qurJ1PXOoFIK2C1XbvXT/67GHwVLmma1JY wqeekmHl0Tngt6nealUbY6h2iIrSX488f5nuiG3gbaXxB0VHpNgiExG4vjkDCUu+IEpY UHBJ32Ni1rvLaGeYpsscCvQE6A2BxdV25yhvamQD+izPmen2HAHqyLLe8PX+WGCe/x/v /39Dx9RiKZLG1G46v+wAZW+qhPEOOs6bZ5tsZfidEGRC06ML4hvHCQ8Ug9PWMePFnkuL 3NcwydoMca6QVoJIw+naKF15oA1aX+X7mLpjaFSCPEvVP4iOdfTb1L5x10NtU23qSkkS +C6Q==
- Arc-message-signature: i=3; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=arc-20160816; h=message-id:content-language:mime-version:user-agent:date :disposition-notification-to:organization:subject:from:cc:to; bh=xn93dAYf73ZxQ4dZWBXu+kcW7Uw/YnxT14mrlg9f4Eg=; b=Y4UL1ynJuAn9ou+UnEezOR8tqA/lUDLiMdPoX8kTZhWQE88pcw2CjFcURiCMtvcVgB UWjajb1e6NTR/pmK7UtUA2He8hRUGimhN3HB+NNEXTMpOa/d1w/3+hj7VQIzGFg2ct8e 8lFpaasBinp2W/urhoMAfQmExW+GbJtG74DVrsr3oq47K3zEOlr89gPeITLBo9k912rc 2ktRWien+Au3be6v08MUHy+sk5smIV75bJiLojBxSfc6JRPM/hjGh5LahYlbpltVufr6 lX6mrRLU9SPIF5U/k8nnlJJkzw4htnQ2tIzUKT/kFW+nim5xrEigSq7fNVn86J4sBlPR 1L6w==
- Arc-message-signature: i=2; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=arc-20160816; h=content-language:mime-version:user-agent:date :disposition-notification-to:message-id:organization:subject:from:cc :to; bh=xn93dAYf73ZxQ4dZWBXu+kcW7Uw/YnxT14mrlg9f4Eg=; b=t0/YZFqoumge96ajyK0KiS9ULqjUoxZmVZi/fzpWLA8kU26WHiLaQtm87sTetNOybY VuJzeIDld1SDLDcu1N+eUXI4BBYnKxNyt1fohESc9xwUEvkKUmwmEghukYaYZCi2YAcx F4efkYw4cyBWYmlcIsrEtehpsW1QjMf0DWVadSyR9gnzlxV8B7yJrA3vjvRtMuZoDahQ XVTIYFrG5CuWrsFKdvlBwGJMlHOpkajYVT9+LxKiv8Bn+Ad9uX0vEdAbP8jfjE27zJ1X eIE7MIsZMrdNcpcMc86L5lQ1oGhpRntZz2aMAbSuJy+OeAWi5nDFbqgvlUhC/TdqPDK6 VFPg==
- Arc-message-signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=arc-20160816; h=content-language:mime-version:user-agent:date :disposition-notification-to:message-id:organization:subject:from:cc :to; bh=xn93dAYf73ZxQ4dZWBXu+kcW7Uw/YnxT14mrlg9f4Eg=; b=Y5VdLcrNmQ0ClthYTrZVi+lITcu5SBD/bYtC5QHFwsQTwll8GLgjWJULSJQQa5LgTC ndtAf5qf/ozIOfu+BLZVQ+kKt3AZqRZrU+UkdvQvyAhqZIOOf0VeIXAbOP+HSoFsmuFz AX7V61yhdXq8kS6zW2Iu3xbDyOn4sfOuVKMJV/DXiYR24Q0KmOmm1VZJ/AkrgEJZfkOj sdY3byUeGy9ODUEgVuwI24NbB65s0SxYB1SvBqGBlT+JMsKP5Aa9vjAegTu6dmlKMXal Epgwz+OpU3NxUi8CxbRFzpElAkaZFow1kUW8sYssVwDr6NKRSDzl9j/F+fT7Cbe1lFuQ NYHQ==
- Arc-seal: i=4; a=rsa-sha256; t=1579295956; cv=pass; d=google.com; s=arc-20160816; b=pqMBd7kzCABk6PhIsebqNhC9dkvLSAfqU8nEJ9IaN/eUW/mEr0SxeBk+CyLxYrTC5S 9EJS2W+qduMqzPR3tOg1QtNBFjrXhdttrjSycHdLtDiNzICBvToAyMtSEb+d2xjlljUS tDxtbcd7q+VG0+2M8RCdJk92qsgWNv0BEGeVmntce6g3qGlQKcsdAKvoYdcD/Q0cfTUS 1wQ56hHFIOUgnMD29X+jhC/BzcuREuCZ1D7w0AWOKEw7rJ9p+kKt9hFVdUngPD7DLZjc yLKbCVHDdr+hYQZWkbFUniQ3xlU7d43bf3dOVw23ouKRnddOGmmst7u3Ef8jtaM4nkaA EdUg==
- Arc-seal: i=3; a=rsa-sha256; t=1579295954; cv=pass; d=google.com; s=arc-20160816; b=wBGcKf+J6Cy2Suh0RNPM+Wv2NJi60hp9W9OBWSWBsPXqTok2sIt4Ltx7I1eGKbFvN6 JdT8WwbFWmkj9gkWiELC0CrTjwRUM9n5Rv+0UOmxvLQVi+QfmEDxN25CEkuQRv/oGr3O Kqmz/AMKe8AsF5Fojz+lVupG3T7vmWD8qbfKPhBbg0TEO0np7IRjn5GJ6qCfrn/DKBUK 1xu8OJJJKTpOj4TZlSbpYiFwrP0ASLQR5UR3SB+y8zaWMEoUheD5oz3v8ZDnZu+fOe6b iA5c7eooso3PWUj7QgYlAUGngvNW2a54vR+DeEMx7z/L3S7oeGV87l+WKdc7xBvx7TbU uPtQ==
- Arc-seal: i=2; a=rsa-sha256; t=1579295947; cv=pass; d=google.com; s=arc-20160816; b=SPzJMN7GKENkXqtwPsTZBYYEDF9TbDZdjrl7Qy/8CzpqM9Aog/oO32zRMbcBNR1ekO VBBt9tnqZvBQOVsMhroWnT/GSSDzfgl8012uSQSO9ePpWpq98c15EQWmCI29jozDX2ea jTzKuA5A3VI/UuHSBm/pHA/V6Y9VY0XrHlF9epB0fm6hkqo5hE+D/O3JvsDlnuLa/kEF ybP9TSKVJUNr/Qcu/gLpX8R9sJs2xstFrjiz/mIYlE5cNiABbhyeuDwb6t74hDQpYhRm USTJBVAHdHmJz8ekjj9G1JQVBwMURb/Ev0mXAmp+PLpzi0prZK9tmNs3xHtIPNqnQrCS 2hmw==
- Arc-seal: i=1; a=rsa-sha256; t=1579295946; cv=none; d=google.com; s=arc-20160816; b=w6xiKqnhev9tsuL7OzfS428wcriYeiSbGx0Vd29L8OWUmLpaezNtkzFZdDgYaqQxKg 6ZrsFQwn9bZHx2H9mGw/pLJ0RhjwWuPogm8wApl18rzVaft/a7+sFE5Gq6TCwuplus1i NlgAk5AZlIrmv3WbCx8dJX5sd4wmlZcLaFMC7+Q19us/glpr4wYBrSBH3u2xx/Af4/Tg SmWRi4BwW2YFIe56GPvDJo5jUTy7XFQ6juQFx1H1T0fzqjb1aXj0fcKvJPlMKAiSyUeN RDWO6uOU7If85vhV7co9KU8Mp8jVfyjKfE/zN0iLTaTeV50FMDIP9IFAq53v8nJWTX3z tY5Q==
- Cc: Roland Schweitzer - NOAA Affiliate <roland.schweitzer@xxxxxxxx>
- Dkim-signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=noaa.gov; s=google; h=sender:to:cc:from:subject:organization:date:user-agent:mime-version :content-language:message-id:x-original-sender :x-original-authentication-results:precedence:mailing-list:list-id :list-post:list-help:list-archive; bh=xn93dAYf73ZxQ4dZWBXu+kcW7Uw/YnxT14mrlg9f4Eg=; b=oagVozmLjjquy0fB0BrRHZiwqGwLVKKw4jMfNg1ipN8HIumletYKmFPxfS0Z0f4LYb Db6isB5y4EdKTZPbo/MJG5z7TF0uYvg2llmseZ1/lkAghdHMEi3F1pkR1r68oTLZ/yQA yeZftuGkggocKRUEHDjKwcRLVjysOywEvBw9UKOMU+AFjalVwn6vKTKvutaQd8I3cODD SJK2edk53yvNxKWbvMEC2twFWYywl6xoHmHfFo7G/LeUZnhIWqiFnF5y1Y4q+K69H+7k qKjRpA6eh0Gnv7MKfSDlnwKuJ72Z4QSJTzSS6EcpTpxd8SYwJ0gtIR1qgH6SxksLwAlA 38ng==
- List-archive: <https://groups.google.com/a/noaa.gov/group/las_users/>
- List-help: <https://support.google.com/a/noaa.gov/bin/topic.py?topic=25838>, <mailto:las_users+help@noaa.gov>
- List-id: <las_users.noaa.gov>
- List-post: <https://groups.google.com/a/noaa.gov/group/las_users/post>, <mailto:las_users@noaa.gov>
- Mailing-list: list las_users@xxxxxxxx; contact las_users+owners@xxxxxxxx
- Organization: SSAI
- Sender: owner-las_users@xxxxxxxx
- User-agent: Mozilla/5.0 (Windows NT 10.0; WOW64; rv:68.0) Gecko/20100101 Thunderbird/68.4.1
Hi Roland,
We are currently using LAS version 8.6.8 and discovering that
downloading CSV files for some data sets is generating a ERROR.
We can download ASCII & NetCDF fine, its just the CSV download.
We see this error:
*** NOTE: Axis has repeated values -- micro-adjusting time
**ERROR: invalid command: illegal new name. Variable analysed_sst_in exists in dataset
SET VAR/NAME=analysed_sst_in analysed_sst
Command file, command group, or REPEAT execution aborted
ERROR RUNNING SCRIPT
go "$1"
!-> go "/usr/local/tomcat/content/EarthSystemLAS/conf/server/scripts/temp/ferret_operation_697948_1579295162447.jnl"
....
Any idea what we need to adjust to fix the CSV downloads?
Thanks --Bryan
P.S. Attached the debug file just in case it helps.
*** NOTE: Axis has repeated values -- micro-adjusting time
**ERROR: invalid command: illegal new name. Variable analysed_sst_in exists in dataset
SET VAR/NAME=analysed_sst_in analysed_sst
Command file, command group, or REPEAT execution aborted
ERROR RUNNING SCRIPT
go "$1"
!-> go "/usr/local/tomcat/content/EarthSystemLAS/conf/server/scripts/temp/ferret_operation_697948_1579295162447.jnl"
! Symbols from the server
DEFINE SYMBOL data_0_ID = analysed_sst-id-afc9d5b299
DEFINE SYMBOL data_0_catid = hydro
DEFINE SYMBOL data_0_dataset_ID = hydro
DEFINE SYMBOL data_0_dataset_name = Hydrosphere
DEFINE SYMBOL data_0_dataset_url = https://mynasadata.larc.nasa.gov/thredds/dodsC/EarthSystemLAS/hydro/data_https___mynasadata.larc.nasa.gov_thredds_dodsC_ghrsst_sst_agg_sst_k_to_c_analysed_sst.jnl
DEFINE SYMBOL data_0_dsid = hydro
DEFINE SYMBOL data_0_dsname = Hydrosphere
DEFINE SYMBOL data_0_ftds_url = https://mynasadata.larc.nasa.gov/thredds/dodsC/EarthSystemLAS/hydro/data_https___mynasadata.larc.nasa.gov_thredds_dodsC_ghrsst_sst_agg_sst_k_to_c_analysed_sst.jnl
DEFINE SYMBOL data_0_grid_type = regular
DEFINE SYMBOL data_0_intervals = xyt
DEFINE SYMBOL data_0_name = Daily Sea Surface Temperature
DEFINE SYMBOL data_0_points = xyt
DEFINE SYMBOL data_0_region = region_0
DEFINE SYMBOL data_0_title = Daily Sea Surface Temperature
DEFINE SYMBOL data_0_units = Celsius
DEFINE SYMBOL data_0_url = https://mynasadata.larc.nasa.gov/thredds/dodsC/ghrsst_sst_agg
DEFINE SYMBOL data_0_var = analysed_sst
DEFINE SYMBOL data_0_xpath = /lasdata/datasets/hydro/variables/analysed_sst-id-afc9d5b299
DEFINE SYMBOL data_count = 1
DEFINE SYMBOL ferret_annotations = file
DEFINE SYMBOL ferret_data_format = csv
DEFINE SYMBOL ferret_fill_levels = (-2,36,1)
DEFINE SYMBOL ferret_fill_type = fill
DEFINE SYMBOL ferret_image_format = gif
DEFINE SYMBOL ferret_init_script = sst_k_to_c
DEFINE SYMBOL ferret_land_type = contour
DEFINE SYMBOL ferret_palette = light_centered
DEFINE SYMBOL ferret_service_action = Data_Extract_File
DEFINE SYMBOL ferret_size = .8333
DEFINE SYMBOL ferret_view = xyt
DEFINE SYMBOL las_debug = false
DEFINE SYMBOL las_output_type = html
DEFINE SYMBOL operation_ID = Data_Extract_File
DEFINE SYMBOL operation_key = 9340A88EFC8738B38244961AE1DD8709
DEFINE SYMBOL operation_name = ASCII file
DEFINE SYMBOL operation_service = ferret
DEFINE SYMBOL operation_service_action = Data_Extract_File
DEFINE SYMBOL product_server_clean_age = 168
DEFINE SYMBOL product_server_clean_interval = 24
DEFINE SYMBOL product_server_clean_time = 00:01
DEFINE SYMBOL product_server_clean_units = hour
DEFINE SYMBOL product_server_default_catid = 05152E13A3BD306F36B7C615036E0ADC
DEFINE SYMBOL product_server_default_dsid = surface_cover
DEFINE SYMBOL product_server_default_option = Options_2D_image_contour_xy_7
DEFINE SYMBOL product_server_default_varid = SCENE_TYPE-id-5a5ba6b6a6
DEFINE SYMBOL product_server_default_view = xy
DEFINE SYMBOL product_server_ps_timeout = 3600
DEFINE SYMBOL product_server_ui_timeout = 20
DEFINE SYMBOL product_server_use_cache = false
DEFINE SYMBOL product_server_version = 8.4
DEFINE SYMBOL region_0_t_hi = 17-Apr-2018 00:00
DEFINE SYMBOL region_0_t_lo = 01-Jan-2018 00:00
DEFINE SYMBOL region_0_x_hi = 0.0024999999999977
DEFINE SYMBOL region_0_x_lo = 0.0024999999999977
DEFINE SYMBOL region_0_y_hi = 0
DEFINE SYMBOL region_0_y_lo = 0
DEFINE SYMBOL result_annotations_ID = annotations
DEFINE SYMBOL result_annotations_filename = /usr/local/tomcat/webapps/EarthSystemLAS/output/9340A88EFC8738B38244961AE1DD8709_annotations.xml
DEFINE SYMBOL result_annotations_type = annotations
DEFINE SYMBOL result_cancel_ID = cancel
DEFINE SYMBOL result_cancel_filename = /usr/local/tomcat/webapps/EarthSystemLAS/output/9340A88EFC8738B38244961AE1DD8709_cancel.txt
DEFINE SYMBOL result_cancel_type = cancel
DEFINE SYMBOL result_count = 5
DEFINE SYMBOL result_debug_ID = debug
DEFINE SYMBOL result_debug_filename = /usr/local/tomcat/webapps/EarthSystemLAS/output/9340A88EFC8738B38244961AE1DD8709_debug.txt
DEFINE SYMBOL result_debug_type = debug
DEFINE SYMBOL result_ferret_listing_ID = ferret_listing
DEFINE SYMBOL result_ferret_listing_filename = /usr/local/tomcat/webapps/EarthSystemLAS/output/9340A88EFC8738B38244961AE1DD8709_ferret_listing.txt
DEFINE SYMBOL result_ferret_listing_type = ascii
DEFINE SYMBOL result_rss_ID = rss
DEFINE SYMBOL result_rss_filename = /usr/local/tomcat/webapps/EarthSystemLAS/output/C00F0037941FB160180824C843966C7C_rss.rss
DEFINE SYMBOL result_rss_type = rss
GO ($operation_service_action)
!-> GO Data_Extract_File
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
! $Author: rhs $
!
! Extracting to a netCDF file and some text and table files have different
! options in the UI. Need to separate them at this level to keep the UI
! happy. All the Data_Extract* scripts launch the same list_data.jnl script.
!
! The format symbol is called data_format in the options file. Don't know why. Rather than mess
! with figuring out if it affects the old ui, just assign it here. The data_format will be one of
! one of "tsv" "csv" "asc".
IF ($ferret_data_format_format"0|*>1") THEN DEFINE SYMBOL ferret_data_format = ($ferret_data_format_format)
!-> IF 0 THEN DEFINE SYMBOL ferret_data_format =
DEFINE SYMBOL ferret_format = asc
GO list_data
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
! $RCSfile: list_data.jnl,v $
! $Revision: 1.4 $
!
! $Author: ansley $
! $Date: 2006/07/06
!
! 2006/8/10 ACM define output variable with its region.
! 2007/3/13 ACM Set up to write netCDF files of curvilinear data
! 3/29/2007 ACM Fix logic interpreting contents of ferret_interpolate_data
! 8/ 9/2007 ACM Allow for multiple variables, appending each to the file
! until all are written.
! 12/2016 set list precision to 7
!
! list_data.jnl creates a listing, CDF or ASCII (based on std_list.jnl)
! Assumes symbol ferret_format which will be one of "cdf" "txt" "tsv" "csv" "asc"
! Assumes symbol ferret_listing is the output file.
! Assumes symbol data_dup_varname is the optional duplicate variable name to be used on output
! Decode format argument
! ACM NOTE: The slashes mess up parsing in the DEFINE SYMBOL if we do them all at once.
! ferret_format may be asc, txt, or cdf
GO LAS_initial_setup 0
! LAS_initial_setup.jnl
!
! Handle initial setup. Write output to the debug file so that FshowGO can be used
! to see the tree of script calls. Reset the name .gif that plot information
! is written to initially until the FRAME command is issued.
!
! IF the job is not going to produce an image, send in argument of 0,
! then this will exit after doing the FshowGO setup.
!
! 10/4/2016 fixes so init scripts still work
SET MODE VERIFY:ALWAYS
! Put into the debug output what PyFerret/Ferret is running, and when.
SHOW SYMBOL ferret_version, ferret_platform, program_name, current_date
FERRET_VERSION = "7.43"
FERRET_PLATFORM = "Linux 3.10.0-862.11.6.el7.x86_64 64-bit"
CURRENT_DATE = "17-Jan-20"
PROGRAM_NAME = "Ferret"
DEFINE SYMBOL initialize_script_arg = ($1"2")
!-> DEFINE SYMBOL initialize_script_arg = 0
! Make sure to do the SET REDIRECT just once.
IF `($initial_setup_done"0|*>1") NE 0` THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
DEFINE SYMBOL initial_setup_done = 1
! Put the output into the log file so that FshowGO will list
! the tree of GO script calls.
SET REDIRECT/APPEND/TEE/file="($result_debug_filename)" STDOUT,STDERR
!-> SET REDIRECT/APPEND/TEE/file="/usr/local/tomcat/webapps/EarthSystemLAS/output/9340A88EFC8738B38244961AE1DD8709_debug.txt" STDOUT,STDERR
IF `($initialize_script_arg) EQ 0` THEN EXIT/SCRIPT
!-> IF 1 THEN EXIT/SCRIPT
!-> EXIT/SCRIPT
! Exit_GO
CANCEL SYMBOL frmt
DEFINE SYMBOL frmt ($frmt)/($ferret_format%format=cdf|txt>heading|cdf>format=cdf|asc>width=1024|%)
!-> DEFINE SYMBOL frmt /width=1024
IF ($ferret_format%0|asc>1|*>0) THEN
!-> IF 1 THEN
DEFINE SYMBOL frmt ($frmt)/format=(5G12.5)
!-> DEFINE SYMBOL frmt /width=1024/format=(5G12.5)
IF ($ferret_data_format"0|tsv>1|csv>1|asc>1|*>0") THEN
!-> IF 1 THEN
DEFINE SYMBOL frmt ($frmt) = ($frmt)/($ferret_data_format"|tsv>format=tab|csv>format=comma|asc>heading=enhanced")
!-> DEFINE SYMBOL frmt /width=1024/format=(5G12.5) = /width=1024/format=(5G12.5)/format=comma
SET LIST/PREC=7
ENDIF
ENDIF
CANCEL MODE INTERPOLATE ! important when evaluating the size limits
SET LIST/FILE="($result_ferret_listing_filename)"
!-> SET LIST/FILE="/usr/local/tomcat/webapps/EarthSystemLAS/output/9340A88EFC8738B38244961AE1DD8709_ferret_listing.txt"
IF ($ferret_data_format"0|csv>1|*>0") THEN
!-> IF 1 THEN
GO list_csv_data
! Enter_GO list_csv_data
DEFINE SYMBOL frmt = FORMAT=comma/NOROW
LET its_curvi = `( ($ferret_curvi_coord_lat"0|*>1) + STRINDEX("($ferret_view)", "xy") ) GT 1`
!-> DEFINE VARIABLE its_curvi = 0
IF ($constraint_($num)_lhs"0|Curv_to_Rect_Regridding>1|*>0") THEN LET its_curvi = 0
!-> IF 0 THEN LET its_curvi = 0
REPEAT/RANGE=0:`($data_count)-1`/NAME=outvar (GO list_csv_define_var `outvar` )
!-> REPEAT/RANGE=0:0/NAME=outvar (GO list_csv_define_var `outvar` )
!-> REPEAT: OUTVAR:0
!-> (GO list_csv_define_var `outvar` )
!-> GO list_csv_define_var 0
! Enter_GO list_csv_define_var 0
DEFINE SYMBOL var_num = $1
!-> DEFINE SYMBOL var_num = 0
GO LAS_initialize_region ($var_num)
!-> GO LAS_initialize_region 0
! Enter_GO LAS_initialize_region 0
DEFINE SYMBOL num ($1"0")
!-> DEFINE SYMBOL num 0
DEFINE SYMBOL region_name data_($num)_region
!-> DEFINE SYMBOL region_name data_0_region
DEFINE SYMBOL region ($($region_name)"region_0")
!-> DEFINE SYMBOL region region_0
DEFINE SYMBOL region region_($num)
!-> DEFINE SYMBOL region region_0
IF `($num) EQ 0 AND ($ferret_view"|xy>1|xyt>1|*>0") ` THEN
!-> IF 1 THEN
DEFINE SYMBOL region_x_range = `ABS( ($region_0_x_hi) - ($region_0_x_lo) )`
!-> DEFINE SYMBOL region_x_range = 0
DEFINE SYMBOL region_y_range = `($region_0_y_hi) - ($region_0_y_lo)`
!-> DEFINE SYMBOL region_y_range = 0
DEFINE SYMBOL win_aspect = 0
IF `($its_prop_prop_plot"0|*>1") EQ 0` THEN
!-> IF 1 THEN
DEFINE SYMBOL win_aspect = `($region_Y_range)/($region_X_range)`
!-> IF 0 THEN DEFINE SYMBOL win_aspect = `0/0`
ELSE
ENDIF
IF `($win_aspect"0|*>1") EQ 0` THEN DEFINE SYMBOL win_aspect = 1
!-> IF 0 THEN DEFINE SYMBOL win_aspect = 1
SET DATA "($data_0_url)"
!-> SET DATA "https://mynasadata.larc.nasa.gov/thredds/dodsC/ghrsst_sst_agg";
LET global_attnames = ..attnames
IF `IS_ELEMENT_OF_STR_N(global_attnames, "featureType") ` THEN
!-> IF 0 THEN
ELSE
IF `($win_aspect) LT 0.3` THEN DEFINE SYMBOL win_aspect = 0.3
!-> IF 1 THEN DEFINE SYMBOL win_aspect = 0.3
!-> DEFINE SYMBOL win_aspect = 0.3
IF `($win_aspect) GT 2.5` THEN DEFINE SYMBOL win_aspect = 2.5
!-> IF 0 THEN DEFINE SYMBOL win_aspect = 2.5
ENDIF
ENDIF ! end of adjusting xy aspect ratio
IF ($($region)_x_lo"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_x_lo = `INT(100000 * ($($region)_x_lo)) / 100000`
!-> DEFINE SYMBOL region_x_lo = 0.00249
DEFINE SYMBOL region_x_hi = `INT(100000 * ($($region)_x_hi)) / 100000`
!-> DEFINE SYMBOL region_x_hi = 0.00249
DEFINE SYMBOL limits_x = ($region_x_lo):($region_x_hi)
!-> DEFINE SYMBOL limits_x = 0.00249:0.00249
DEFINE SYMBOL limits_x_m360 = `($region_x_lo)-360`:`($region_x_hi)-360`
!-> DEFINE SYMBOL limits_x_m360 = -359.99751:-359.99751
DEFINE SYMBOL limits_x_p360 = `($region_x_lo)+360`:`($region_x_hi)+360`
!-> DEFINE SYMBOL limits_x_p360 = 360.00249:360.00249
DEFINE SYMBOL region_x = X=($region_x_lo):($region_x_hi)
!-> DEFINE SYMBOL region_x = X=0.00249:0.00249
DEFINE SYMBOL region_x_m360 X=`($region_x_lo)-360`:`($region_x_hi)-360`
!-> DEFINE SYMBOL region_x_m360 X=-359.99751:-359.99751
DEFINE SYMBOL region_x_p360 X=`($region_x_lo)+360`:`($region_x_hi)+360`
!-> DEFINE SYMBOL region_x_p360 X=360.00249:360.00249
IF `($region_x_hi) GE ($region_x_lo)` THEN
!-> IF 1 THEN
DEFINE SYMBOL region_x_range = `($region_x_hi) - ($region_x_lo)`
!-> DEFINE SYMBOL region_x_range = 0
ELSE
ENDIF
DEFINE SYMBOL region_small = X=($region_x_lo)
!-> DEFINE SYMBOL region_small = X=0.00249
DEFINE SYMBOL region_comma = ,
ENDIF
IF ($($region)_y_lo"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_y_lo = `INT(1000 * ($($region)_y_lo)) / 1000`
!-> DEFINE SYMBOL region_y_lo = 0
DEFINE SYMBOL region_y_hi = `INT(1000 * ($($region)_y_hi)) / 1000`
!-> DEFINE SYMBOL region_y_hi = 0
DEFINE SYMBOL limits_y = ($region_y_lo):($region_y_hi)
!-> DEFINE SYMBOL limits_y = 0:0
DEFINE SYMBOL region_y = Y=($region_y_lo):($region_y_hi)
!-> DEFINE SYMBOL region_y = Y=0:0
IF `($region_y_hi) GE ($region_y_lo)` THEN
!-> IF 1 THEN
DEFINE SYMBOL region_y_range = `($region_y_hi) - ($region_y_lo)`
!-> DEFINE SYMBOL region_y_range = 0
ELSE
ENDIF
DEFINE SYMBOL region_small = ($region_small)($region_comma)Y=($region_y_lo)
!-> DEFINE SYMBOL region_small = X=0.00249,Y=0
DEFINE SYMBOL region_comma = ,
ENDIF
IF ($($region)_z_lo"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($add_region_z"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($($region)_t_lo"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_t_lo = ($($region)_t_lo)
!-> DEFINE SYMBOL region_t_lo = 01-Jan-2018 00:00
DEFINE SYMBOL region_t_hi = ($($region)_t_hi)
!-> DEFINE SYMBOL region_t_hi = 17-Apr-2018 00:00
DEFINE SYMBOL limits_t \"($region_t_lo)\":\"($region_t_hi)\"
!-> DEFINE SYMBOL limits_t \"01-Jan-2018 00:00\":\"17-Apr-2018 00:00\"
DEFINE SYMBOL region_t T=\"($region_t_lo)\":\"($region_t_hi)\"
!-> DEFINE SYMBOL region_t T=\"01-Jan-2018 00:00\":\"17-Apr-2018 00:00\"
DEFINE SYMBOL region_small = ($region_small)($region_comma)T="($region_t_lo)"
!-> DEFINE SYMBOL region_small = X=0.00249,Y=0,T="01-Jan-2018 00:00"
DEFINE SYMBOL region_comma = ,
ENDIF
IF ($add_region_t"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($($region)_e_lo"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($add_region_e"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($region_x"0|*>1") THEN
!-> IF 1 THEN
IF ($region_y"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_xy = ($region_x),($region_y)
!-> DEFINE SYMBOL region_xy = X=0.00249:0.00249,Y=0:0
ELSE
ENDIF
ELSE
ENDIF
IF ($region_x"0|*>1") THEN
!-> IF 1 THEN
IF ($region_z"0|*>1") THEN
!-> IF 0 THEN
ELSE
DEFINE SYMBOL region_xz = ($region_x)
!-> DEFINE SYMBOL region_xz = X=0.00249:0.00249
ENDIF
ELSE
ENDIF
IF ($region_x"0|*>1") THEN
!-> IF 1 THEN
IF ($region_t"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_xt = ($region_x),($region_t)
!-> DEFINE SYMBOL region_xt = X=0.00249:0.00249,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
ELSE
ENDIF
ELSE
ENDIF
IF ($region_y"0|*>1") THEN
!-> IF 1 THEN
IF ($region_z"0|*>1") THEN
!-> IF 0 THEN
ELSE
DEFINE SYMBOL region_yz = ($region_y)
!-> DEFINE SYMBOL region_yz = Y=0:0
ENDIF
ELSE
ENDIF
IF ($region_y"0|*>1") THEN
!-> IF 1 THEN
IF ($region_t"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_yt = ($region_y),($region_t)
!-> DEFINE SYMBOL region_yt = Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
ELSE
ENDIF
ELSE
ENDIF
IF ($region_z"0|*>1") THEN
!-> IF 0 THEN
ELSE
IF ($region_t"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_zt = ($region_t)
!-> DEFINE SYMBOL region_zt = T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
ENDIF
ENDIF
IF ($region_xy"0|*>1") THEN
!-> IF 1 THEN
IF ($region_z"0|*>1") THEN
!-> IF 0 THEN
ELSE
DEFINE SYMBOL region_xyz = ($region_xy)
!-> DEFINE SYMBOL region_xyz = X=0.00249:0.00249,Y=0:0
ENDIF
ELSE
ENDIF
IF ($region_xy"0|*>1") THEN
!-> IF 1 THEN
IF ($region_t"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_xyt = ($region_xy),($region_t)
!-> DEFINE SYMBOL region_xyt = X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
ELSE
ENDIF
ELSE
ENDIF
IF ($region_xz"0|*>1") THEN
!-> IF 1 THEN
IF ($region_t"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_xzt = ($region_xz),($region_t)
!-> DEFINE SYMBOL region_xzt = X=0.00249:0.00249,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
ELSE
ENDIF
ELSE
ENDIF
IF ($region_yz"0|*>1") THEN
!-> IF 1 THEN
IF ($region_t"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_yzt = ($region_yz),($region_t)
!-> DEFINE SYMBOL region_yzt = Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
ELSE
ENDIF
ELSE
ENDIF
IF ($region_xyz"0|*>1") THEN
!-> IF 1 THEN
IF ($region_t"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_xyzt = ($region_xyz),($region_t)
!-> DEFINE SYMBOL region_xyzt = X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
ELSE
ENDIF
ELSE
ENDIF
IF ($region_xyzt"0|*>1") THEN
!-> IF 1 THEN
IF ($region_e"0|*>1") THEN
!-> IF 0 THEN
ELSE
DEFINE SYMBOL region_xyzte = ($region_xyzt)
!-> DEFINE SYMBOL region_xyzte = X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
ENDIF
ELSE
ENDIF
DEFINE SYMBOL region_full = ($region_xyzte)
!-> DEFINE SYMBOL region_full = X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
IF ($region_x"0|*>1") THEN DEFINE SYMBOL region_($num)_x = ($region_x)
!-> IF 1 THEN DEFINE SYMBOL region_0_x = X=0.00249:0.00249
!-> DEFINE SYMBOL region_0_x = X=0.00249:0.00249
IF ($region_y"0|*>1") THEN DEFINE SYMBOL region_($num)_y = ($region_y)
!-> IF 1 THEN DEFINE SYMBOL region_0_y = Y=0:0
!-> DEFINE SYMBOL region_0_y = Y=0:0
IF ($region_z"0|*>1") THEN DEFINE SYMBOL region_($num)_z = ($region_z)
!-> IF 0 THEN DEFINE SYMBOL region_0_z =
IF ($region_t"0|*>1") THEN DEFINE SYMBOL region_($num)_t = ($region_t)
!-> IF 1 THEN DEFINE SYMBOL region_0_t = T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
!-> DEFINE SYMBOL region_0_t = T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
IF ($region_xt"0|*>1") THEN DEFINE SYMBOL region_($num)_xt = ($region_xt)
!-> IF 1 THEN DEFINE SYMBOL region_0_xt = X=0.00249:0.00249,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
!-> DEFINE SYMBOL region_0_xt = X=0.00249:0.00249,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
IF ($region_xy"0|*>1") THEN DEFINE SYMBOL region_($num)_xy = ($region_xy)
!-> IF 1 THEN DEFINE SYMBOL region_0_xy = X=0.00249:0.00249,Y=0:0
!-> DEFINE SYMBOL region_0_xy = X=0.00249:0.00249,Y=0:0
IF ($region_xz"0|*>1") THEN DEFINE SYMBOL region_($num)_xz = ($region_xz)
!-> IF 1 THEN DEFINE SYMBOL region_0_xz = X=0.00249:0.00249
!-> DEFINE SYMBOL region_0_xz = X=0.00249:0.00249
IF ($region_yt"0|*>1") THEN DEFINE SYMBOL region_($num)_yt = ($region_yt)
!-> IF 1 THEN DEFINE SYMBOL region_0_yt = Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
!-> DEFINE SYMBOL region_0_yt = Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
IF ($region_yz"0|*>1") THEN DEFINE SYMBOL region_($num)_yz = ($region_yz)
!-> IF 1 THEN DEFINE SYMBOL region_0_yz = Y=0:0
!-> DEFINE SYMBOL region_0_yz = Y=0:0
IF ($region_zt"0|*>1") THEN DEFINE SYMBOL region_($num)_zt = ($region_zt)
!-> IF 1 THEN DEFINE SYMBOL region_0_zt = T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
!-> DEFINE SYMBOL region_0_zt = T="01-Jan-2018 00:00":"17-Apr-2018 00:00"
IF ($region_0_t_lo"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL t_lab_lo = ($region_0_t_lo)
!-> DEFINE SYMBOL t_lab_lo = 01-Jan-2018 00:00
LET iz = STRINDEX("($region_0_t_lo)", " 00:00:00")
!-> DEFINE VARIABLE iz = STRINDEX("01-Jan-2018 00:00", " 00:00:00")
IF `iz GT 0` THEN
!-> IF 0 THEN
ELSE
LET iz = STRINDEX("($region_0_t_lo)", ":00:00")
!-> DEFINE VARIABLE iz = STRINDEX("01-Jan-2018 00:00", ":00:00")
IF `iz GT 0` THEN DEFINE SYMBOL t_lab_lo = `SUBSTRING("($region_0_t_lo)", 1, iz-1)`
!-> IF 0 THEN DEFINE SYMBOL t_lab_lo = `SUBSTRING("01-Jan-2018 00:00", 1, iz-1)`
ENDIF
ENDIF
IF ($region_0_t_hi"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL t_lab_hi = ($region_0_t_hi)
!-> DEFINE SYMBOL t_lab_hi = 17-Apr-2018 00:00
LET iz = STRINDEX("($region_0_t_hi)", " 00:00:00")
!-> DEFINE VARIABLE iz = STRINDEX("17-Apr-2018 00:00", " 00:00:00")
IF `iz GT 0` THEN
!-> IF 0 THEN
ELSE
LET iz = STRINDEX("($region_0_t_hi)", ":00:00")
!-> DEFINE VARIABLE iz = STRINDEX("17-Apr-2018 00:00", ":00:00")
IF `iz GT 0` THEN DEFINE SYMBOL t_lab_hi = `SUBSTRING("($region_0_t_hi)", 1, iz-1)`
!-> IF 0 THEN DEFINE SYMBOL t_lab_hi = `SUBSTRING("17-Apr-2018 00:00", 1, iz-1)`
ENDIF
ENDIF
IF ($region_full"1|*>0") THEN
!-> IF 0 THEN
ENDIF
! Exit_GO
DEFINE SYMBOL data_($var_num)_var_orig ($data_($var_num)_var)
!-> DEFINE SYMBOL data_0_var_orig analysed_sst
GO LAS_initialize_data ($var_num)
!-> GO LAS_initialize_data 0
! Enter_GO LAS_initialize_data 0
IF `($ferret_start_memory"0") GT 0` THEN SET MEM/SIZ=($ferret_start_memory)
!-> IF 0 THEN SET MEM/SIZ=
DEFINE SYMBOL data_initialization_script LAS_initialize_data_std
!-> IF 1 THEN DEFINE SYMBOL data_initialization_script LAS_initialize_data_std
!-> DEFINE SYMBOL data_initialization_script LAS_initialize_data_std
GO ($data_initialization_script) ($1)
!-> GO LAS_initialize_data_std 0
! Enter_GO LAS_initialize_data_std 0
GO LAS_initialize_dataset ($1"0")
!-> GO LAS_initialize_dataset 0
! Enter_GO LAS_initialize_dataset 0
DEFINE SYMBOL num ($1"0")
!-> DEFINE SYMBOL num 0
IF ($data_($num)_chained"0|1|*>1) THEN
!-> IF 0 THEN
ELSE
DEFINE SYMBOL data_url \"($data_($num)_url)\"
!-> DEFINE SYMBOL data_url \"https://mynasadata.larc.nasa.gov/thredds/dodsC/ghrsst_sst_agg\";
ENDIF
SET DATA ($data_url)
!-> SET DATA "https://mynasadata.larc.nasa.gov/thredds/dodsC/ghrsst_sst_agg";
IF ($fer_last_error"0|0|1|*>1") THEN
!-> IF 0 THEN
ENDIF
IF `STRINDEX(($data_url), "jnl_expr_") GT 0` THEN
!-> IF 0 THEN
ENDIF
IF `($num) EQ 0 AND ($data_count) GT 1 and ($check_multi_regions_done"0|*>1) EQ 0` THEN
!-> IF 0 THEN
ENDIF
IF ($data_($num)_var"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL data_var ($data_($num)_var)
!-> DEFINE SYMBOL data_var analysed_sst
DEFINE SYMBOL data_orig_var ($data_($num)_var)
!-> DEFINE SYMBOL data_orig_var analysed_sst
DEFINE SYMBOL data_var_nq ($data_($num)_var)
!-> DEFINE SYMBOL data_var_nq analysed_sst
ENDIF
DEFINE SYMBOL data_name ($data_($num)_name)
!-> DEFINE SYMBOL data_name Daily Sea Surface Temperature
IF `($data_($num)_name"0|*>1") EQ 0` THEN DEFINE SYMBOL data_name ($data_var)
!-> IF 0 THEN DEFINE SYMBOL data_name analysed_sst
DEFINE SYM var_num ($num)
!-> DEFINE SYM var_num 0
IF ($data_($num)_var"0|*>1") THEN DEFINE SYMBOL data_var = `UPCASE("($data_var)")`
!-> IF 1 THEN DEFINE SYMBOL data_var = `UPCASE("analysed_sst")`
!-> DEFINE SYMBOL data_var = `UPCASE("analysed_sst")`
!-> DEFINE SYMBOL data_var = ANALYSED_SST
IF ($data_($num)_var"0|*>1") THEN DEFINE SYMBOL data_var_nq = `UPCASE("($data_var_nq)")`
!-> IF 1 THEN DEFINE SYMBOL data_var_nq = `UPCASE("analysed_sst")`
!-> DEFINE SYMBOL data_var_nq = `UPCASE("analysed_sst")`
!-> DEFINE SYMBOL data_var_nq = ANALYSED_SST
IF ($data_($num)_var_nq"0|*>1") THEN DEFINE SYMBOL data_var_nq = `UPCASE("($data_var_nq)")`
!-> IF 0 THEN DEFINE SYMBOL data_var_nq = `UPCASE("ANALYSED_SST")`
LET varlen = `STRLEN("($data_var)")`
!-> DEFINE VARIABLE varlen = 12
IF `STRINDEX("($data_var)", "'") EQ 1 AND STRRINDEX("($data_var)", "'") EQ varlen` THEN
!-> IF 0 THEN
ELSE
IF ($data_($num)_var"0|*>1") THEN DEFINE SYMBOL data_var_nq = ($data_var)
!-> IF 1 THEN DEFINE SYMBOL data_var_nq = ANALYSED_SST
!-> DEFINE SYMBOL data_var_nq = ANALYSED_SST
IF ($data_($num)_var"0|*>1") THEN DEFINE SYMBOL data_var = '($data_var)'
!-> IF 1 THEN DEFINE SYMBOL data_var = 'ANALYSED_SST'
!-> DEFINE SYMBOL data_var = 'ANALYSED_SST'
ENDIF
IF ($ferret_curvi_coord_lon"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($ferret_curvi_coord_lat"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($add_to_var($num)"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF `($data_($num)_units%1|"">1|*>0%) OR ($data_($num)_units%1|" ">1|*>0%)` THEN
!-> IF 0 THEN
ELIF ($data_($num)_units%1|" ">1|*>0%) THEN
!-> ELIF 0 THEN
ELSE
DEFINE SYMBOL data_units ($data_($num)_units)
!-> DEFINE SYMBOL data_units Celsius
ENDIF
GO LAS_unquote_string lhs data_($num)_units
!-> GO LAS_unquote_string lhs data_0_units
! Enter_GO LAS_unquote_string lhs data_0_units
IF `STRCMP("($($1)%AAA|*%)", "AAA") EQ 0` THEN EXIT/SCRIPT
!-> IF 1 THEN EXIT/SCRIPT
!-> EXIT/SCRIPT
! Exit_GO
IF ($data_units"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL data_units (($data_($num)_units))
!-> DEFINE SYMBOL data_units (Celsius)
DEFINE SYMBOL data_units ($data_($num)_units)
!-> IF 0 THEN DEFINE SYMBOL data_units Celsius
ENDIF
IF ($data_($num)_name"0|1|*>1) THEN
!-> IF 1 THEN
IF ($data_($num)_title"0|*>1") THEN DEFINE SYMBOL data_title ($data_($num)_title)
!-> IF 1 THEN DEFINE SYMBOL data_title Daily Sea Surface Temperature
!-> DEFINE SYMBOL data_title Daily Sea Surface Temperature
ELSE
ENDIF
GO LAS_unquote_string data_title
! Enter_GO LAS_unquote_string data_title
IF `STRCMP("($($1)%AAA|*%)", "AAA") EQ 0` THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
IF `STRINDEX("($($1))", "'") EQ 1` THEN
!-> IF 0 THEN
ENDIF
! Exit_GO
IF `($num) GT 0` THEN DEFINE SYMBOL variable_($num)_lab = ($data_title)
!-> IF 0 THEN DEFINE SYMBOL variable_0_lab = Daily Sea Surface Temperature
IF ($data_units"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL units_lab = ($data_units)
!-> DEFINE SYMBOL units_lab = (Celsius)
IF `($num) GT 0` THEN DEFINE SYMBOL units_($num)_lab = ($data_units)
!-> IF 0 THEN DEFINE SYMBOL units_0_lab = (Celsius)
ENDIF
DEFINE SYMBOL ferret_plot_title ($data_title) ($data_units)
!-> DEFINE SYMBOL ferret_plot_title Daily Sea Surface Temperature (Celsius)
SET DATA ($data_url)
!-> SET DATA "https://mynasadata.larc.nasa.gov/thredds/dodsC/ghrsst_sst_agg";
DEFINE SYMBOL ulen `STRLEN("(data_($num)_units)")`
!-> DEFINE SYMBOL ulen 14
IF `($ulen) LE 2` THEN
!-> IF 0 THEN
ENDIF
IF ($fer_last_error"0|0|1|*>1") THEN
!-> IF 0 THEN
ENDIF
SET DATA "($data_($num)_url)"
!-> SET DATA "https://mynasadata.larc.nasa.gov/thredds/dodsC/ghrsst_sst_agg";
DEFINE SYMBOL dset($num) = `($data_var),RETURN=dsetnum`
!-> DEFINE SYMBOL dset0 = 1
GO LAS_check_fer_properties
! Enter_GO LAS_check_fer_properties
IF ($ferret_dep_axis_scale"0|*>1") THEN
!-> IF 0 THEN
ENDIF ! Checks on ferret_dep_axis_scale
! Exit_GO
! Exit_GO
IF ($fer_last_error"0|0|1|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($error_status"0|ERROR>1|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($ferret_init_script"0|*>1") THEN GO ($ferret_init_script) ($dset($1"0"))
!-> IF 1 THEN GO sst_k_to_c 1
!-> GO sst_k_to_c 1
! Enter_GO sst_k_to_c 1
SET DATA ($data_url)
!-> SET DATA "https://mynasadata.larc.nasa.gov/thredds/dodsC/ghrsst_sst_agg";
set variable/name=analysed_sst_in analysed_sst
let/d=1/title="Daily Sea Surface Temperature - GHRSST"/units="Celsius" analysed_sst = analysed_sst_in - 273
DEFINE SYMBOL usedparam = "LASG ($CURRENT_DATE) ($CURRENT_TIME) ($data_0_name)"
!-> DEFINE SYMBOL usedparam = "LASG 17-Jan-20 16:06:02 Daily Sea Surface Temperature"
MESSAGE/QUIET/CONTINUE/OUTFILE="/usr/local/tomcat/webapps/EarthSystemLAS/output/MNDcount.txt"/APPEND ($usedparam)
!-> MESSAGE/QUIET/CONTINUE/OUTFILE="/usr/local/tomcat/webapps/EarthSystemLAS/output/MNDcount.txt"/APPEND "LASG 17-Jan-20 16:06:02 Daily Sea Surface Temperature"
! Exit_GO
IF ($ferret_init_commands"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF `($data_var"0|*>1") EQ 0` THEN DEFINE SYMBOL data_var = ($data_($num)_var)
!-> IF 0 THEN DEFINE SYMBOL data_var = analysed_sst
IF `($data_orig_var"0|*>1") EQ 0` THEN DEFINE SYMBOL data_orig_var = ($data_($num)_var)
!-> IF 0 THEN DEFINE SYMBOL data_orig_var = analysed_sst
GO LAS_initialize_variable
! Enter_GO LAS_initialize_variable
DEFINE SYMBOL data_num = `($data_var),RETURN=dsetnum`
!-> DEFINE SYMBOL data_num = 1
DEFINE SYMBOL data_($num)_num = `($data_var),RETURN=dsetnum`
!-> DEFINE SYMBOL data_0_num = 1
IF ($ferret_factor"0|*>1") THEN
!-> IF 0 THEN
ENDIF
LET attlist = ($data_($num)_var).attnames
!-> DEFINE VARIABLE attlist = analysed_sst.attnames
IF ($data_var_nq"0|*>1") THEN LET attlist = ($data_var_nq).attnames
!-> IF 1 THEN LET attlist = ANALYSED_SST.attnames
!-> LET attlist = ANALYSED_SST.attnames
DEFINE SYMBOL data_var_only = `UPCASE("($data_var)")`
!-> DEFINE SYMBOL data_var_only = 'ANALYSED_SST'
IF ($ferret_bad_flag"0|*>1") THEN SET VAR/BAD=($ferret_bad_flag) ($data_var)
!-> IF 0 THEN SET VAR/BAD= 'ANALYSED_SST'
IF ($ferret_timelab_res"0|*>1") THEN SET MODE CALENDAR:($ferret_timelab_res)
!-> IF 0 THEN SET MODE CALENDAR:
($ferret_curvi_coord_lon"0|*>1")` THEN
!-> IF 0 THEN
ENDIF
IF ($data_units"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL has_units = 1
ELSE
ENDIF
IF ($check_for_pseudonames"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF ($ferret_factor_label"0|*>1") THEN
!-> IF 0 THEN
ELIF ($ferret_factor"0|*>1") THEN
!-> ELIF 0 THEN
ENDIF
IF `($data_title"0|*>1") EQ 0` THEN
!-> IF 0 THEN
ENDIF
DEFINE SYMBOL ferret_plot_var = ($data_var)[d=($data_num),($region_full)]
!-> DEFINE SYMBOL ferret_plot_var = 'ANALYSED_SST'[d=1,X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"]
IF ($analysis_def"0|*>1") THEN ! analysis_def from curvi data or transform
!-> IF 0 THEN
ENDIF
DEFINE SYMBOL ferret_plot_var_noregion = ($data_var)[d=($data_num)]
!-> DEFINE SYMBOL ferret_plot_var_noregion = 'ANALYSED_SST'[d=1]
IF ($data_var_nq"0|*>1") THEN DEFINE SYMBOL ferret_plot_var_nq_noregion = ($data_var_nq)[d=($data_num)]
!-> IF 1 THEN DEFINE SYMBOL ferret_plot_var_nq_noregion = ANALYSED_SST[d=1]
!-> DEFINE SYMBOL ferret_plot_var_nq_noregion = ANALYSED_SST[d=1]
DEFINE SYMBOL ferret_plot_var_($num)_noregion = ($data_var)[d=($data_num)]
!-> DEFINE SYMBOL ferret_plot_var_0_noregion = 'ANALYSED_SST'[d=1]
DEFINE SYMBOL ferret_plot_var_($num)_small = ($data_var)[d=($data_num),($region_small)]
!-> DEFINE SYMBOL ferret_plot_var_0_small = 'ANALYSED_SST'[d=1,X=0.00249,Y=0,T="01-Jan-2018 00:00"]
DEFINE SYMBOL ferret_plot_base_var = ($ferret_plot_var)
!-> DEFINE SYMBOL ferret_plot_base_var = 'ANALYSED_SST'[d=1,X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"]
DEFINE SYMBOL ferret_plot_base_var_($num) = ($ferret_plot_var)
!-> DEFINE SYMBOL ferret_plot_base_var_0 = 'ANALYSED_SST'[d=1,X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"]
DEFINE SYMBOL ferret_plot_base_var_noregion = ($data_var)[d=($data_num)]
!-> DEFINE SYMBOL ferret_plot_base_var_noregion = 'ANALYSED_SST'[d=1]
DEFINE SYMBOL ferret_xyz_var = ($data_var)[d=($data_num),($region_xyz)]
!-> DEFINE SYMBOL ferret_xyz_var = 'ANALYSED_SST'[d=1,X=0.00249:0.00249,Y=0:0]
DEFINE SYMBOL ferret_t_var = ($data_var)[d=($data_num),($region_t)]
!-> DEFINE SYMBOL ferret_t_var = 'ANALYSED_SST'[d=1,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"]
DEFINE SYMBOL ferret_x_var = ($data_var)[d=($data_num),($region_x)]
!-> DEFINE SYMBOL ferret_x_var = 'ANALYSED_SST'[d=1,X=0.00249:0.00249]
IF `($region_x"0|*>1) EQ 0` THEN DEFINE SYMBOL ferret_x_var = ($data_var)[d=($data_num)]
!-> IF 0 THEN DEFINE SYMBOL ferret_x_var = 'ANALYSED_SST'[d=1]
GO LAS_transforms ($num)
!-> GO LAS_transforms 0
! Enter_GO LAS_transforms 0
DEFINE SYMBOL num ($1"0")
!-> DEFINE SYMBOL num 0
IF `($constraint_0_lhs"0|Seasonal_Regridding>1|*>0")` THEN
!-> IF 0 THEN
ENDIF
IF `STRINDEX("($constraint_0_lhs"0")", "Season_length") GT 0` THEN
!-> IF 0 THEN
ENDIF
DEFINE SYMBOL do_curvi_xy = 0
DEFINE SYMBOL do_hybrid_z = 0
DEFINE SYMBOL do_curvi_xy_and_hybrid_z = 0
GO LAS_get_coords_att
! Enter_GO LAS_get_coords_att
IF ($ferret_curvi_coord_lon"0|*>1") THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
IF ($ferret_curvi_coord_lat"0|*>1") THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
LET allvars = ..varnames
LET varatts = ($data_orig_var).attnames
!-> DEFINE VARIABLE varatts = analysed_sst.attnames
LET has_coord = IS_ELEMENT_OF_STR(varatts, "coordinates")
IF `has_coord EQ 0` THEN exit/script
!-> IF 1 THEN exit/script
!-> exit/script
! Exit_GO
IF ($ferret_curvi_coord_lat"0|*>1") THEN DEFINE SYMBOL do_curvi_xy = 1
!-> IF 0 THEN DEFINE SYMBOL do_curvi_xy = 1
IF ($ferret_curvi_coord_lat"0|*>1") THEN DEFINE SYMBOL native_curvilinear_xy = 1
!-> IF 0 THEN DEFINE SYMBOL native_curvilinear_xy = 1
IF ($ferret_thk_var"0|*>1") THEN DEFINE SYMBOL do_hybrid_z = 1
!-> IF 0 THEN DEFINE SYMBOL do_hybrid_z = 1
IF `($do_curvi_xy) + ($do_hybrid_z) EQ 2` THEN DEFINE SYMBOL do_curvi_xy_and_hybrid_z = 1
!-> IF 0 THEN DEFINE SYMBOL do_curvi_xy_and_hybrid_z = 1
IF ($do_curvi_xy_and_hybrid_z) THEN GO transform_hybrid_z_curvi_xy
!-> IF 0 THEN GO transform_hybrid_z_curvi_xy
GO transform_hybrid_z.jnl
!-> IF 0 THEN GO transform_hybrid_z.jnl
IF ($do_curvi_xy) THEN GO transform_curvi_xy.jnl
!-> IF 0 THEN GO transform_curvi_xy.jnl
! Exit_GO
IF ($data_0_analysis_label"0|*>1") THEN
!-> IF 0 THEN
ENDIF
IF `($num)+1 EQ ($data_count)` THEN GO LAS_set_strides.jnl
!-> IF 1 THEN GO LAS_set_strides.jnl
!-> GO LAS_set_strides.jnl
! Enter_GO LAS_set_strides.jnl
IF `($ferret_subsample_t"1|0|1|true>1|false>0|*>1") EQ 0 AND ($ferret_view"|t>1|T>1|*>0")` THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
(STRINDEX( "($result_ferret_listing_type)", "netcdf" ) NE 0)` THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
IF ($its_autolev_animate"0|*>1") THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
IF ($ferret_curvi_coord_lat"0|0|*>1") THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
IF ($do_hybrid_z"0|0|1|*>1") THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
IF ($its_prop_prop_plot"0|0|1|*>1") THEN
!-> IF 0 THEN
ENDIF
LET las_plotvar = ($ferret_plot_var)
!-> DEFINE VARIABLE las_plotvar = 'ANALYSED_SST'[d=1,X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"]
DEFINE SYMBOL memsize = ($FERRET_MEMORY"6.4")* 1.e6
!-> DEFINE SYMBOL memsize = 25.6* 1.e6
DEFINE SYMBOL no_native = 0
IF ($data_var_only"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL check_for_des = `($data_var_only)[d=($data_num)],RETURN=dsetpath`
!-> DEFINE SYMBOL check_for_des = https://mynasadata.larc.nasa.gov/thredds/dodsC/ghrsst_sst_agg
ELSE
ENDIF
IF `STRINDEX("($check_for_des)", ".des") GT 0 OR ($no_native_strides_xy"0|*>1")` THEN
!-> IF 0 THEN
ENDIF
DEFINE SYMBOL nvars = ($data_count)
!-> DEFINE SYMBOL nvars = 1
LET pvar = ($ferret_plot_var)
!-> DEFINE VARIABLE pvar = 'ANALYSED_SST'[d=1,X=0.00249:0.00249,Y=0:0,T="01-Jan-2018 00:00":"17-Apr-2018 00:00"]
DEFINE SYMBOL var_size = ($var_size"0") + `pvar,RETURN=size`
!-> DEFINE SYMBOL var_size = 0 + 101
IF `STRINDEX( "($operation_ID)", "Side" ) NE 0` THEN
!-> IF 0 THEN
ENDIF
IF `($num)+1 EQ ($nvars)` THEN
!-> IF 1 THEN
LET ndims = 0
LET xsiz = `pvar,RETURN=isize`
!-> DEFINE VARIABLE xsiz = 1
IF `xsiz GT 1` THEN LET ndims = `ndims + 1`
!-> IF 0 THEN LET ndims = `ndims + 1`
LET ysiz = `pvar,RETURN=jsize`
!-> DEFINE VARIABLE ysiz = 1
IF `ysiz GT 1` THEN LET ndims = `ndims + 1`
!-> IF 0 THEN LET ndims = `ndims + 1`
LET zsiz = `pvar,RETURN=ksize`
!-> DEFINE VARIABLE zsiz = 1
IF `zsiz GT 1` THEN LET ndims = `ndims + 1`
!-> IF 0 THEN LET ndims = `ndims + 1`
LET tsiz = `pvar,RETURN=lsize`
!-> DEFINE VARIABLE tsiz = 101
IF `tsiz GT 1` THEN LET ndims = `ndims + 1`
!-> IF 1 THEN LET ndims = `ndims + 1`
!-> LET ndims = `ndims + 1`
!-> DEFINE VARIABLE ndims = 1
LET varsiz = xsiz* ysiz* zsiz* tsiz
DEFINE SYMBOL stride_for_mem = `INT( 1+ varsiz/(.5*($memsize)) )`
!-> DEFINE SYMBOL stride_for_mem = 1
IF `ndims EQ 2` THEN DEFINE SYMBOL stride_for_mem = `INT(($stride_for_mem)^0.5)`
!-> IF 0 THEN DEFINE SYMBOL stride_for_mem = `INT(1^0.5)`
IF `ndims EQ 3` THEN DEFINE SYMBOL stride_for_mem = `INT(($stride_for_mem)^0.33)`
!-> IF 0 THEN DEFINE SYMBOL stride_for_mem = `INT(1^0.33)`
IF `ndims EQ 4` THEN DEFINE SYMBOL stride_for_mem = `INT(($stride_for_mem)^0.25)`
!-> IF 0 THEN DEFINE SYMBOL stride_for_mem = `INT(1^0.25)`
ENDIF
IF `STRINDEX( "($operation_ID)", "Grid_for_GE" ) NE 0` THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
STRINDEX( "($operation_ID)", "Grid_for_GE" ) EQ 0` THEN
!-> IF 1 THEN
GO LAS_set_strides_for_mem
! Enter_GO LAS_set_strides_for_mem
IF `($stride_for_mem"0") GT 1` THEN
!-> IF 0 THEN
ENDIF
! Exit_GO
EXIT/SCRIPT
! Exit_GO
IF `($no_native_strides_xy"0|*>1") AND ($set_ndx_strides"0|*>1") EQ 0` THEN
!-> IF 0 THEN
ENDIF
GO LAS_initialize_var_levels
! Enter_GO LAS_initialize_var_levels
IF ($ferret_fill_levels"0|*>1") THEN
!-> IF 1 THEN
IF ($ferret_contour_levels"0|*>1") THEN CANCEL SYMBOL ferret_contour_levels
!-> IF 0 THEN CANCEL SYMBOL ferret_contour_levels
ELSE
ENDIF
IF `($data_num) EQ 1` THEN
!-> IF 1 THEN
IF ($ferret_fill_levels"0|*>1") THEN DEFINE SYMBOL input_fill_levels = 1
!-> IF 1 THEN DEFINE SYMBOL input_fill_levels = 1
!-> DEFINE SYMBOL input_fill_levels = 1
IF `STRLEN("($ferret_view)") GE 2` THEN
!-> IF 1 THEN
LET do_levels = `(STRINDEX("($operation_ID)", "Plot") GT 0) OR (STRINDEX("($operation_ID)", "zoom") GT 0) OR (STRINDEX("($operation_ID)", "poly") GT 0)`
!-> DEFINE VARIABLE do_levels = 0
IF `do_levels` THEN GO LAS_auto_levels
!-> IF 0 THEN GO LAS_auto_levels
ENDIF
ENDIF
! Exit_GO
! Exit_GO
DEFINE SYMBOL variable_($1"0")_lab = ($data_title) ($data_units)
!-> DEFINE SYMBOL variable_0_lab = Daily Sea Surface Temperature (Celsius)
IF `STRINDEX("($variable_($1"0")_lab)", "e=") GT 0` THEN
!-> IF 0 THEN
ENDIF
IF `($its_prop_prop_plot"0|*>1") EQ 0` THEN
!-> IF 1 THEN
IF ($variable_lab"0|*>1") THEN
!-> IF 0 THEN
ELSE
DEFINE SYMBOL variable_lab = ($data_title) ($data_units)
!-> DEFINE SYMBOL variable_lab = Daily Sea Surface Temperature (Celsius)
ENDIF
ENDIF
IF `($its_prop_prop_plot"0|*>1")` THEN DEFINE SYMBOL variable_lab = ($data_title) ($data_units)
!-> IF 0 THEN DEFINE SYMBOL variable_lab = Daily Sea Surface Temperature (Celsius)
($itsa_vector_plot"0|*>1") EQ 0` THEN DEFINE SYMBOL qualifiers = ($qualifiers)/KEY=CONT
!-> IF 1 THEN DEFINE SYMBOL qualifiers = /KEY=CONT
!-> DEFINE SYMBOL qualifiers = /KEY=CONT
IF ($ferret_expression"0|*>1") THEN GO LAS_expression
!-> IF 0 THEN GO LAS_expression
! Exit_GO
GO LAS_unquote_string data_title
! Enter_GO LAS_unquote_string data_title
IF `STRCMP("($($1)%AAA|*%)", "AAA") EQ 0` THEN EXIT/SCRIPT
!-> IF 0 THEN EXIT/SCRIPT
IF `STRINDEX("($($1))", "'") EQ 1` THEN
!-> IF 0 THEN
ENDIF
! Exit_GO
IF `($ferret_memory"25.6") LT 100` THEN SET MEM/SIZ=300
!-> IF 1 THEN SET MEM/SIZ=300
!-> SET MEM/SIZ=300
GO LAS_note_from_property
! Enter_GO LAS_note_from_property
IF ($ferret_add_a_note"0|*>1") THEN
!-> IF 0 THEN
ENDIF
! Exit_GO
! Exit_GO
LET varnames = ..varnames
IF `IS_ELEMENT_OF_STR_N(varnames, "($data_($var_num)_var)") NE 0` THEN
!-> IF 1 THEN
SET VAR/NAME=($data_($var_num)_var)_in ($data_($var_num)_var)
!-> SET VAR/NAME=analysed_sst_in analysed_sst
! Exit_GO
! Exit_GO
! Exit_GO
! Exit_GO
! Exit_GO
! Exit_GO
[Thread Prev][Thread Next][Index]
Contact Us
Dept of Commerce /
NOAA /
OAR /
PMEL /
TMAP
Privacy Policy | Disclaimer | Accessibility Statement