TITLE Geometry Library Subroutine Module

INCLUDE GEROMID.H
INCLUDE GEEXTDEC.H

*****************************************************************
* The main module contains the subroutines for the user words.
* Each routine is named with a NULLNAME compiler directive, and
* has a corresponding entry in the external declarations file.
*****************************************************************
NULLNAME GEtimesPI ( % --> %*PI )
* Multiplies real number by PI
::
  %PI %*
;
*****************************************************************