| 15 |  |  | 
| 16 |  |  | 
| 17 | % Determine the directory name where the package is installed: | % Determine the directory name where the package is installed: | 
| 18 | w       = which('volbet2iso'); | fct_to_find = 'pv_checkpath'; | 
| 19 | packdir = w(1:length(w)-12); | w       = which(fct_to_find); | 
| 20 |  | packdir = w(1:length(w)-(length(fct_to_find)+2)); | 
| 21 |  |  | 
| 22 |  |  | 
| 23 | % Try to found needed subdirectories: | % Try to found needed subdirectories: | 
| 24 |  |  | 
| 25 | subdir     = struct('name',{'subfct','test','visu'}); | subdir     = struct('name',{'subfct','test','visu','subduc'}); | 
| 26 |  |  | 
| 27 | for id = 1 : size(subdir(:),1) | for id = 1 : size(subdir(:),1) | 
| 28 | subdirname = subdir(id).name; | subdirname = subdir(id).name; |