Changeset 10829
- Timestamp:
- 11/21/11 15:25:38 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/mex/KMLMeshWrite/KMLFileRead.cpp
r8910 r10829 73 73 options=new Options(NRHS,nrhs,prhs); 74 74 if (options->Size()) for(i=0;i<options->Size();i++) ((Option*)options->GetObjectByOffset(i))->DeepEcho(); 75 options->Get(&echo ,"echo" ," no");76 options->Get(&deepecho,"deepecho"," no");77 options->Get(&write ,"write" ," no");75 options->Get(&echo ,"echo" ,"off"); 76 options->Get(&deepecho,"deepecho","off"); 77 options->Get(&write ,"write" ,"off"); 78 78 79 79 /*some checks*/ … … 94 94 95 95 if (kobj) { 96 if (!strncmp(echo ," y",1) || !strncmp(echo ,"on",2))96 if (!strncmp(echo ,"on",2) || !strncmp(echo ,"y",1)) 97 97 kobj->Echo(); 98 if (!strncmp(deepecho," y",1) || !strncmp(deepecho,"on",2))98 if (!strncmp(deepecho,"on",2) || !strncmp(deepecho,"y",1)) 99 99 kobj->DeepEcho(); 100 if (strncmp(write,"no",2) && strncmp(write,"off",3)) { 101 if (verbose) printf("Opening file \"%s\".\n",write); 102 fido=fopen(write,"w"); 103 104 kobj->Write(fido,""); 105 106 if (verbose) printf("Closing file \"%s\".\n",write); 107 fclose(fido); 100 if (strncmp(write,"off",3) && strncmp(write,"no",2)) { 101 if (!strncmp(write,"on",2) || !strncmp(write,"yes",3) || !strncmp(write,"stdout",6)) { 102 kobj->Write(stdout,""); 103 } 104 else { 105 if (verbose) printf("Opening file \"%s\".\n",write); 106 fido=fopen(write,"w"); 107 kobj->Write(fido,""); 108 if (verbose) printf("Closing file \"%s\".\n",write); 109 ierror=fclose(fido); 110 } 108 111 } 109 112 … … 131 134 _printf_(true,"\n"); 132 135 _printf_(true," Usage:\n"); 133 _printf_(true," ierror=KMLMeshWrite(name,notes,elem,nodecon,lat,long,part,data,cmap,kmlfile);\n");136 _printf_(true," [ierror]=KMLFileRead(kmlfile,'param name',param,...);\n"); 134 137 _printf_(true,"\n"); 135 _printf_(true," name model name (string, may be empty)\n"); 136 _printf_(true," notes model notes (string or cell array of strings, may be empty)\n"); 137 _printf_(true," elem elements (double array)\n"); 138 _printf_(true," nodecon nodal connectivity array (double array, may be empty)\n"); 139 _printf_(true," lat nodal latititudes (double vector)\n"); 140 _printf_(true," long nodal longitudes (double vector)\n"); 141 _printf_(true," part nodal partitions (double vector, may be empty)\n"); 142 _printf_(true," data nodal or element data (double vector, may be empty)\n"); 143 _printf_(true," cmap color map (double nx3 array, may be empty)\n"); 144 _printf_(true," kmlfile KML file name (string)\n"); 138 _printf_(true," kmlfile file name of kml file to be read (char)\n"); 145 139 _printf_(true,"\n"); 146 _printf_(true," ierror error flag (double, non-zero for error)\n"); 140 _printf_(true," echo echo command (char, optional, 'off'/'on')\n"); 141 _printf_(true," deepecho deep echo command (char, optional, 'off'/'on')\n"); 142 _printf_(true," write write command (char, optional, 'off'/'stdout'/kmlfile)\n"); 147 143 _printf_(true,"\n"); 148 _printf_(true," Example:\n"); 149 _printf_(true," KMLMeshWrite(md.name,md.notes,md.elements,md.nodeconnectivity,md.lat,md.long,md.part,md.fm_criterion,options.cmap,filekml);\n"); 144 _printf_(true," ierror return code (non-zero for error)\n"); 145 _printf_(true,"\n"); 146 _printf_(true," Examples:\n"); 147 _printf_(true," [ierror]=KMLFileRead('file.kml','deepecho','on');\n"); 148 _printf_(true," [ierror]=KMLFileRead('filin.kml','echo','on','write','filout.kml');\n"); 150 149 _printf_(true,"\n"); 151 150 }
Note:
See TracChangeset
for help on using the changeset viewer.