Mercurial > hg > map

diff userProgramsTim/iloga2sloga.m @ 38:c2204b18f4a2 tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
End nov big change
author Ray Meddis <rmeddis@essex.ac.uk>
date Mon, 28 Nov 2011 13:34:28 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/userProgramsTim/iloga2sloga.m	Mon Nov 28 13:34:28 2011 +0000
@@ -0,0 +1,160 @@
+function [sOut] = iloga2sloga(iIn)
+% string logatome to integer logatome
+% Bernd Meyer / Medical Physik / University of Oldenburg
+% bernd.meyer@uni-oldenburg.de; March 2005
+
+switch iIn
+   case 001; sOut = 'adda'; 
+   case 002; sOut = 'atta'; 
+   case 003; sOut = 'agga'; 
+   case 004; sOut = 'acka'; 
+   case 005; sOut = 'affa'; 
+   case 006; sOut = 'assa'; 
+   case 007; sOut = 'abba'; 
+   case 008; sOut = 'appa'; 
+   case 009; sOut = 'awwa'; 
+   case 010; sOut = 'azza'; 
+   case 011; sOut = 'amma'; 
+   case 012; sOut = 'anna'; 
+   case 013; sOut = 'ascha';
+   case 014; sOut = 'alla'; 
+   case 015; sOut = 'edde'; 
+   case 016; sOut = 'ette'; 
+   case 017; sOut = 'egge'; 
+   case 018; sOut = 'ecke'; 
+   case 019; sOut = 'effe'; 
+   case 020; sOut = 'esse'; 
+   case 021; sOut = 'ebbe'; 
+   case 022; sOut = 'eppe'; 
+   case 023; sOut = 'ewwe'; 
+   case 024; sOut = 'ezze'; 
+   case 025; sOut = 'emme'; 
+   case 026; sOut = 'enne'; 
+   case 027; sOut = 'esche';
+   case 027; sOut = 'escha';
+   case 028; sOut = 'elle'; 
+   case 029; sOut = 'iddi'; 
+   case 030; sOut = 'itti'; 
+   case 031; sOut = 'iggi'; 
+   case 032; sOut = 'icki'; 
+   case 033; sOut = 'iffi'; 
+   case 034; sOut = 'issi'; 
+   case 035; sOut = 'ibbi'; 
+   case 036; sOut = 'ippi'; 
+   case 037; sOut = 'iwwi'; 
+   case 038; sOut = 'izzi'; 
+   case 039; sOut = 'immi'; 
+   case 040; sOut = 'inni'; 
+   case 041; sOut = 'ischi';
+   case 042; sOut = 'illi'; 
+   case 043; sOut = 'oddo'; 
+   case 044; sOut = 'otto'; 
+   case 045; sOut = 'oggo'; 
+   case 046; sOut = 'ocko'; 
+   case 047; sOut = 'offo'; 
+   case 048; sOut = 'osso'; 
+   case 049; sOut = 'obbo'; 
+   case 050; sOut = 'oppo'; 
+   case 051; sOut = 'owwo'; 
+   case 052; sOut = 'ozzo'; 
+   case 053; sOut = 'ommo'; 
+   case 054; sOut = 'onno'; 
+   case 055; sOut = 'oscho';
+   case 056; sOut = 'ollo'; 
+   case 057; sOut = 'uddu'; 
+   case 058; sOut = 'uttu'; 
+   case 059; sOut = 'uggu'; 
+   case 060; sOut = 'ucku'; 
+   case 061; sOut = 'uffu'; 
+   case 062; sOut = 'ussu'; 
+   case 063; sOut = 'ubbu'; 
+   case 064; sOut = 'uppu'; 
+   case 065; sOut = 'uwwu'; 
+   case 066; sOut = 'uzzu'; 
+   case 067; sOut = 'ummu'; 
+   case 068; sOut = 'unnu'; 
+   case 069; sOut = 'uschu';
+   case 070; sOut = 'ullu'; 
+   case 071; sOut = 'dadd'; 
+   case 072; sOut = 'tatt'; 
+   case 073; sOut = 'gagg'; 
+   case 074; sOut = 'kakk'; 
+   case 075; sOut = 'faff'; 
+   case 076; sOut = 'sass'; 
+   case 077; sOut = 'babb'; 
+   case 078; sOut = 'papp'; 
+   case 079; sOut = 'dedd'; 
+   case 080; sOut = 'tett'; 
+   case 081; sOut = 'gegg'; 
+   case 082; sOut = 'kekk'; 
+   case 083; sOut = 'feff'; 
+   case 084; sOut = 'sess'; 
+   case 085; sOut = 'bebb'; 
+   case 086; sOut = 'pepp'; 
+   case 087; sOut = 'didd'; 
+   case 088; sOut = 'titt'; 
+   case 089; sOut = 'gigg'; 
+   case 090; sOut = 'kikk'; 
+   case 091; sOut = 'fiff'; 
+   case 092; sOut = 'siss'; 
+   case 093; sOut = 'bibb'; 
+   case 094; sOut = 'pipp'; 
+   case 095; sOut = 'dodd'; 
+   case 096; sOut = 'tott'; 
+   case 097; sOut = 'gogg'; 
+   case 098; sOut = 'kokk'; 
+   case 099; sOut = 'foff'; 
+   case 100; sOut = 'soss'; 
+   case 101; sOut = 'bobb'; 
+   case 102; sOut = 'popp'; 
+   case 103; sOut = 'dudd'; 
+   case 104; sOut = 'tutt'; 
+   case 105; sOut = 'gugg'; 
+   case 106; sOut = 'kukk'; 
+   case 107; sOut = 'fuff'; 
+   case 108; sOut = 'suss'; 
+   case 109; sOut = 'bubb'; 
+   case 110; sOut = 'pupp'; 
+   case 111; sOut = 'dahd'; 
+   case 112; sOut = 'taht'; 
+   case 113; sOut = 'gahg'; 
+   case 114; sOut = 'kahk'; 
+   case 115; sOut = 'fahf'; 
+   case 116; sOut = 'sahs'; 
+   case 117; sOut = 'bahb'; 
+   case 118; sOut = 'pahp'; 
+   case 119; sOut = 'dehd'; 
+   case 120; sOut = 'teht'; 
+   case 121; sOut = 'gehg'; 
+   case 122; sOut = 'kehk'; 
+   case 123; sOut = 'fehf'; 
+   case 124; sOut = 'sehs'; 
+   case 125; sOut = 'behb'; 
+   case 126; sOut = 'pehp'; 
+   case 127; sOut = 'died'; 
+   case 128; sOut = 'tiet'; 
+   case 129; sOut = 'gieg'; 
+   case 130; sOut = 'kiek'; 
+   case 131; sOut = 'fief'; 
+   case 132; sOut = 'sies'; 
+   case 133; sOut = 'bieb'; 
+   case 134; sOut = 'piep'; 
+   case 135; sOut = 'dohd'; 
+   case 136; sOut = 'toht'; 
+   case 137; sOut = 'gohg'; 
+   case 138; sOut = 'kohk'; 
+   case 139; sOut = 'fohf'; 
+   case 140; sOut = 'sohs'; 
+   case 141; sOut = 'bohb'; 
+   case 142; sOut = 'pohp'; 
+   case 143; sOut = 'duhd'; 
+   case 144; sOut = 'tuht'; 
+   case 145; sOut = 'guhg'; 
+   case 146; sOut = 'kuhk'; 
+   case 147; sOut = 'fuhf'; 
+   case 148; sOut = 'suhs'; 
+   case 149; sOut = 'buhb'; 
+   case 150; sOut = 'puhp'; 
+otherwise
+   error(['no logatome ' num2str(iIn) ' found in list']);
+end % of switch