aboutsummaryrefslogtreecommitdiff
path: root/sys/gio/nspp/portlib/axes.f
diff options
context:
space:
mode:
Diffstat (limited to 'sys/gio/nspp/portlib/axes.f')
-rw-r--r--sys/gio/nspp/portlib/axes.f6
1 files changed, 6 insertions, 0 deletions
diff --git a/sys/gio/nspp/portlib/axes.f b/sys/gio/nspp/portlib/axes.f
new file mode 100644
index 00000000..badf7004
--- /dev/null
+++ b/sys/gio/nspp/portlib/axes.f
@@ -0,0 +1,6 @@
+ subroutine axes (x,y)
+ call getset (idummy,idummy,idummy,idummy,xc,xd,yc,yd,idummy)
+ call line (x,yc,x,yd)
+ call line (xc,y,xd,y)
+ return
+ end