[Thread Prev][Thread Next][Index]
[las_users] STOP -script mode, ERROR RUNNING SCRIPT **TMAP ERR: non-existent or not on line
- To: las_users@xxxxxxxx
- Subject: [las_users] STOP -script mode, ERROR RUNNING SCRIPT **TMAP ERR: non-existent or not on line
- From: aavilar@xxxxxx
- Date: Tue, 06 Jul 2010 16:19:53 -0500 (CDT)
- Importance: Normal
- Sender: owner-las_users@xxxxxxxx
- User-agent: SquirrelMail/1.4.8-5.el5_4.10
Dear LAS users,
I am using LAS v7.1 to display my dataset, however I am getting the
following error:
Server at Revision rNo version information available.
STOP -script mode, ERROR RUNNING SCRIPT
**TMAP ERR: non-existent or not on line
/home/Oleaje/Datos/netcdf/marino.cdf
SET DATA "/home/Oleaje/Datos/netcdf/marino.cdf"
Command file, command group, or REPEAT execution aborted
go "$1"
!-> go
"/usr/local/apache-tomcat-6.0.26/webapps/las/WEB-INF/classes/resources/ferret/temp/ferret_operation_1278438368253.jnl"
! Symbols from the server
DEFINE SYMBOL data_0_ID = v-id-d6a98d086f
DEFINE SYMBOL data_0_dataset_ID =
id-d6a98d086f
DEFINE SYMBOL data_0_dataset_name =
/home/Oleaje/Datos/netcdf/marino.cdf
DEFINE SYMBOL data_0_dataset_url =
/home/Oleaje/Datos/netcdf/marino.cdf
DEFINE SYMBOL data_0_grid_type = regular
DEFINE SYMBOL data_0_intervals = xyt
DEFINE SYMBOL data_0_name =
viento_meridional
DEFINE SYMBOL data_0_points = xyt
DEFINE SYMBOL data_0_region = region_0
DEFINE SYMBOL data_0_title =
viento_meridional
DEFINE SYMBOL data_0_units = meter/second
DEFINE SYMBOL data_0_url =
/home/Oleaje/Datos/netcdf/marino.cdf
DEFINE SYMBOL data_0_var = v
DEFINE SYMBOL data_0_xpath =
/lasdata/datasets/id-d6a98d086f/variables/v-id-d6a98d086f
DEFINE SYMBOL data_count = 1
DEFINE SYMBOL ferret_fill_type = fill
DEFINE SYMBOL ferret_interpolate_data =
false
DEFINE SYMBOL ferret_land_type = contour
DEFINE SYMBOL ferret_mark_grid = no
DEFINE SYMBOL ferret_service_action =
Plot_2D_XY
DEFINE SYMBOL ferret_size = 0.5
DEFINE SYMBOL ferret_view = xy
DEFINE SYMBOL las_debug = true
DEFINE SYMBOL operation_ID = Plot_2D_XY_zoom
DEFINE SYMBOL operation_key =
A1E1259E228991781B1E5AA5D0B8137A
DEFINE SYMBOL operation_name = Color plot
DEFINE SYMBOL operation_service = ferret
DEFINE SYMBOL operation_service_action =
Plot_2D_XY
DEFINE SYMBOL product_server_ps_timeout =
3600
DEFINE SYMBOL product_server_ui_timeout = 20
DEFINE SYMBOL product_server_use_cache =
false
DEFINE SYMBOL region_0_t_hi = 01-Jan-2005
00:00:00
DEFINE SYMBOL region_0_t_lo = 01-Jan-2005
00:00:00
DEFINE SYMBOL region_0_x_hi = 279.15
DEFINE SYMBOL region_0_x_lo = 262.15
DEFINE SYMBOL region_0_y_hi = 30.45
DEFINE SYMBOL region_0_y_lo = 18.05
DEFINE SYMBOL result_cancel_ID = cancel
DEFINE SYMBOL result_cancel_filename =
/usr/local/tomcat/webapps/las/output/A1E1259E228991781B1E5AA5D0B8137A_cancel.txt
DEFINE SYMBOL result_cancel_type = cancel
DEFINE SYMBOL result_count = 6
DEFINE SYMBOL result_debug_ID = debug
DEFINE SYMBOL result_debug_filename =
/usr/local/tomcat/webapps/las/output/A1E1259E228991781B1E5AA5D0B8137A_debug.txt
DEFINE SYMBOL result_debug_type = debug
DEFINE SYMBOL result_map_scale_ID =
map_scale
DEFINE SYMBOL result_map_scale_filename =
/usr/local/tomcat/webapps/las/output/A1E1259E228991781B1E5AA5D0B8137A_map_scale.xml
DEFINE SYMBOL result_map_scale_type =
map_scale
DEFINE SYMBOL result_plot_image_ID =
plot_image
DEFINE SYMBOL result_plot_image_filename
=
/usr/local/tomcat/webapps/las/output/A1E1259E228991781B1E5AA5D0B8137A_plot_image.gif
DEFINE SYMBOL result_plot_image_type = image
DEFINE SYMBOL result_ref_map_ID = ref_map
DEFINE SYMBOL result_ref_map_filename =
/usr/local/tomcat/webapps/las/output/A1E1259E228991781B1E5AA5D0B8137A_ref_map.gif
DEFINE SYMBOL result_ref_map_type = image
DEFINE SYMBOL result_rss_ID = rss
DEFINE SYMBOL result_rss_filename =
/usr/local/tomcat/webapps/las/output/0B3BBC3EF265640DAC8500400E0940CA_rss.rss
DEFINE SYMBOL result_rss_type = rss
GO ($operation_service_action)
!-> GO Plot_2D_XY
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
! $Author: rhs $
!
! Plot_2d_XY.jnl decides which script to call to make a 2D plot.
! In the "old" LAS UI a 2D plot has for XY has different options and other
! UI characteristics than other 2D plots so it needs its own script.
!
IF ($ferret_view"|xy>1|*>0") THEN
!-> IF 1 THEN
!! Make a plot in XY...
go xy_plot_2D
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
! $RCSfile: xy_plot_2D.jnl,v $
! $Revision: 1.12 $
!
! $Author: ansley $
! $Date: 2006/08/11 16:45:54 $
! 2006/07/19 Fix test of ($ferret_contour_levels"0|*>1")
! 3/7/2007: ACM. Put code to check that the region was not too small,
resulting
! in degenerate plot into LAS_initialize_data.jnl rather than in
the
! individual plot scripts.
! 3/29/2007 ACM Fix logic interpreting contents of ferret_interpolate_data
! 7/15/2007 ACM Add lines to remove labels when a degenerate 2D plot is made
! This happens when the region chosen is smaller than a grid
cell.
! 3/2008 ACM Use SHADE/TRIM for shade underlays of FILL plots (Ferret v6.1)
! 3/2008 ACM For native curvilinear plots use MODULO qualifier only on
SHADE plots
! XY_plot.jnl creates an XY plot for use with the Back End Server
! code that sits behind a Live Access Server (LAS).
!
! NOTE: This code handles overlays but not differencing.
!
! TODO: We should support user choice of the 'base layer' variable.
! TODO: From the Ferret script writers' perspective it would be nice
! TODO: if this were handled in the UI so that ($data_0_...) always
! TODO: referred to the base layer.
! Set any Ferret modes
!
! NOTE: Should we support any of the following Ferrt modes?
! NOTE: ASCII_FONT, CALENDAR, DEPTH_LABEL, LABELS, LATIT_LABEL, LONG_LABEL
IF ($ferret_interpolate_data%0|false>0|true>1|1|0|*>1%) THEN SET MODE
INTERPOLATE
!-> IF 0 THEN SET MODE INTERPOLATE
DEFINE SYMBOL fview = `UPCASE("($ferret_view)")`
!-> DEFINE SYMBOL fview = XY
! Define symbols associated with the regign and data and perform any
! initialization needed for this dataset.
!
! NOTE: Adding support for a 'base layer' variable would mean passing
! NOTE: some other argument. For now, though, we always use 'data_0'
! NOTE: for the base layer and region.
GO LAS_initialize_region 0
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
! $RCSfile: LAS_initialize_region.jnl,v $
! $Revision: 1.1 $
!
! $Author: ansley $
! $Date: 2006/07/06 17:54:11 $
!
! The LAS_initialize_region.jnl script defines the following symbols
! based on the region associated with data_#:
!
! region_~_lo/hi -- lo and hi points on a given axis
! region_~_range -- numeric range on a given axis
! region_~ -- domain in 'lo:hi' notation
! region_full -- synonym for 'region_xyzt'
!
! Incoming argument determines which region to use
! The default number is 0, and the default region is region_0.
! If we are making only a map, then there are no data_ symbols
! defined, so data_0_region is not set, but we can define region
! as region_0.
!
! ACM trac 267: Do not cancel any previously set limits or region symbols;
! The previous v6 UI as to how it worked in the old product server expects
! to inherit some or all region info from the first dataset for use by the
! second in comparisons etc. Keep this behavior.
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
! NOTE: Occasionally the LAS applet will send in a longitude or latitude
! NOTE: that looks like "24.400000000000002". Such long, numerically
! NOTE: irrelevant numbers can overflow Ferret's maximum symbol length.
! NOTE: Rounding longitudes and latitudes to the nearest .00001 seems
! NOTE: reasonable for all but the most detailed datasets.
! NOTE: 'region_x_m360' and 'region_x_p360' are used for those
visualizations
! NOTE: where Ferret doesn't auomatically deal with the modulo nature of
! NOTE: longitude and allow the script writer to deal with this manually.
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 = 262.15
DEFINE SYMBOL region_x_hi = `INT(100000 * ($($region)_x_hi)) / 100000`
!-> DEFINE SYMBOL region_x_hi = 279.15
DEFINE SYMBOL limits_x = ($region_x_lo):($region_x_hi)
!-> DEFINE SYMBOL limits_x = 262.15:279.15
DEFINE SYMBOL limits_x_m360 = `($region_x_lo)-360`:`($region_x_hi)-360`
!-> DEFINE SYMBOL limits_x_m360 = -97.85001:-80.85001
DEFINE SYMBOL limits_x_p360 = `($region_x_lo)+360`:`($region_x_hi)+360`
!-> DEFINE SYMBOL limits_x_p360 = 622.15:639.15
DEFINE SYMBOL region_x = X=($region_x_lo):($region_x_hi)
!-> DEFINE SYMBOL region_x = X=262.15:279.15
DEFINE SYMBOL region_x_m360 X=`($region_x_lo)-360`:`($region_x_hi)-360`
!-> DEFINE SYMBOL region_x_m360 X=-97.85001:-80.85001
DEFINE SYMBOL region_x_p360 X=`($region_x_lo)+360`:`($region_x_hi)+360`
!-> DEFINE SYMBOL region_x_p360 X=622.15:639.15
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 = 17
ELSE
ENDIF
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 = 18.05
DEFINE SYMBOL region_y_hi = `INT(1000 * ($($region)_y_hi)) / 1000`
!-> DEFINE SYMBOL region_y_hi = 30.45
DEFINE SYMBOL limits_y = ($region_y_lo):($region_y_hi)
!-> DEFINE SYMBOL limits_y = 18.05:30.45
DEFINE SYMBOL region_y = Y=($region_y_lo):($region_y_hi)
!-> DEFINE SYMBOL region_y = Y=18.05:30.45
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 = 12.4
ELSE
ENDIF
ENDIF
IF ($($region)_z_lo"0|*>1") THEN
!-> IF 0 THEN
ENDIF
ENDIF
! NOTE: Normally we use 'DEFINE SYMBOL ~ = ...'
! NOTE: For the time axis we use 'DEFINE SYMBOL ~ ...' because the Ferret
! NOTE: parser complains about unmatched quotes if we do it the other way.
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-2005 00:00:00
DEFINE SYMBOL region_t_hi = ($($region)_t_hi)
!-> DEFINE SYMBOL region_t_hi = 01-Jan-2005 00:00:00
DEFINE SYMBOL limits_t \"($region_t_lo)\":\"($region_t_hi)\"
!-> DEFINE SYMBOL limits_t \"01-Jan-2005 00:00:00\":\"01-Jan-2005 00:00:00\"
DEFINE SYMBOL region_t T=\"($region_t_lo)\":\"($region_t_hi)\"
!-> DEFINE SYMBOL region_t T=\"01-Jan-2005 00:00:00\":\"01-Jan-2005
00:00:00\"
ENDIF
! Now build up all possible multi-axis regions, being careful not to use
! commas when a region is missing
! region_xy
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=262.15:279.15,Y=18.05:30.45
ELSE
ENDIF
ELSE
ENDIF
ENDIF
! region_xz
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=262.15:279.15
ENDIF
ELSE
ENDIF
ENDIF
! region_xt
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=262.15:279.15,T="01-Jan-2005
00:00:00":"01-Jan-2005 00:00:00"
ELSE
ENDIF
ELSE
ENDIF
ENDIF
! region_yz
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=18.05:30.45
ENDIF
ELSE
ENDIF
ENDIF
! region_yt
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=18.05:30.45,T="01-Jan-2005
00:00:00":"01-Jan-2005 00:00:00"
ELSE
ENDIF
ELSE
ENDIF
ENDIF
! region_zt
IF ($region_z"0|*>1") THEN
!-> IF 0 THEN
ENDIF
ELSE
IF ($region_t"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL region_zt = ($region_t)
!-> DEFINE SYMBOL region_zt = T="01-Jan-2005 00:00:00":"01-Jan-2005
00:00:00"
ENDIF
ENDIF
! region_xyz
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=262.15:279.15,Y=18.05:30.45
ENDIF
ELSE
ENDIF
ENDIF
! region_xyt
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=262.15:279.15,Y=18.05:30.45,T="01-Jan-2005 00:00:00":"01-Jan-2005
00:00:00"
ELSE
ENDIF
ELSE
ENDIF
ENDIF
! region_yzt
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=18.05:30.45,T="01-Jan-2005
00:00:00":"01-Jan-2005 00:00:00"
ELSE
ENDIF
ELSE
ENDIF
ENDIF
! region_xyzt
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=262.15:279.15,Y=18.05:30.45,T="01-Jan-2005 00:00:00":"01-Jan-2005
00:00:00"
ELSE
ENDIF
ELSE
ENDIF
ENDIF
DEFINE SYMBOL region_full = ($region_xyzt)
!-> DEFINE SYMBOL region_full =
X=262.15:279.15,Y=18.05:30.45,T="01-Jan-2005 00:00:00":"01-Jan-2005
00:00:00"
! For sampling from a curvilinear variable, save the region definitions with
! the variable number.
IF ($region_x"0|*>1") THEN DEFINE SYMBOL region_($num)_x = ($region_x)
!-> IF 1 THEN DEFINE SYMBOL region_0_x = X=262.15:279.15
!-> DEFINE SYMBOL region_0_x = X=262.15:279.15
IF ($region_y"0|*>1") THEN DEFINE SYMBOL region_($num)_y = ($region_y)
!-> IF 1 THEN DEFINE SYMBOL region_0_y = Y=18.05:30.45
!-> DEFINE SYMBOL region_0_y = Y=18.05:30.45
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-2005
00:00:00":"01-Jan-2005 00:00:00"
!-> DEFINE SYMBOL region_0_t = T="01-Jan-2005 00:00:00":"01-Jan-2005
00:00:00"
IF ($region_xt"0|*>1") THEN DEFINE SYMBOL region_($num)_xt = ($region_xt)
!-> IF 1 THEN DEFINE SYMBOL region_0_xt = X=262.15:279.15,T="01-Jan-2005
00:00:00":"01-Jan-2005 00:00:00"
!-> DEFINE SYMBOL region_0_xt = X=262.15:279.15,T="01-Jan-2005
00:00:00":"01-Jan-2005 00:00:00"
IF ($region_xy"0|*>1") THEN DEFINE SYMBOL region_($num)_xy = ($region_xy)
!-> IF 1 THEN DEFINE SYMBOL region_0_xy = X=262.15:279.15,Y=18.05:30.45
!-> DEFINE SYMBOL region_0_xy = X=262.15:279.15,Y=18.05:30.45
IF ($region_xz"0|*>1") THEN DEFINE SYMBOL region_($num)_xz = ($region_xz)
!-> IF 1 THEN DEFINE SYMBOL region_0_xz = X=262.15:279.15
!-> DEFINE SYMBOL region_0_xz = X=262.15:279.15
IF ($region_yt"0|*>1") THEN DEFINE SYMBOL region_($num)_yt = ($region_yt)
!-> IF 1 THEN DEFINE SYMBOL region_0_yt = Y=18.05:30.45,T="01-Jan-2005
00:00:00":"01-Jan-2005 00:00:00"
!-> DEFINE SYMBOL region_0_yt = Y=18.05:30.45,T="01-Jan-2005
00:00:00":"01-Jan-2005 00:00:00"
IF ($region_yz"0|*>1") THEN DEFINE SYMBOL region_($num)_yz = ($region_yz)
!-> IF 1 THEN DEFINE SYMBOL region_0_yz = Y=18.05:30.45
!-> DEFINE SYMBOL region_0_yz = Y=18.05:30.45
IF ($region_zt"0|*>1") THEN DEFINE SYMBOL region_($num)_zt = ($region_zt)
!-> IF 1 THEN DEFINE SYMBOL region_0_zt = T="01-Jan-2005
00:00:00":"01-Jan-2005 00:00:00"
!-> DEFINE SYMBOL region_0_zt = T="01-Jan-2005 00:00:00":"01-Jan-2005
00:00:00"
! For SOCAT server labels, make time symbols w/o the trailing 00: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-2005 00:00:00
LET iz = STRINDEX("($region_0_t_lo)", " 00:00:00")
!-> DEFINE VARIABLE iz = STRINDEX("01-Jan-2005 00:00:00", " 00:00:00")
IF `iz GT 0` THEN
!-> IF 1 THEN
DEFINE SYMBOL t_lab_lo = `SUBSTRING("($region_0_t_lo)", 1, iz-1)`
!-> DEFINE SYMBOL t_lab_lo = 01-Jan-2005
ELSE
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 = 01-Jan-2005 00:00:00
LET iz = STRINDEX("($region_0_t_hi)", " 00:00:00")
!-> DEFINE VARIABLE iz = STRINDEX("01-Jan-2005 00:00:00", " 00:00:00")
IF `iz GT 0` THEN
!-> IF 1 THEN
DEFINE SYMBOL t_lab_hi = `SUBSTRING("($region_0_t_hi)", 1, iz-1)`
!-> DEFINE SYMBOL t_lab_hi = 01-Jan-2005
ELSE
ENDIF
ENDIF
! If no regions have been defined then we have an error.
IF ($region_full"1|*>0") THEN
!-> IF 0 THEN
ENDIF
! End of LAS_initialize_region.jnl
------------------------------------------------------
GO LAS_initialize_data 0
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
! $RCSfile: LAS_initialize_data.jnl,v $
! $Revision: 1.2 $
!
! $Author: ansley $
! $Date: 2007/29/2007
!
! The LAS_initialize_data.jnl script takes care of everything having to
! do with initializing a datset for later use.
!
! LAS_initialize_data.jnl takes an argument that specifies which data
! item [0|1|2|3|...] to create symbols for.
!
! 3/2007:
! split up previous version of LAS_initialize_data.jnl into two;
! initialize the dataset and define the plot (or output listing) variable.
! This allows the custom init scripts to call LAS_initialize_dataset, then
! issue commands for the customization, then call LAS_initialize_variable
!
! 8/2007:
! The custom init scripts now consist of only SET DATA and the custom
commands.
! This lets F-TDS run first and call the init script to create the data set
! that will be used by the Ferret product script. When F-TDS is done it will
! not send the symbol ferret_init_script to the product scripts so we will
just skip
! that step.
!
! 8/2007:
! Some of the custom init scripts previously contained commands like SET
MEMORY
! or SET MODE which are intended to be executed by the product script
These need
! to be separated from commands for fixing grids or regridding which are
executed
! prior to the product script being run by F-TDS. These commands are to be
specified
! in the dataset configuration as ferret_init_commands, whose the value is
a set
! of Ferret commands separated by semicolons.
!
GO LAS_initialize_dataset ($1"0")
!-> GO LAS_initialize_dataset 0
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
! $RCSfile: LAS_initialize_dataset.jnl
! This is the first part of LAS_initialize_data.jnl used for standard and
! customized init scripts
! $Author: ansley, jing
! $Date: 2007/29/2007
! 6/29/2007
! Allow for data_0_units or data_1_units etc to be defined a null string or a
! string containing a single space. If data_0_units is either undefined or is
! one of these blank strings, then use the attnames syntax to see if the
dataset
! variable has units defined, and if so define the data_units symbol from
that.
! The LAS_initialize_data.jnl script takes care of everything having to
! do with initializing a datset for later use.
!
! LAS_initialize_data.jnl takes an argument that specifies which data
! item [0|1|2|3|...] to create symbols for.
!ACM_note: if we use a loop in the plot routine, we are not
! limited to 9 data items
! DEFINE SYMBOL num ($1"0|0|1|2|3|4|5|6|7|8|9")
DEFINE SYMBOL num ($1"0")
!-> DEFINE SYMBOL num 0
! TODO: It would be nice if the java code removed this dependency upon
! TODO: whether an operation was 'chained' or not.
! Check whether the source data was part of a 'chained' operation.
!ACM note: How does this jibe with what I do below changing data_url to
data_num??
IF ($data_($num)_chained"0|1|*>1) THEN
!-> IF 0 THEN
ELSE
DEFINE SYMBOL data_url \"($data_($num)_url)\"
!-> DEFINE SYMBOL data_url \"/home/Oleaje/Datos/netcdf/marino.cdf\"
ENDIF
IF ($data_($num)_var"0|*>1") THEN DEFINE SYMBOL data_var ($data_($num)_var)
!-> IF 1 THEN DEFINE SYMBOL data_var v
!-> DEFINE SYMBOL data_var v
! Use the units passed in from the XML unless they are null;
! in that case try to get from the dataset
! Do not define data_units with an empty string
IF ($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 meter/second
ENDIF
IF ($data_units"0|*>1") THEN
!-> IF 1 THEN
DEFINE SYMBOL data_units (($data_($num)_units))
!-> DEFINE SYMBOL data_units (meter/second)
IF `STRINDEX("($data_units)", "((") GT 0` THEN \
DEFINE SYMBOL data_units ($data_($num)_units)
!-> IF 0 THEN DEFINE SYMBOL data_units meter/second
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 viento_meridional
!-> DEFINE SYMBOL data_title viento_meridional
ELSE
ENDIF
DEFINE SYMBOL ferret_plot_title "($data_title) ($data_units)"
!-> DEFINE SYMBOL ferret_plot_title "viento_meridional (meter/second)"
! TODO: Use new error features in Ferret to turn off STDERR and check
! TODO: for Ferret error symbols to see if the SET DATA command actually
worked.
! SET DATA and check for errors
SET DATA ($data_url)
!-> SET DATA "/home/Oleaje/Datos/netcdf/marino.cdf"
This is my dataset metadata
netcdf marino {
dimensions:
lon = 86 ;
lat = 63 ;
TIME = UNLIMITED ; // (8760 currently)
variables:
double lon(lon) ;
lon:units = "DEGREES_EAST" ;
lon:point_spacing = "even" ;
lon:axis = "X" ;
lon:modulo = 360. ;
double lat(lat) ;
lat:units = "DEGREES_NORTH" ;
lat:point_spacing = "even" ;
lat:axis = "Y" ;
double TIME(TIME) ;
TIME:units = "HOURS since 1901-01-15 00:00:00" ;
TIME:axis = "T" ;
TIME:time_origin = "15-JAN-1901" ;
float u(TIME, lat, lon) ;
u:missing_value = -99.f ;
u:_FillValue = -99.f ;
u:long_name = "viento_zonal" ;
u:history = "From marino.txt" ;
u:units = "meter/second" ;
float v(TIME, lat, lon) ;
v:missing_value = -99.f ;
v:_FillValue = -99.f ;
v:long_name = "viento_meridional" ;
v:history = "From marino.txt" ;
v:units = "meter/second" ;
// global attributes:
:history = "Thu Jul 1 11:12:15 2010: ncatted -a
long_name,v,o,c,viento_meridional marino.cdf\n",
"Thu Jul 1 11:11:52 2010: ncatted -a long_name,u,o,c,viento_zonal
marino.cdf\n",
"Tue Jun 1 16:28:15 2010: ncatted -a units,v,a,c,meter/second
marino.cdf\n",
"Tue Jun 1 16:26:50 2010: ncatted -a units,u,a,c,meter/second
marino.cdf\n",
"Tue Jun 1 16:24:31 2010: ncrename -v DIR,v marino.cdf\n",
"Tue Jun 1 16:23:49 2010: ncrename -v U10,u marino.cdf\n",
"Tue Jun 1 16:16:41 2010: ncrename -d LAT,lat -v LAT,lat marino.cdf\n",
"Tue Jun 1 16:15:22 2010: ncrename -d LON,lon -v LON,lon marino.cdf\n",
"FERRET V6.401 1-Jun-10" ;
:Conventions = "CF-1.0" ;
}
Any ideas?
Cheers
Arturo Avila
[Thread Prev][Thread Next][Index]
Contact Us
Dept of Commerce /
NOAA /
OAR /
PMEL /
TMAP
Privacy Policy | Disclaimer | Accessibility Statement