-
Ingrid:
-
HTMLwords
-
HTMLwords
-
{ firsttime? { (<ul><li>
) print mycaseexeconeach (</ul>
) print } { incrementcurrentdatasetcount currentdatasetcount 1 ne { (<li>) print } if subdatasetcount dup 1 eq { pop dup /long_name known { long_name } { cleanname } ifelse htmlformulaprint ( ) print dup /dataset_documentation.html known 1 index /dataset_documentation known or { ([<a href=") print dup datasetdocurl (">documentation</a>]
) print } if greeninfo mycaseexeconeach } { 0 eq { (<a href="/) print dup dataseturl (/") print datasetonMouseOver (>) print dup /long_name known { long_name } { cleanname } ifelse htmlformulaprint (</a>
) print dup /dataset_documentation.html known 1 index /dataset_documentation known or { ([<a href=") print dup datasetdocurl (">documentation</a>]
) print } if (
) print pop } { (<a href="/) print dup dataseturl (/") print datasetonMouseOver (>) print dup /long_name known { long_name } { cleanname } ifelse htmlformulaprint (</a>
) print dup /dataset_documentation.html known { ([<a href="/) print dup dataseturl (/dataset_documentation.html">documentation</a>]
) print } if dup /dataset_documentation known { ([<a href="/) print dup dataseturl (/dataset_documentation">documentation</a>]
) print } if greeninfo (<ul><li>
) print mycaseexeconeach (</ul>
) print } ifelse } ifelse } ifelse }
-
{ incrementcurrentdatasetcount currentdatasetcount 1 ne { (<li>) print } if (<a href="/) print dup dataseturl (/") print datasetonMouseOver (>) print dup /long_name known { long_name } { name cvntos } ifelse htmlformulaprint (</a>) print dup /units known { units cvntos == } if dup /dataset_documentation.html known { (<a href="/) print dup dataseturl (/dataset_documentation.html" onMouseOver="self.status='documentation for ) print longname print (';return true">*</a>
) print } if dup /dataset_documentation known { (<a href="/) print dup dataseturl (/dataset_documentation" onMouseOver="self.status='documentation for ) print longname print (';return true">*</a>
) print } if nptgrids dup length 0 gt { ( [ ) print { long_nameorname print ( ) print pop } forall (]) print } { pop } ifelse (
) print dup /dcatS known { } if pop }
|