source: TI07-MOLES/trunk/Vocabs/xquery/vocab_xquery_lib.xquery @ 2132

Subversion URL: http://proj.badc.rl.ac.uk/svn/ndg/TI07-MOLES/trunk/Vocabs/xquery/vocab_xquery_lib.xquery@2132
Revision 2132, 1.6 KB checked in by ko23, 13 years ago (diff)

Refactoring intermediate

Line 
1module namespace voclib='http://ndg.nerc.ac.uk/xquery/lib/vocab';
2(: Standard vocab stubs :)
3declare variable $voclib:unknown_vocab_id as xs:string {'http://vocab.ndg.nerc.ac.uk/null'};
4declare variable $voclib:bodc_parameter_discovery_vocab as xs:string {'http://vocab.ndg.nerc.ac.uk/P021'};
5declare variable $voclib:cf_standard_names as xs:string {'http://vocab.ndg.nerc.ac.uk/P071'};
6declare variable $voclib:gcmd_science_valids as xs:string {'http://gcmd.gsfc.nasa.gov/Resources/valids/gcmd_parameters.html'};
7(: declare variable $voclib:gcmd_science_valids as xs:string {'http://vocab.ndg.nerc.ac.uk/P041'};  :)
8
9declare variable $voclib:gcmd_project_valids as xs:string {'http://gcmd.gsfc.nasa.gov/Resources/valids/projects.html'};
10declare variable $voclib:gcmd_location_valids as xs:string {'http://gcmd.gsfc.nasa.gov/Resources/valids/locations.html'};
11declare variable $voclib:gcmd_paleotemporal_valids as xs:string {'http://gcmd.gsfc.nasa.gov/Resources/valids/paleotemporal.html'};
12declare variable $voclib:gcmd_iso_topic_list as xs:string {'http://gcmd.gsfc.nasa.gov/Resources/valids/iso_topic_list.html'};
13declare variable $voclib:iso_topic_list as xs:string {'http://vocab.ndg.nerc.ac.uk/P051'};
14declare variable $voclib:ndg_data_provider_vocab as xs:string {'http://vocab.ndg.nerc.ac.uk/N010'};
15
16declare function voclib:spot-vocab($vocab_root as xs:string, $vocab_uri as xs:string) as xs:boolean
17(: See if the vocab pointed if from the vocab pointed at by the vocab_root :)
18{
19if ($vocab_root = substring($vocab_uri, 1, string-length($vocab_root))) then 
20true()
21else
22false()
23} ;
Note: See TracBrowser for help on using the repository browser.