===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Doc/slope.sm1,v
retrieving revision 1.1
retrieving revision 1.3
diff -u -p -r1.1 -r1.3
--- OpenXM/src/kan96xx/Doc/slope.sm1	2000/11/01 01:57:55	1.1
+++ OpenXM/src/kan96xx/Doc/slope.sm1	2005/10/20 11:22:27	1.3
@@ -1,7 +1,12 @@
-% $OpenXM$
-(cohom.sm1) run (oxasir.sm1) run
+% $OpenXM: OpenXM/src/kan96xx/Doc/slope.sm1,v 1.2 2001/06/18 03:12:21 takayama Exp $
+(oxasir.sm1.loaded) boundp not {
+   [(parse) (oxasir.sm1)  pushfile] extension
+} { } ifelse
+(cohom.sm1.loaded) boundp not {
+   [(parse) (cohom.sm1)  pushfile] extension
+} { } ifelse
 $slope.sm1, computing the slopes of a D-ideal:  June 15, 2000$ message
-$                            (C) F.Castro-Jimenez, N.Takayama$ message
+$                            (C) N.Takayama, F.Castro-Jimenez$ message
 $Imported commands:  slope $ message
 /slope.verbose 1 def
 /gb.warning 0 def
@@ -748,3 +753,4 @@ $Imported commands:  slope $ message
 
 } def
 
+/slope.sm1.loaded 1 def
\ No newline at end of file