[BACK]Return to usage.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Kan

Diff for /OpenXM/src/kan96xx/Kan/usage.c between version 1.45 and 1.52

version 1.45, 2005/07/18 10:55:16 version 1.52, 2020/10/06 11:33:47
Line 1 
Line 1 
 /* $OpenXM: OpenXM/src/kan96xx/Kan/usage.c,v 1.44 2005/06/16 06:54:55 takayama Exp $ */  /* $OpenXM: OpenXM/src/kan96xx/Kan/usage.c,v 1.51 2018/09/07 00:09:32 takayama Exp $ */
 #include <stdio.h>  #include <stdio.h>
   #include <string.h>
 #include "datatype.h"  #include "datatype.h"
 #include "stackm.h"  #include "stackm.h"
 #include "extern.h"  #include "extern.h"
Line 145  void Kusage2(fp,s)
Line 146  void Kusage2(fp,s)
     fppp(fp,"  [(parse) string] extension result-integer \n");      fppp(fp,"  [(parse) string] extension result-integer \n");
     fppp(fp,"  [(chattr) num literal] extension result-object \n");      fppp(fp,"  [(chattr) num literal] extension result-object \n");
     fppp(fp,"  [(chattrs) num ] extension result-object \n");      fppp(fp,"  [(chattrs) num ] extension result-object \n");
       fppp(fp,"  [(date)] extension date-string \n");
     fppp(fp,"  [(defaultPolyRing) num ] extension result-object \n");      fppp(fp,"  [(defaultPolyRing) num ] extension result-object \n");
     fppp(fp,"  [(flush) ] extension null \n");      fppp(fp,"  [(flush) ] extension null \n");
     fppp(fp,"  [(getAttribute) obj key] extension value \n");      fppp(fp,"  [(getAttribute) obj key] extension value \n");
Line 166  void Kusage2(fp,s)
Line 168  void Kusage2(fp,s)
     fppp(fp,"  [(or_attrs) atr ] extension result-obj \n");      fppp(fp,"  [(or_attrs) atr ] extension result-obj \n");
     fppp(fp,"  [(outputObjectToFile) path obj] extension null \n");      fppp(fp,"  [(outputObjectToFile) path obj] extension null \n");
     fppp(fp,"  [(ostype)] extension list \n");      fppp(fp,"  [(ostype)] extension list \n");
       fppp(fp,"  [(quiet) flag] extension int \n");
     fppp(fp,"  [(setAttribute) obj key value] extension new-attributed-obj \n");      fppp(fp,"  [(setAttribute) obj key value] extension new-attributed-obj \n");
     fppp(fp,"  [(setAttributeList) obj attrList] extension new-attributed-obj \n");      fppp(fp,"  [(setAttributeList) obj attrList] extension new-attributed-obj \n");
       fppp(fp,"  [(stringToArgv) sobj] extension decomposed_str  cf. to_records \n");
       fppp(fp,"  [(stringToArgv2) sobj separator] extension decomposed_str  cf. to_records \n");
     fppp(fp,"  [(read) fd size] extension string \n");      fppp(fp,"  [(read) fd size] extension string \n");
     fppp(fp,"  [(regexec) regular_expression stringArray flags(opt)] extension list \n");      fppp(fp,"  [(regexec) regular_expression stringArray flags(opt)] extension list \n");
     fppp(fp,"  [(regionMatches) string stringArray] extension list \n");      fppp(fp,"  [(regionMatches) string stringArray] extension list \n");
Line 526  void Kusage2(fp,s)
Line 531  void Kusage2(fp,s)
     fppp(fp,"AutoReduce, Ecart, EcartAutomaticHomogenization\n");      fppp(fp,"AutoReduce, Ecart, EcartAutomaticHomogenization\n");
     fppp(fp,"DoCancel, DebugContentReduction\n");      fppp(fp,"DoCancel, DebugContentReduction\n");
     fppp(fp,"RestrictedMode (cf. or_attr 8), SecureMode(obsolete) \n");      fppp(fp,"RestrictedMode (cf. or_attr 8), SecureMode(obsolete) \n");
       fppp(fp,"UseDsmall, COutput \n");
     fppp(fp,"Example: [(N)] system_variable\n");      fppp(fp,"Example: [(N)] system_variable\n");
     fppp(fp,"                             (maximum number of variables)/2.\n");      fppp(fp,"                             (maximum number of variables)/2.\n");
     fppp(fp,"         [(x) (var) 3] system_variable\n");      fppp(fp,"         [(x) (var) 3] system_variable\n");
Line 534  void Kusage2(fp,s)
Line 540  void Kusage2(fp,s)
     fppp(fp,"                              The 4th differential operator.\n");      fppp(fp,"                              The 4th differential operator.\n");
     fppp(fp,"         [(PrintDollar) 0] system_variable\n");      fppp(fp,"         [(PrintDollar) 0] system_variable\n");
     fppp(fp,"                          Set the global variable PrintDollar to 0\n");      fppp(fp,"                          Set the global variable PrintDollar to 0\n");
     fppp(fp,"DebugReductionEcart (bit):  (2) *% (1) find_reducer,in(r) \n");  //    fppp(fp,"DebugReductionEcart (bit):  (2) *% (1) find_reducer,in(r) \n");
       fppp(fp,"DebugReductionEcart (bit):  (2) * (1) find_reducer,in(r) \n");
     fppp(fp,"              (any) cont   (4) #+[rat division, + ecartd] \n");      fppp(fp,"              (any) cont   (4) #+[rat division, + ecartd] \n");
     fppp(fp,"                           (8) check the order. \n");      fppp(fp,"                           (8) check the order. \n");
     fppp(fp,"DoCancel (bit):  (2) always_reduce_content  (1) Noro_strategy \n");      fppp(fp,"DoCancel (bit):  (2) always_reduce_content  (1) Noro_strategy \n");
Line 548  void Kusage2(fp,s)
Line 555  void Kusage2(fp,s)
     fppp(fp,"Example: ({x,y2}) to_records ===> (x) (y2) 2\n");      fppp(fp,"Example: ({x,y2}) to_records ===> (x) (y2) 2\n");
     fppp(fp,"Example: (x,y2)   to_records ===> (x) (y2) 2\n");      fppp(fp,"Example: (x,y2)   to_records ===> (x) (y2) 2\n");
     fppp(fp,"Example: [(x,y2) to_records pop] ===> [(x) (y2)]\n");      fppp(fp,"Example: [(x,y2) to_records pop] ===> [(x) (y2)]\n");
       fppp(fp,"cf. [(stringToArgv) str] extension or stringToArgv2\n");
   }else if (strcmp(s,"writestring") == 0) {    }else if (strcmp(s,"writestring") == 0) {
     fppp(fp,"<< fd s writestring >>\n"); /*:*/      fppp(fp,"<< fd s writestring >>\n"); /*:*/
     fppp(fp,"file fd; string s;\n");      fppp(fp,"file fd; string s;\n");

Legend:
Removed from v.1.45  
changed lines
  Added in v.1.52

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>