To check out this repository please hg clone the following URL, or open the URL using EasyMercurial or your preferred Mercurial client.
The primary repository for this project is hosted at git://github.com/rmeddis/MAP.git .
This repository is a read-only copy which is updated automatically every hour.
root / userProgramsTim / sloga2iloga.m @ 38:c2204b18f4a2
History | View | Annotate | Download (4.67 KB)
| 1 | 38:c2204b18f4a2 | rmeddis | function [iOut] = sloga2iloga(sIn, gVar) |
|---|---|---|---|
| 2 | % string logatome to integer logatome |
||
| 3 | % Bernd Meyer / Medical Physik / University of Oldenburg |
||
| 4 | % bernd.meyer@uni-oldenburg.de; March 2005 |
||
| 5 | |||
| 6 | if ~exist('gVar')
|
||
| 7 | gVar.iVerboseFlag = 1; |
||
| 8 | end |
||
| 9 | |||
| 10 | sIn = strrep(sIn,' ',''); |
||
| 11 | |||
| 12 | switch sIn |
||
| 13 | case 'adda'; iOut = 001; |
||
| 14 | case 'atta'; iOut = 002; |
||
| 15 | case 'agga'; iOut = 003; |
||
| 16 | case 'acka'; iOut = 004; |
||
| 17 | case 'affa'; iOut = 005; |
||
| 18 | case 'assa'; iOut = 006; |
||
| 19 | case 'abba'; iOut = 007; |
||
| 20 | case 'appa'; iOut = 008; |
||
| 21 | case 'awwa'; iOut = 009; |
||
| 22 | case 'azza'; iOut = 010; |
||
| 23 | case 'amma'; iOut = 011; |
||
| 24 | case 'anna'; iOut = 012; |
||
| 25 | case 'ascha'; iOut = 013; |
||
| 26 | case 'alla'; iOut = 014; |
||
| 27 | case 'edde'; iOut = 015; |
||
| 28 | case 'ette'; iOut = 016; |
||
| 29 | case 'egge'; iOut = 017; |
||
| 30 | case 'ecke'; iOut = 018; |
||
| 31 | case 'effe'; iOut = 019; |
||
| 32 | case 'esse'; iOut = 020; |
||
| 33 | case 'ebbe'; iOut = 021; |
||
| 34 | case 'eppe'; iOut = 022; |
||
| 35 | case 'ewwe'; iOut = 023; |
||
| 36 | case 'ezze'; iOut = 024; |
||
| 37 | case 'emme'; iOut = 025; |
||
| 38 | case 'enne'; iOut = 026; |
||
| 39 | case 'esche'; iOut = 027; |
||
| 40 | case 'escha'; iOut = 027; |
||
| 41 | case 'elle'; iOut = 028; |
||
| 42 | case 'iddi'; iOut = 029; |
||
| 43 | case 'itti'; iOut = 030; |
||
| 44 | case 'iggi'; iOut = 031; |
||
| 45 | case 'icki'; iOut = 032; |
||
| 46 | case 'iffi'; iOut = 033; |
||
| 47 | case 'issi'; iOut = 034; |
||
| 48 | case 'ibbi'; iOut = 035; |
||
| 49 | case 'ippi'; iOut = 036; |
||
| 50 | case 'iwwi'; iOut = 037; |
||
| 51 | case 'izzi'; iOut = 038; |
||
| 52 | case 'immi'; iOut = 039; |
||
| 53 | case 'inni'; iOut = 040; |
||
| 54 | case 'ischi'; iOut = 041; |
||
| 55 | case 'illi'; iOut = 042; |
||
| 56 | case 'oddo'; iOut = 043; |
||
| 57 | case 'otto'; iOut = 044; |
||
| 58 | case 'oggo'; iOut = 045; |
||
| 59 | case 'ocko'; iOut = 046; |
||
| 60 | case 'offo'; iOut = 047; |
||
| 61 | case 'osso'; iOut = 048; |
||
| 62 | case 'obbo'; iOut = 049; |
||
| 63 | case 'oppo'; iOut = 050; |
||
| 64 | case 'owwo'; iOut = 051; |
||
| 65 | case 'ozzo'; iOut = 052; |
||
| 66 | case 'ommo'; iOut = 053; |
||
| 67 | case 'onno'; iOut = 054; |
||
| 68 | case 'oscho'; iOut = 055; |
||
| 69 | case 'ollo'; iOut = 056; |
||
| 70 | case 'uddu'; iOut = 057; |
||
| 71 | case 'uttu'; iOut = 058; |
||
| 72 | case 'uggu'; iOut = 059; |
||
| 73 | case 'ucku'; iOut = 060; |
||
| 74 | case 'uffu'; iOut = 061; |
||
| 75 | case 'ussu'; iOut = 062; |
||
| 76 | case 'ubbu'; iOut = 063; |
||
| 77 | case 'uppu'; iOut = 064; |
||
| 78 | case 'uwwu'; iOut = 065; |
||
| 79 | case 'uzzu'; iOut = 066; |
||
| 80 | case 'ummu'; iOut = 067; |
||
| 81 | case 'unnu'; iOut = 068; |
||
| 82 | case 'uschu'; iOut = 069; |
||
| 83 | case 'ullu'; iOut = 070; |
||
| 84 | case 'dadd'; iOut = 071; |
||
| 85 | case 'tatt'; iOut = 072; |
||
| 86 | case 'gagg'; iOut = 073; |
||
| 87 | case 'kakk'; iOut = 074; |
||
| 88 | case 'faff'; iOut = 075; |
||
| 89 | case 'sass'; iOut = 076; |
||
| 90 | case 'babb'; iOut = 077; |
||
| 91 | case 'papp'; iOut = 078; |
||
| 92 | case 'dedd'; iOut = 079; |
||
| 93 | case 'tett'; iOut = 080; |
||
| 94 | case 'gegg'; iOut = 081; |
||
| 95 | case 'kekk'; iOut = 082; |
||
| 96 | case 'feff'; iOut = 083; |
||
| 97 | case 'sess'; iOut = 084; |
||
| 98 | case 'bebb'; iOut = 085; |
||
| 99 | case 'pepp'; iOut = 086; |
||
| 100 | case 'didd'; iOut = 087; |
||
| 101 | case 'titt'; iOut = 088; |
||
| 102 | case 'gigg'; iOut = 089; |
||
| 103 | case 'kikk'; iOut = 090; |
||
| 104 | case 'fiff'; iOut = 091; |
||
| 105 | case 'siss'; iOut = 092; |
||
| 106 | case 'bibb'; iOut = 093; |
||
| 107 | case 'pipp'; iOut = 094; |
||
| 108 | case 'dodd'; iOut = 095; |
||
| 109 | case 'tott'; iOut = 096; |
||
| 110 | case 'gogg'; iOut = 097; |
||
| 111 | case 'kokk'; iOut = 098; |
||
| 112 | case 'foff'; iOut = 099; |
||
| 113 | case 'soss'; iOut = 100; |
||
| 114 | case 'bobb'; iOut = 101; |
||
| 115 | case 'popp'; iOut = 102; |
||
| 116 | case 'dudd'; iOut = 103; |
||
| 117 | case 'tutt'; iOut = 104; |
||
| 118 | case 'gugg'; iOut = 105; |
||
| 119 | case 'kukk'; iOut = 106; |
||
| 120 | case 'fuff'; iOut = 107; |
||
| 121 | case 'suss'; iOut = 108; |
||
| 122 | case 'bubb'; iOut = 109; |
||
| 123 | case 'pupp'; iOut = 110; |
||
| 124 | case 'dahd'; iOut = 111; |
||
| 125 | case 'taht'; iOut = 112; |
||
| 126 | case 'gahg'; iOut = 113; |
||
| 127 | case 'kahk'; iOut = 114; |
||
| 128 | case 'fahf'; iOut = 115; |
||
| 129 | case 'sahs'; iOut = 116; |
||
| 130 | case 'bahb'; iOut = 117; |
||
| 131 | case 'pahp'; iOut = 118; |
||
| 132 | case 'dehd'; iOut = 119; |
||
| 133 | case 'teht'; iOut = 120; |
||
| 134 | case 'gehg'; iOut = 121; |
||
| 135 | case 'kehk'; iOut = 122; |
||
| 136 | case 'fehf'; iOut = 123; |
||
| 137 | case 'sehs'; iOut = 124; |
||
| 138 | case 'behb'; iOut = 125; |
||
| 139 | case 'pehp'; iOut = 126; |
||
| 140 | case 'died'; iOut = 127; |
||
| 141 | case 'tiet'; iOut = 128; |
||
| 142 | case 'gieg'; iOut = 129; |
||
| 143 | case 'kiek'; iOut = 130; |
||
| 144 | case 'fief'; iOut = 131; |
||
| 145 | case 'sies'; iOut = 132; |
||
| 146 | case 'bieb'; iOut = 133; |
||
| 147 | case 'piep'; iOut = 134; |
||
| 148 | case 'dohd'; iOut = 135; |
||
| 149 | case 'toht'; iOut = 136; |
||
| 150 | case 'gohg'; iOut = 137; |
||
| 151 | case 'kohk'; iOut = 138; |
||
| 152 | case 'fohf'; iOut = 139; |
||
| 153 | case 'sohs'; iOut = 140; |
||
| 154 | case 'bohb'; iOut = 141; |
||
| 155 | case 'pohp'; iOut = 142; |
||
| 156 | case 'duhd'; iOut = 143; |
||
| 157 | case 'tuht'; iOut = 144; |
||
| 158 | case 'guhg'; iOut = 145; |
||
| 159 | case 'kuhk'; iOut = 146; |
||
| 160 | case 'fuhf'; iOut = 147; |
||
| 161 | case 'suhs'; iOut = 148; |
||
| 162 | case 'buhb'; iOut = 149; |
||
| 163 | case 'puhp'; iOut = 150; |
||
| 164 | otherwise |
||
| 165 | if gVar.iVerboseFlag |
||
| 166 | disp(['no logatome ' sIn ' found in list']); |
||
| 167 | end |
||
| 168 | iOut = -1; |
||
| 169 | end % of switch |