Changeset afe420 in git
- Timestamp:
- Mar 2, 2001, 2:41:19 PM (22 years ago)
- Branches:
- (u'spielwiese', '8d54773d6c9e2f1d2593a28bc68b7eeab54ed529')
- Children:
- a3705ae0dbd6279402189c585e055106566f94f1
- Parents:
- 89ff330823701e119667003326742b3326348ba6
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/surf.lib
r89ff33 rafe420 1 //last change: 13.02.2001 (Eric Westenberger)1 //last change: 02.03.2001 (Eric Westenberger) 2 2 /////////////////////////////////////////////////////////////////////////////// 3 version="$Id: surf.lib,v 1.1 8 2001-02-19 14:17:49 lossenExp $";3 version="$Id: surf.lib,v 1.19 2001-03-02 13:41:19 westenb Exp $"; 4 4 category="Visualization"; 5 5 info=" … … 18 18 19 19 PROCEDURES: 20 plot(I); plots curves and surfaces20 plot(I); plots plane curves and surfaces 21 21 "; 22 22 … … 41 41 proc plot(ideal I,list #) 42 42 "USAGE: plot(I); I ideal 43 ASSUME: I involves only 2 or 3 variables43 ASSUME: I defines a plane curve or a surface 44 44 RETURN: nothing 45 45 NOTE: requires the external program 'surf' to be installed … … 48 48 { 49 49 string l="/tmp/surf"+string(system("pid")); 50 string err_mes; // string containing error messages 50 51 def base=basering; 51 52 intvec v=num_of_vars(I); … … 57 58 if (n==0 or n>3) 58 59 { 59 stringerr_mes="Cannot plot equations with "+string(n)+" variables";60 err_mes="Cannot plot equations with "+string(n)+" variables"; 60 61 ERROR(err_mes); 61 62 } … … 107 108 else 108 109 { 109 ERROR("cannot plot"+string(ncols(I))+"equations in" 110 +string(n)+"variables"); 110 err_mes="cannot plot "+string(ncols(I))+" equations in " 111 +string(n)+" variables"; 112 ERROR(err_mes); 111 113 } 112 114 } … … 120 122 if (i!=0) 121 123 { 122 ERROR("calling `surf` failed. (the shell return the error code"124 err_mes = "calling `surf` failed. (the shell return the error code " 123 125 +string(i)+")."+newline+ 124 "probably the executable `surf` is not found."); 126 "probably the executable `surf` is not found."; 127 ERROR(err_mes); 125 128 } 126 129 i=system("sh","/bin/rm "+l);
Note: See TracChangeset
for help on using the changeset viewer.