ING_DB

WEGA/contrib/ingres/dbs/tmp/f77/amxf

@@ -0,0 +1,65 @@
+.pl 66
+.ll 65
+.ns
+.po 5
+.nr in 5
+.de i0
+.in \n(in
+..
+.de lp
+.i0
+.if !\n(.V .ta \\$2+1
+.if \n(.V .ta \\$2
+.in \\$1
+.ti -\\$2
+..
+.de s1
+.sp 1
+.ne 4
+..
+.de s2
+.sp 1
+..
+.de fo
+'sp 2
+'tl ''- % -''
+'bp
+..
+.de th
+.de x1
+.rs
+'sp 4
+'tl '\\*(II/\\$3''\\$1(\\$2)'
+'sp 2
+\\..
+.wh -7 fo
+.wh 0 x1
+.pn 1
+'fi
+'ad
+.bp
+.in \n(in
+.dt
+..
+.de sh
+.i0
+.s1
+.ne 5
+.ti 0
+\\$1
+.br
+..
+.de dt
+.ta 8 16 24 32 40 48 56 64
+..
+.ds II ING_DB 6.3
+.ds UU UNIX
+.ds AA AMX
+.ds FF FORTRAN77
+.if !\n(.V .ds +- +-
+.if \n(.V .ds +- \(+-
+.ds ** *
+.ds - -
+.ds _ _
+.ds v |
+.hy 0