adding NCL language

2025-12-08 20:38:47 +00:00 · 2015-06-05 23:24:35 -07:00
parent 9afdcddfc9
commit 2d392581e2
31 changed files with 2190 additions and 2 deletions
--- a/samples/Text/01_top.ncl
+++ b/samples/Text/01_top.ncl
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<ncl id="topProperty" xmlns="http://www.ncl.org.br/NCL3.0/EDTVProfile">
+	<head>
+		
+		<regionBase>
+			<region height="50%" id="imageReg" top="50%"/>
+		</regionBase>
+		
+		<descriptorBase>
+			<descriptor id="imageDescriptor" region="imageReg"/>
+		</descriptorBase>
+		
+	</head>
+	<body>
+		<port component="image" id="entry"/>
+		<media descriptor="imageDescriptor" id="image" src="../resources/images/background.jpg"/> 
+	</body>
+</ncl>
--- a/samples/Text/LIDARLite.ncl
+++ b/samples/Text/LIDARLite.ncl
@@ -0,0 +1,34 @@
+G04 DipTrace 2.4.0.2*
+%INLIDARLite.ncl*%
+%MOIN*%
+%ADD11C,0.0394*%
+%FSLAX44Y44*%
+G04*
+G70*
+G90*
+G75*
+G01*
+%LNBoardOutline*%
+%LPD*%
+X0Y23622D2*
+D11*
+X27953D1*
+Y0D1*
+X0D1*
+Y23622D1*
+X591Y23110D2*
+X13819D1*
+X591Y591D2*
+Y11614D1*
+Y12087D2*
+Y23110D1*
+X14291D2*
+X27520D1*
+X591Y591D2*
+X13819D1*
+X14291D2*
+X27520D1*
+Y11614D1*
+Y12087D2*
+Y23110D1*
+M02*
--- a/samples/Text/Site.local.ncl
+++ b/samples/Text/Site.local.ncl
@@ -0,0 +1,22 @@
+#define YmakeRoot $(DESTDIR)@prefix@
+#define ManRoot $(DESTDIR)@mandir@
+#define LibRoot $(DESTDIR)@libdir@/ncarg
+#define SharePath $(DESTDIR)@datadir@
+
+#define BuildWithF90 TRUE
+#define IncSearch -I/usr/include/netcdf -I/usr/include/udunits2 -I/usr/include/freetype2 -I/usr/include/gdal
+#define LibSearch -L@libdir@/hdf
+
+#define BuildNetCDF4 1
+#define NetCDF4lib -lnetcdf
+#define BuildCAIRO 1
+#define CAIROlib -lcairo -lfreetype
+#define BuildGDAL 1
+#define GDALlib -lgdal
+#define BuildHDFEOS 0
+#define BuildHDFEOS5 0
+#define BuildTRIANGLE 0
+#define HDFlib -lmfhdf -ldf -ljpeg -lz
+#define HDF5lib -lhdf5_hl -lhdf5
+#define BuildUdunits 1
+#define UdUnitslib -ludunits2
--- a/samples/Text/main.ncl
+++ b/samples/Text/main.ncl
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+
+<!--
+2008 PUC-RIO/LABORATORIO TELEMIDIA,
+Some Rights Reserved.
+
+This program is free software; you can redistribute it and/or modify it under 
+the terms of the GNU General Public License version 2 as published by
+the Free Software Foundation.
+
+This program is distributed in the hope that it will be useful, but WITHOUT ANY 
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A 
+PARTICULAR PURPOSE.  See the GNU General Public License version 2 for more 
+details.
+
+You should have received a copy of the GNU General Public License version 2
+along with this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA
+-->
+
+<ncl id="teste" xmlns="http://www.ncl.org.br/NCL3.0/EDTVProfile"
+     xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+     xsi:schemaLocation="http://www.ncl.org.br/NCL3.0/EDTVProfile
+     http://www.ncl.org.br/NCL3.0/profiles/NCL30EDTV.xsd">
+
+<head>
+
+	<regionBase>
+		<region id="luaRegion" width="100%" height="100%"/>
+	</regionBase>
+
+	<descriptorBase>
+		<descriptor id="luaDesc" region="luaRegion" focusIndex="luaIdx"/>
+	</descriptorBase>  
+</head>
+
+<body>
+	<port id="init" component="lua"/>
+	<media type="application/x-ginga-settings" id="programSettings">
+		<property name="currentKeyMaster" value="luaIdx"/>
+	</media>
+
+	<media id="lua" descriptor="luaDesc" src="game.lua"/>
+</body>
+
+</ncl>
--- a/samples/Text/min-help.ncl
+++ b/samples/Text/min-help.ncl
@@ -0,0 +1,45 @@
+THE_URL:file://localhost/Users/hubery/Public/ucar/Document/Functions/Built-in/min.shtml
+THE_TITLE:min
+   NCL Home > Documentation > Functions > General applied math
+
+min
+
+   Computes the minimum value of a multi-dimensional array.
+
+Prototype
+
+        function min (
+                value  : numeric
+        )
+
+        return_val [1] :  numeric
+
+Arguments
+
+   value
+
+   An array of one or more numeric values of any dimension.
+
+Return value
+
+   Returns a scalar of the same type as value.
+
+Description
+
+   This function returns the minimum value for an array of any dimensionality. Missing values are ignored; a missing value
+   is returned only if all values are missing.
+
+See Also
+
+   max, minind, maxind, dim_min, dim_max, dim_min_n, dim_max_n
+
+Examples
+
+   Example 1
+
+  f = (/2.1, 3.2, 4.3, 5.4, 6.5, 7.6, 8.7, 9.8/)
+  min_f = min(f)
+  print(min_f)        ; Should be 2.1
+
+
+   Â©2015 UCAR | Privacy Policy | Terms of Use | Contact the Webmaster | Sponsored by NSF
--- a/samples/Text/receiver.ncl
+++ b/samples/Text/receiver.ncl
@@ -0,0 +1,21 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<ncl id="sender" xmlns="http://www.ncl.org.br/NCL3.0/EDTVProfile">
+	<head>
+		<regionBase>
+			<region id="rTV" width="100%" height="100%" zIndex="1"/>		
+		</regionBase>
+		
+		
+		<descriptorBase>
+			<descriptor id="dTV" region="rTV" />
+		</descriptorBase>
+	</head>
+	
+	<body>
+		
+		<port id="pLua" component="lua" />
+		
+		<media id="lua" descriptor="dTV" src="receiver.lua" />
+		
+	</body>
+</ncl>
--- a/samples/Text/rmMonAnnCycLLT-help.ncl
+++ b/samples/Text/rmMonAnnCycLLT-help.ncl
@@ -0,0 +1,40 @@
+THE_URL:file://localhost/Users/hubery/Public/ucar/Document/Functions/Contributed/rmMonAnnCycLLT.shtml
+THE_TITLE:rmMonAnnCycLLT
+   NCL Home > Documentation > Functions > Climatology
+
+rmMonAnnCycLLT
+
+   Removes the annual cycle from "monthly" data.
+
+Prototype
+
+load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"
+
+        function rmMonAnnCycLLT (
+                x [*][*][*] : numeric
+        )
+
+        return_val [dimsizes(x)] :  typeof(x)
+
+Arguments
+
+   x
+
+   A three-dimensional array of monthly values, dimensioned lat x lon x time. The time dimension must be a multiple of 12.
+
+Return value
+
+   The results are returned in an array of the same type and dimensionality as x. If the input data contains metadata, these
+   will be retained.
+
+Description
+
+   This function removes the annual cycle from month (number of months = 12) data and subtracts the long term means from
+   each month.
+
+See Also
+
+   rmMonAnnCycLLT, rmMonAnnCycTLL, rmMonAnnCycLLLT
+
+
+   Â©2015 UCAR | Privacy Policy | Terms of Use | Contact the Webmaster | Sponsored by NSF
--- a/samples/Text/zonalAve-help.ncl
+++ b/samples/Text/zonalAve-help.ncl
@@ -0,0 +1,35 @@
+THE_URL:file://localhost/Users/hubery/Public/ucar/Document/Functions/Contributed/zonalAve.shtml
+THE_TITLE:zonalAve
+   NCL Home > Documentation > Functions > General applied math
+
+zonalAve
+
+   Computes a zonal average of the input array.
+
+Prototype
+
+load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"
+
+        function zonalAve (
+                x  : numeric
+        )
+
+        return_val  :  typeof(x)
+
+Arguments
+
+   x
+
+   An array of any size and type.
+
+Return value
+
+   The results are returned in an array of the same type and one dimension smaller than x. Metadata are preserved.
+
+Description
+
+   This function computes a zonal average of the input array x. If the input array has a "long_name" or "short_name"
+   attribute, it will be updated.
+
+
+   Â©2015 UCAR | Privacy Policy | Terms of Use | Contact the Webmaster | Sponsored by NSF