octave_packages/secs2d-0.0.8/PKG_ADD

   1
   2 # Run this only if the package is installed
   3 if (! exist (fullfile (fileparts (mfilename ("fullpath")), "inst"), "dir"))
   4 dirlist= {"Utilities","DDGOX","ThDDGOX","QDDGOX","METLINES","DDGOXT"};
   5
   6 for ii=1:length(dirlist)
   7 addpath ( [ fileparts( mfilename("fullpath")) "/" dirlist{ii}])
   8 end
   9
  10 __gmsh = file_in_path (EXEC_PATH, "gmsh");
  11 if (isempty (__gmsh))
  12 __gmsh = file_in_path (EXEC_PATH, "gmsh.exe");
  13 if (isempty (__gmsh))
  14 warning ("gmsh does not seem to be present some functionalities will be disabled");
  15 endif
  16 endif
  17 clear __gmsh;
  18
  19 __dx = file_in_path (EXEC_PATH, "dx");
  20 if (isempty (__dx))
  21 __dx = file_in_path (EXEC_PATH, "dx.exe");
  22 if (isempty (__dx))
  23 warning ("dx does not seem to be present some functionalities will be disabled");
  24 endif
  25 endif
  26 clear __dx;
  27 end