added Ann-Charlotte's grammars

grammars/TALK/GF_GoDiS/Resource/Events_Locations/DB.gf

@@ -0,0 +1,37 @@
+abstract DB = { 
+
+cat
+	Event;
+	Location; 
+
+fun
+
+	-- anEvent : Event;
+	meeting : Event;
+	presentation : Event;
+	date : Event;
+	lecture : Event;
+
+{-
+	appointment : Event;
+	class : Event;
+	converence : Event;
+	hairdresser : Event;
+	dentist : Event;		
+	party : Event;
+	deadline : Event;
+-}
+
+	-- aLocation : Location;
+	plaza : Location;
+	station : Location;
+	university : Location;
+{-	
+	fair : Location;
+	ritz : Location;
+	cafe : Location;
+-}	
+
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Events_Locations/DBPro.gf

@@ -0,0 +1,17 @@
+concrete DBPro of DB = { 
+
+pattern
+
+	-- anEvent = "EVENT";
+	meeting = "meeting";
+	presentation = "presentation";
+	date = "appointment";
+	lecture = "lecture";
+	
+
+	-- aLocation = "LOCATION";
+	plaza = "plaza";
+	station = "station";
+	university = "university";
+
+}

grammars/TALK/GF_GoDiS/Resource/Events_Locations/DBSwe.gf

@@ -0,0 +1,29 @@
+concrete DBSwe of DB = {
+
+pattern
+
+
+	-- anEvent = "EVENT";
+	meeting = ["ett möte"];
+	presentation = ["en presentation"];
+	date = ["en träff"];
+	lecture = ["en lektion"];
+
+	-- aLocation = "LOCATION";
+	plaza = ["på plaza"];
+	station = ["på stationen"];
+	university = ["på universitetet"];
+}
+
+
+
+
+
+
+
+
+
+
+
+
+

grammars/TALK/GF_GoDiS/Resource/Home/Lamps.gf

@@ -0,0 +1,14 @@
+abstract Lamps = {
+
+cat Lamp;
+
+fun
+
+--aLamp : Lamp;
+ceilinglamp : Lamp;
+tablelamp : Lamp;
+desklamp : Lamp;
+floorlamp : Lamp;
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Home/LampsEng.gf

@@ -0,0 +1,12 @@
+concrete LampsEng of Lamps = {
+
+pattern
+
+--aLamp = "LIGHT";
+ceilinglamp = ["the ceiling light"];
+tablelamp = ["the table light"];
+desklamp = ["the desk light"];
+floorlamp = ["the floor light"];
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Home/LampsPro.gf

@@ -0,0 +1,11 @@
+concrete LampsPro of Lamps = {
+
+pattern
+
+--aLamp = "LIGHT";
+ceilinglamp = "[ceilinglamp]";
+tablelamp = "[tablelamp]";
+desklamp = "[desklamp]";
+floorlamp = "[floorlamp]";
+
+}

grammars/TALK/GF_GoDiS/Resource/Home/LampsSwe.gf

@@ -0,0 +1,11 @@
+concrete LampsSwe of Lamps = {
+
+pattern 
+
+--aLamp = "LAMPA";
+ceilinglamp = variants{"taklampan" ; ["en taklampa"]};
+tablelamp = variants{ "bordslampan" ; ["en bordslampa"]};
+desklamp = variants{ "skrivbordslampan" ; ["en skrivbordslampa"]};
+floorlamp = variants{ "golvlampan" ; ["en golvlampa"]};
+
+}

grammars/TALK/GF_GoDiS/Resource/Home/Rooms.gf

@@ -0,0 +1,15 @@
+abstract Rooms = {
+
+cat Room;
+
+fun
+
+--aRoom : Room;
+kitchen : Room;
+bedroom : Room;
+hall : Room;
+livingroom : Room;
+
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Home/RoomsEng.gf

@@ -0,0 +1,12 @@
+concrete RoomsEng of Rooms = {
+
+pattern
+
+--aRoom = "ROOM";
+kitchen = ["the kitchen"];
+bedroom = ["the bedroom"];
+hall = ["the hall"];
+livingroom = ["the living room"];
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Home/RoomsPro.gf

@@ -0,0 +1,11 @@
+concrete RoomsPro of Rooms = {
+
+pattern
+
+--aLocation = "ROOM";
+kitchen = "[kitchen]";
+bedroom = "[bedroom]";
+hall = "[hall]";
+livingroom = "[livingroom]";
+
+}

grammars/TALK/GF_GoDiS/Resource/Home/RoomsSwe.gf

@@ -0,0 +1,12 @@
+concrete RoomsSwe of Rooms = {
+
+pattern
+
+--aRoom = "RUM";
+kitchen = "köket";
+bedroom = "sovrumet";
+hall = "hallen";
+livingroom = "vardagsrumet";
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishAlbums.gf

@@ -0,0 +1,23 @@
+abstract EnglishAlbums = {
+
+cat Album;
+
+fun
+
+london_calling_album 			: Album;
+singles_album 				: Album;
+wish_album 				: Album;
+in_the_city_album 			: Album;
+the_sidewinder_album 			: Album;
+the_immaculate_collection_album 	: Album;
+lets_get_it_on_album 			: Album;
+mezzanine_album 			: Album;
+protection_album 			: Album;
+heads_high_album 			: Album;
+every_good_boy_deserves_fudge_album 	: Album;
+please_album 				: Album;
+doolittle_album 	 		: Album;
+music_for_the_jilted_generation_album 	: Album;
+swedish_classics 			: Album;
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishAlbumsEng.gf

@@ -0,0 +1,21 @@
+concrete EnglishAlbumsEng of EnglishAlbums = {
+
+pattern
+
+london_calling_album = ["london calling"];
+singles_album = ["singles"];
+wish_album = ["wish"];
+in_the_city_album = ["in the city"];
+the_sidewinder_album = ["the sidewinder"];
+the_immaculate_collection_album = ["the immaculate collection"];
+lets_get_it_on_album = ["lets get it on"];
+mezzanine_album = ["mezzanine"];
+protection_album = ["protection"];
+heads_high_album = ["heads high"];
+every_good_boy_deserves_fudge_album = ["every good boy deserves fudge"];
+please_album = ["please"];
+doolittle_album = ["doolittle"];
+music_for_the_jilted_generation_album = ["music for the jilted generation"];
+swedish_classics = ["swedish classics"];
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishAlbumsPro.gf

@@ -0,0 +1,21 @@
+concrete EnglishAlbumsPro of EnglishAlbums = {
+
+pattern
+
+london_calling_album = "[london,calling]";
+singles_album = "[singles]";
+wish_album = "[wish]";
+in_the_city_album = "[in,the,city]";
+the_sidewinder_album = "[the,sidewinder]";
+the_immaculate_collection_album = "[the,immaculate,collection]";
+lets_get_it_on_album = "[lets,get,it,on]";
+mezzanine_album = "[mezzanine]";
+protection_album = "[protection]";
+heads_high_album = "[heads,high]";
+every_good_boy_deserves_fudge_album = "[every,good,boy,deserves,fudge]";
+please_album = "[please]";
+doolittle_album = "[doolittle]";
+music_for_the_jilted_generation_album = "[music,for,the,jilted,generation]";
+swedish_classics = "[svenska,klassiker]";
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishArtists.gf

@@ -0,0 +1,62 @@
+abstract EnglishArtists = {
+
+cat
+
+Artist;
+
+fun
+-- ENGELSKA
+
+-- ARTIST
+beborn_beton 		: Artist;
+clash 			: Artist;
+covenant 		: Artist;
+cure 			: Artist;
+enigma 			: Artist;
+garbage 		: Artist;
+jam 			: Artist;
+kate_bush 		: Artist;
+lee_morgan 		: Artist;
+madonna 		: Artist;
+marvin_gaye 		: Artist;
+massive_attack 		: Artist;
+michael_jackson		: Artist;
+morlocks 		: Artist;
+morrisey 		: Artist;
+mr_vegas 		: Artist;
+mudhoney 		: Artist;
+nitzer_ebb 		: Artist;
+pain 			: Artist;
+pet_shop_boys 		: Artist;
+pixies 			: Artist;
+prodigy 		: Artist;
+project_pitchfork 	: Artist;
+vnv_nation 		: Artist;
+britney_spears 		: Artist;
+usher 			: Artist;
+fifty_cent		: Artist;
+green_day 		: Artist;
+billy_idol 		: Artist;
+elvis_presley 		: Artist;
+shania_twain 		: Artist;
+trace_adkins 		: Artist;
+the_chemical_brothers 	: Artist;
+eminem 			: Artist;
+ozzy_osbourne 		: Artist;
+norah_jones 		: Artist;
+jessica_simpson 	: Artist;
+guns_and_roses 		: Artist;
+europe 			: Artist;
+led_zeppelin 		: Artist;
+the_cardigans 		: Artist;
+ace_of_base 		: Artist;
+atomic_swing 		: Artist;
+jessica_simpson 	: Artist;
+creeps 			: Artist;
+eagle_eye_cherry 	: Artist;
+stephen_simmonds 	: Artist;
+the_ark 		: Artist;
+trance_dance 		: Artist;
+vacuum 			: Artist;
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishArtistsEng.gf

@@ -0,0 +1,56 @@
+concrete EnglishArtistsEng of EnglishArtists = {
+
+pattern 
+
+beborn_beton = ["beborn beton"];
+clash = "clash";
+covenant = "covenant";
+cure = "cure";
+enigma = "enigma";
+garbage = "garbage";
+jam = "jam";
+kate_bush = ["kate bush"];
+lee_morgan = ["lee morgan"];
+madonna = "madonna";
+marvin_gaye = ["mavin gaye"];
+massive_attack = ["massive attack"];
+michael_jackson = ["michael jackson"];
+morlocks = "morlocks";
+morrisey = "morrisey";
+mr_vegas = ["mister vegas"];
+mudhoney = "mudhoney";
+nitzer_ebb = ["nitzer ebb"];
+pain = "pain";
+pet_shop_boys = ["pet shop boys"];
+pixies = "pixies";
+prodigy = "prodigy";
+project_pitchfork = ["project pitchfork"];
+vnv_nation = ["vnv nation"];
+britney_spears = ["britney spears"];
+usher = "usher";
+fifty_cent = ["fifty cent"];
+green_day = ["green day"];
+billy_idol = ["billy idol"];
+elvis_presley = ["elvis presley"];
+shania_twain = ["shania twain"];
+trace_adkins = ["trace adkins"];
+the_chemical_brothers = ["the chemical brothers"];
+eminem = "eminem";
+ozzy_osbourne = ["ozzy osbourne"];
+norah_jones = ["norah jones"];
+jessica_simpson = ["jessica simpson"];
+guns_and_roses = ["guns and roses"];
+europe = "europe";
+led_zeppelin = ["led zeppelin"];
+the_cardigans = ["the cardigans"];
+ace_of_base = ["ace of base"];
+atomic_swing = ["atomic swing"];
+jessica_simpson = ["jessica simpson"];
+creeps = "creeps";
+eagle_eye_cherry = ["eagle eye cherry"];
+stephen_simmonds = ["stephen simmonds"];
+the_ark = ["the ark"];
+trance_dance = ["trance dance"];
+vacuum = "vacuum";
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishArtistsPro.gf

@@ -0,0 +1,57 @@
+concrete EnglishArtistsPro of EnglishArtists = {
+
+pattern
+
+beborn_beton = "[beborn,beton]";
+clash = "[clash]";
+covenant = "[covenant]";
+cure = "[cure]";
+enigma = "[enigma]";
+garbage = "[garbage]";
+jam = "[jam]";
+kate_bush = "[kate,bush]";
+lee_morgan = "[lee,morgan]";
+madonna = "[madonna]";
+marvin_gaye = "[mavin,gaye]";
+massive_attack = "[massive,attack]";
+michael_jackson = "[michael,jackson]";
+morlocks = "[morlocks]";
+morrisey = "[morrisey]";
+mr_vegas = "[mister,vegas]";
+mudhoney = "[mudhoney]";
+nitzer_ebb = "[nitzer,ebb]";
+pain = "[pain]";
+pet_shop_boys = "[pet,shop,boys]";
+pixies = "[pixies]";
+prodigy = "[prodigy]";
+project_pitchfork = "[project,pitchfork]";
+vnv_nation = "[vnv,nation]";
+britney_spears = "[britney,spears]";
+usher = "[usher]";
+fifty_cent = "[fifty,cent]";
+green_day = "[green,day]";
+billy_idol = "[billy,idol]";
+elvis_presley = "[elvis,presley]";
+shania_twain = "[shania,twain]";
+trace_adkins = "[trace,adkins]";
+the_chemical_brothers = "[the,chemical,brothers]";
+eminem = "[eminem]";
+ozzy_osbourne = "[ozzy,osbourne]";
+norah_jones = "[norah,jones]";
+jessica_simpson = "[jessica,simpson]";
+guns_and_roses = "[guns,and,roses]";
+europe = "[europe]";
+led_zeppelin = "[led,zeppelin]";
+the_cardigans = "[the,cardigans]";
+ace_of_base = "[ace,of,base]";
+atomic_swing = "[atomic,swing]";
+jessica_simpson = "[jessica,simpson]";
+creeps = "[creeps]";
+eagle_eye_cherry = "[eagle,eye,cherry]";
+stephen_simmonds = "[stephen,simmonds]";
+the_ark = "[the,ark]";
+trance_dance = "[trance,dance]";
+vacuum = "[vacuum]";
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishRadioStations.gf

@@ -0,0 +1,11 @@
+abstract EnglishRadioStations = {
+
+cat Station;
+
+fun
+
+digital_gunfire : Station;
+rant_radio 	: Station;
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishRadioStationsEng.gf

@@ -0,0 +1,8 @@
+concrete EnglishRadioStationsEng of EnglishRadioStations = {
+
+pattern
+
+digital_gunfire = ["digital gunfire"];
+rant_radio 	= ["rant radio"];
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishRadioStationsPro.gf

@@ -0,0 +1,8 @@
+concrete EnglishRadioStationsPro of EnglishRadioStations = {
+
+pattern
+
+digital_gunfire = "[digital,gunfire]";
+rant_radio 	= "[rant,radio]";
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishSongs.gf

@@ -0,0 +1,57 @@
+abstract EnglishSongs = {
+cat Song;
+
+fun
+
+another_world 				: Song;
+deeper_than_the_usual_feeling 		: Song;
+london_calling 				: Song;
+should_i_stay_or_should_i_go 		: Song;
+dead_stars 				: Song;
+like_tears_in_rain 			: Song;
+figurehead 				: Song;
+leviathan 				: Song;
+stalker 				: Song;
+friday_im_in_love 			: Song;
+sadness 				: Song;
+i_think_im_paranoid 			: Song;
+in_the_city 				: Song;
+time_for_truth 				: Song;
+the_man_with_the_child_in_his_eyes 	: Song;
+totem_pole 				: Song;
+lucky_star 				: Song;
+material_girl 				: Song;
+if_i_should_die_tonight 		: Song;
+angel 					: Song;
+teardrop 				: Song;
+sly 					: Song;
+sex_by_force 				: Song;
+ars_magica 				: Song;
+razors_through_flesh 			: Song;
+heads_high 				: Song;
+latest_news 				: Song;
+good_enough 				: Song;
+thorn 					: Song;
+let_beauty_loose 			: Song;
+eleanor_rigby 				: Song;
+west_end_girls 				: Song;
+suburbia 				: Song;
+debaser 				: Song;
+poison 					: Song;
+existence 				: Song;
+darkangel 				: Song;
+rubicon 				: Song;
+all_that_she_wants 			: Song;
+the_final_countdown 			: Song;
+stone_me_into_the_groove 		: Song;
+oh_i_like_it 				: Song;
+save_tonight 				: Song;
+tears_never_dry 			: Song;
+it_takes_a_fool_to_remain_sain 		: Song;
+youre_gonna_get_it 			: Song;
+i_breathe 				: Song;
+legion 					: Song;
+standing 				: Song;
+like_a_prayer 				: Song;
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishSongsEng.gf

@@ -0,0 +1,56 @@
+concrete EnglishSongsEng of EnglishSongs = {
+
+pattern
+
+another_world = ["another world"];
+deeper_than_the_usual_feeling = ["deeper then the usual feeling"];
+london_calling = ["london calling"];
+should_i_stay_or_should_i_go = ["should i stay or should i go"];
+dead_stars = ["dead stars"];
+like_tears_in_rain = ["like tears in rain"];
+figurehead = ["figurehead"];
+leviathan = ["leviathan"];
+stalker = ["stalker"];
+friday_im_in_love = ["friday im in love"];
+sadness = ["sadness"];
+i_think_im_paranoid = ["i think im paranoid"];
+in_the_city = ["in the city"];
+time_for_truth = ["time for truth"];
+the_man_with_the_child_in_his_eyes = ["the man with the child in his eyes"];
+totem_pole = ["totem pole"];
+lucky_star = ["lucky star"];
+material_girl = ["material girl"];
+if_i_should_die_tonight = ["if i should die tonight"];
+angel = ["angel"];
+teardrop = ["teardrop"];
+sly = ["sly"];
+sex_by_force = ["sex by force"];
+ars_magica = ["ars magica"];
+razors_through_flesh = ["razors through flesh"];
+heads_high = ["heads high"];
+latest_news = ["latest news"];
+good_enough = ["good enough"];
+thorn = ["thorn"];
+let_beauty_loose = ["let beauty loose"];
+eleanor_rigby = ["eleanor rigby"];
+west_end_girls = ["west end girls"];
+suburbia = ["suburbia"];
+debaser = ["debaser"];
+poison = ["poison"];
+existence = ["existance"];
+darkangel = ["darkangel"];
+rubicon = ["rubicon"];
+all_that_she_wants = ["all that she wants"];
+the_final_countdown = ["the final countown"];
+stone_me_into_the_groove = ["stone me into the groove"];
+oh_i_like_it = ["oh i like it"];
+save_tonight = ["save tonight"];
+tears_never_dry = ["tears never dry"];
+it_takes_a_fool_to_remain_sain = ["it takes s fool to remain sain"];
+youre_gonna_get_it = ["youre gonna get it"];
+i_breathe = ["i breathe"];
+legion = ["legion"];
+standing = ["standing"];
+like_a_prayer = ["like a prayer"];
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/English/EnglishSongsPro.gf

@@ -0,0 +1,56 @@
+concrete EnglishSongsPro of EnglishSongs = {
+
+pattern
+
+another_world = "[another,world]";
+deeper_than_the_usual_feeling = "[deeper,then,the,usual,feeling]";
+london_calling = "[london,calling]";
+should_i_stay_or_should_i_go = "[should,i,stay,or,should,i,go]";
+dead_stars = "[dead,stars]";
+like_tears_in_rain = "[like,tears,in,rain]";
+figurehead = "[figurehead]";
+leviathan = "[leviathan]";
+stalker = "[stalker]";
+friday_im_in_love = "[friday,im,in,love]";
+sadness = "[sadness]";
+i_think_im_paranoid = "[i,think,im,paranoid]";
+in_the_city = "[in,the,city]";
+time_for_truth = "[time,for,truth]";
+the_man_with_the_child_in_his_eyes = "[the,man,with,the,child,in,his,eyes]";
+totem_pole = "[totem,pole]";
+lucky_star = "[lucky,star]";
+material_girl = "[material,girl]";
+if_i_should_die_tonight = "[if,i,should,die,tonight]";
+angel = "[angel]";
+teardrop = "[teardrop]";
+sly = "[sly]";
+sex_by_force = "[sex,by,force]";
+ars_magica = "[ars,magica]";
+razors_through_flesh = "[razors,through,flesh]";
+heads_high = "[heads,high]";
+latest_news = "[latest,news]";
+good_enough = "[good,enough]";
+thorn = "[thorn]";
+let_beauty_loose = "[let,beauty,loose]";
+eleanor_rigby = "[eleanor,rigby]";
+west_end_girls = "[west,end,girls]";
+suburbia = "[suburbia]";
+debaser = "[debaser]";
+poison = "[poison]";
+existence = "[existance]";
+darkangel = "[darkangel]";
+rubicon = "[rubicon]";
+all_that_she_wants = "[all,that,she,wants]";
+the_final_countdown = "[the,final,countown]";
+stone_me_into_the_groove = "[stone,me,into,trh,groove]";
+oh_i_like_it = "[oh,i,like,it]";
+save_tonight = "[save,tonight]";
+tears_never_dry = "[tears,never,dry]";
+it_takes_a_fool_to_remain_sain = "[it,takes,s,fool,to,remain,sain]";
+youre_gonna_get_it = "[youre,gonna,get,it]";
+i_breathe = "[i,breathe]";
+legion = "[legion]";
+standing = "[standing]";
+like_a_prayer = "[like,a,prayer]";
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishAlbums.gf

@@ -0,0 +1,11 @@
+abstract SwedishAlbums = {
+
+cat Album;
+
+fun
+
+peps_one		: Album;
+peps_two 		: Album;
+swedish_classics 	: Album;
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishAlbumsPro.gf

@@ -0,0 +1,10 @@
+concrete SwedishAlbumsPro of SwedishAlbums = {
+
+pattern
+
+peps_one = "[peps,bitar,ett]";
+peps_two = "[peps,bitar,två]";
+swedish_classics = "[svenska,klassiker]";
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishAlbumsSwe.gf

@@ -0,0 +1,10 @@
+concrete SwedishAlbumsSwe of SwedishAlbums = {
+
+pattern
+
+swedish_classics = ["svenska klassiker"];
+peps_one = ["peps bitar ett"];
+peps_two = ["peps bitar två"];
+
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishArtists.gf

@@ -0,0 +1,58 @@
+abstract SwedishArtists = {
+
+cat Artist;
+
+fun
+
+abba 			: Artist;
+adolphson_och_falk 	: Artist;
+anne_lie_ryde 		: Artist;
+bo_kaspers_orkester 	: Artist;
+christer_sandelin 	: Artist;
+dan_hylander_och_rmb 	: Artist;
+di_leva 		: Artist;
+dilba 			: Artist;
+docent_dod 		: Artist;
+dr_alban 		: Artist;
+ebba_gron 		: Artist;
+eldkvarn 		: Artist;
+eric_gadd 		: Artist;
+eva_dahlgren 		: Artist;
+freda 			: Artist;
+gyllende_tider 		: Artist;
+imperiet 		: Artist;
+irma 			: Artist;
+jakob_hellman 		: Artist;
+jumper 			: Artist;
+kent 			: Artist;
+lars_winnerback 	: Artist;
+lisa_ekdahl 		: Artist;
+lisa_nilsson 		: Artist;
+lolita_pop 		: Artist;
+lustans_lakejer 	: Artist;
+marie_fredriksson 	: Artist;
+mauro_scocco 		: Artist;
+mikael_rickfors 	: Artist;
+mikael_wiehe 		: Artist;
+monica_tornell 		: Artist;
+nordman 		: Artist;
+norum_och_nilsson 	: Artist;
+orup 			: Artist;
+patrik_isaksson 	: Artist;
+peter_lemarc 		: Artist;
+petter 			: Artist;
+peps_persson 		: Artist;
+ratata 			: Artist;
+robyn 			: Artist;
+roger_pontare 		: Artist;
+roxette 		: Artist;
+staffan_hellstrand 	: Artist;
+stakka_bo 		: Artist;
+stefan_andersson 	: Artist;
+stina_nordenstam 	: Artist;
+tomas_ledin 		: Artist;
+ulf_lundell 		: Artist;
+uno_svenningsson 	: Artist;
+viba_femba 		: Artist;
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishArtistsPro.gf

@@ -0,0 +1,56 @@
+concrete SwedishArtistsPro of SwedishArtists = {
+
+pattern
+
+abba = "[abba]";
+adolphson_och_falk = "[adolphson,och,falk]";
+anne_lie_ryde = "[anne-lie,ryde]";
+bo_kaspers_orkester = "[bo,kaspers,orkester]";
+christer_sandelin = "[christer,sandelin]";
+dan_hylander_och_rmb = "[dan,hylander,och,rmb]";
+di_leva = "[di,leva]";
+dilba = "[dilba]";
+docent_dod = "[docent,dod]";
+dr_alban = "[dr,alban]";
+ebba_gron = "[ebba,gron]";
+eldkvarn = "[eldkvarn]";
+eric_gadd = "[eric,gadd]";
+eva_dahlgren = "[eva,dahlgren]";
+freda = "[freda]";
+gyllende_tider = "[gyllende,tider]";
+imperiet = "[imperiet]";
+irma = "[irma]";
+jakob_hellman = "[jakob,hellman]";
+jumper = "[jumper]";
+kent = "[kent]";
+lars_winnerback = "[lars,winnerback]";
+lisa_ekdahl = "[lisa,ekdahl]";
+lisa_nilsson = "[lisa,nilsson]";
+lolita_pop = "[lolita,pop]";
+lustans_lakejer = "[lustans,lakejer]";
+marie_fredriksson = "[marie,fredriksson]";
+mauro_scocco = "[mauro,scocco]";
+mikael_rickfors = "[mikael,rickfors]";
+mikael_wiehe = "[mikael,wiehe]";
+monica_tornell = "[monica,tornell]";
+nordman = "[nordman]";
+norum_och_nilsson = "[norum,och,nilsson]";
+orup = "[orup]";
+patrik_isaksson = "[patrik,isaksson]";
+peter_lemarc = "[peter,lemarc]";
+petter = "[petter]";
+peps_persson = "[peps,persson]";
+ratata = "[ratata]";
+robyn = "[robyn]";
+roger_pontare = "[roger,pontare]";
+roxette = "[roxette]";
+staffan_hellstrand = "[staffan,hellstrand]";
+stakka_bo = "[stakka_bo]";
+stefan_andersson = "[stefan,andersson]";
+stina_nordenstam = "[stina,nordenstam]";
+tomas_ledin = "[tomas,ledin]";
+ulf_lundell = "[ulf,lundell]";
+uno_svenningsson = "[uno,svenningsson]";
+viba_femba = "[viba,femba]";
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishArtistsSwe.gf

@@ -0,0 +1,55 @@
+concrete SwedishArtistsSwe of SwedishArtists = {
+
+pattern
+
+abba = ["abba"];
+adolphson_och_falk = ["adolphson och falk"];
+anne_lie_ryde = ["anne-lie rydé"];
+bo_kaspers_orkester = ["bo kaspers orkester"];
+christer_sandelin = ["christer sandelin"];
+dan_hylander_och_rmb = ["dan hylander och rmb"];
+di_leva = ["di leva"];
+dilba = ["dilba"];
+docent_dod = ["docent död"];
+dr_alban = ["dr alban"];
+ebba_gron = ["ebba grön"];
+eldkvarn = ["eldkvarn"];
+eric_gadd = ["eric gadd"];
+eva_dahlgren = ["eva dahlgren"];
+freda = ["freda"];
+gyllende_tider = ["gyllene tider"];
+imperiet = ["imperiet"];
+irma = ["irma"];
+jakob_hellman = ["jakob hellman"];
+jumper = ["jumper"];
+kent = ["kent"];
+lars_winnerback = ["lars winnerbäck"];
+lisa_ekdahl = ["lisa ekdahl"];
+lisa_nilsson = ["lisa nilsson"];
+lolita_pop = ["lolita pop"];
+lustans_lakejer = ["lustans lakejer"];
+marie_fredriksson = ["marie fredriksson"];
+mauro_scocco =  ["mauro scocco"];
+mikael_rickfors =  ["mikael rickfors"];
+mikael_wiehe =  ["mikael wiehe"];
+monica_tornell =  ["monica törnell"];
+nordman =  ["nordman"];
+norum_och_nilsson =  ["norum och nilsson"];
+orup =  ["orup"];
+patrik_isaksson =  ["patrik isaksson"];
+peter_lemarc =  ["peter lemarc"];
+petter =  ["petter"];
+peps_persson =  ["peps persson"];
+ratata =  ["ratata"];
+robyn =  ["robyn"];
+roger_pontare =  ["roger pontare"];
+roxette =  ["roxette"];
+staffan_hellstrand =  ["staffan hellstrand"];
+stakka_bo =  ["stakka_bo"];
+stefan_andersson =  ["stefan andersson"];
+stina_nordenstam =  ["stina nordenstam"];
+tomas_ledin =  ["tomas ledin"];
+ulf_lundell =  ["ulf lundell"];
+uno_svenningsson =  ["uno svenningsson"];
+viba_femba =  ["viba femba"];
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishRadioStations.gf

@@ -0,0 +1,12 @@
+abstract SwedishRadioStations = {
+
+cat Station;
+
+fun
+
+lugna_favoriter		: Station;
+sveriges_radio		: Station;
+mix_megapol		: Station;
+stockholm		: Station;
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishRadioStationsPro.gf

@@ -0,0 +1,10 @@
+concrete SwedishRadioStationsPro of SwedishRadioStations = {
+
+pattern
+
+lugna_favoriter		= "[lugna,favoriter]";
+sveriges_radio		= "[sveriges,radio]";
+mix_megapol		= "[mix,megapol]";
+stockholm		= "[stockholm,närradio]";
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishRadioStationsSwe.gf

@@ -0,0 +1,10 @@
+concrete SwedishRadioStationsSwe of SwedishRadioStations = {
+
+pattern
+
+lugna_favoriter		= ["lugna favoriter"];
+sveriges_radio		= ["sveriges radio"];
+mix_megapol		= ["mix megapol"];
+stockholm		= ["stockholm närradio"];
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishSongs.gf

@@ -0,0 +1,58 @@
+abstract SwedishSongs = {
+
+cat Song;
+
+fun
+
+blinkar_bla 			: Song;
+segla_pa_ett_moln 		: Song;
+undantag 			: Song;
+det_hon_vill_ha 		: Song;
+skuggor_i_skymningen 		: Song;
+vem_ska_jag_tro_pa 		: Song;
+solglasogon 			: Song;
+atta_hundra_grader 		: Song;
+karlekens_tunga 		: Song;
+angeln_i_rummet 		: Song;
+vem_tander_stjarnorna 		: Song;
+vindarna 			: Song;
+flickorna_pa_tv_tva 		: Song;
+du_ska_va_president 		: Song;
+precis_som_du 			: Song;
+vara_vanner 			: Song;
+om_du_var_har 			: Song;
+kom_ihag_mig 			: Song;
+vem_vet 			: Song;
+himlen_runt_hornet 		: Song;
+diamanter 			: Song;
+efter_stormen 			: Song;
+det_finns 			: Song;
+sarah 				: Song;
+vingar 				: Song;
+flickan_och_krakan 		: Song;
+vintersaga 			: Song;
+allt_som_jag_kanner 		: Song;
+jag_blir_hellre_jagad_av_vargar : Song;
+du_far_gora_som_du_vill 	: Song;
+hall_om_mig 			: Song;
+sag_som_det_ar 			: Song;
+vinden_har_vant 		: Song;
+jackie 				: Song;
+lilla_fagel_bla 		: Song;
+sommaren_ar_kort 		: Song;
+en_del_av_mitt_hjarta 		: Song;
+oppna_landskap 			: Song;
+under_ytan 			: Song;
+teknikens_under 		: Song;
+tva_av_oss 			: Song;
+vandraren 			: Song;
+under_norrskenet 		: Song;
+vill_ha_mer 			: Song;
+flykting 			: Song;
+sanningens_krigare 		: Song;
+i_vargens_spar 			: Song;
+nu_tandas_tusen_julejus 	: Song;
+alla_alskar_dig 		: Song;
+hon_far 			: Song;
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishSongsPro.gf

@@ -0,0 +1,56 @@
+concrete SwedishSongsPro of SwedishSongs = {
+
+pattern
+
+blinkar_bla = "[blinkar,blå]";
+segla_pa_ett_moln = "[segla,på,ett,moln]";
+undantag = "[undantag]";
+det_hon_vill_ha = "[det,hon,vill,ha]";
+skuggor_i_skymningen = "[skuggor,i,skymningen]";
+vem_ska_jag_tro_pa = "[vem,ska,jag,tro,på]";
+solglasogon = "[solglasögon]";
+atta_hundra_grader = "[åtta,hundra,grader]";
+karlekens_tunga = "[kärlekens,tunga]";
+angeln_i_rummet = "[ängeln,i,rummet]";
+vem_tander_stjarnorna = "[vem,tänder,stjärnorna]";
+vindarna = "[vindarna]";
+flickorna_pa_tv_tva = "[flickorna,på,tv,två]";
+du_ska_va_president = "[du,ska,va,president]";
+precis_som_du = "[precis,som,du]";
+vara_vanner = "[vara,vänner]";
+om_du_var_har = "[om,du,var,här]";
+kom_ihag_mig = "[kom,ihåg,mig]";
+vem_vet = "[vem,vet]";
+himlen_runt_hornet = "[himlen,runt,hörnet]";
+diamanter = "[diamanter]";
+efter_stormen = "[efter,stormen]";
+det_finns = "[det,finns]";
+sarah = "[sarah]";
+vingar = "[vingar]";
+flickan_och_krakan = "[flickan,och,kråkan]";
+vintersaga = "[vintersaga]";
+allt_som_jag_kanner = "[allt,som,jag,känner]";
+jag_blir_hellre_jagad_av_vargar = "[jag,blir,hellre,jagad,av,vargar]";
+du_far_gora_som_du_vill = "[du,får,göra,som,du,vill]";
+hall_om_mig = "[håll,om,mig]";
+sag_som_det_ar = "[säg,som,det,är]";
+vinden_har_vant = "[vinden,har,vänt]";
+jackie = "[jackie]";
+lilla_fagel_bla = "[lilla,fågel,blå]";
+sommaren_ar_kort = "[sommaren,är,kort]";
+en_del_av_mitt_hjarta = "[en,del,av,mitt,hjärta]";
+oppna_landskap = "[öppna,landskap]";
+under_ytan = "[under,ytan]";
+teknikens_under = "[teknikens,under]";
+tva_av_oss = "[två,av,oss]";
+vandraren = "[vandraren]";
+under_norrskenet = "[under,norrskenet]";
+vill_ha_mer = "[vill,ha,mer]";
+flykting = "[flykting]";
+sanningens_krigare = "[sanningens,krigare]";
+i_vargens_spar = "[i,vargens,spår]";
+nu_tandas_tusen_julejus = "[nu,tändas,tusen,julejus]";
+alla_alskar_dig = "[alla,älskar,dig]";
+hon_far = "[hon,får]";
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/Swedish/SwedishSongsSwe.gf

@@ -0,0 +1,56 @@
+concrete SwedishSongsSwe of SwedishSongs = {
+
+pattern
+
+blinkar_bla =  ["blinkar blå"];
+segla_pa_ett_moln =  ["segla på ett moln"];
+undantag =  ["undantag"];
+det_hon_vill_ha =  ["det hon vill ha"];
+skuggor_i_skymningen =  ["skuggor i skymningen"];
+vem_ska_jag_tro_pa =  ["vem ska jag tro på"];
+solglasogon =  ["solglasögon"];
+atta_hundra_grader =  ["åtta hundra grader"];
+karlekens_tunga =  ["kärlekens tunga"];
+angeln_i_rummet =  ["ängeln i rummet"];
+vem_tander_stjarnorna =  ["vem tänder stjärnorna"];
+vindarna =  ["vindarna"];
+flickorna_pa_tv_tva =  ["flickorna på tv två"];
+du_ska_va_president =  ["du ska va president"];
+precis_som_du =  ["precis som du"];
+vara_vanner =  ["vara vänner"];
+om_du_var_har =  ["om du var här"];
+kom_ihag_mig =  ["kom ihåg mig"];
+vem_vet =  ["vem vet"];
+himlen_runt_hornet =  ["himlen runt hörnet"];
+diamanter =  ["diamanter"];
+efter_stormen =  ["efter stormen"];
+det_finns =  ["det finns"];
+sarah =  ["sarah"];
+vingar =  ["vingar"];
+flickan_och_krakan =  ["flickan och kråkan"];
+vintersaga =  ["vintersaga"];
+allt_som_jag_kanner =  ["allt som jag känner"];
+jag_blir_hellre_jagad_av_vargar =  ["jag blir hellre jagad av vargar"];
+du_far_gora_som_du_vill =  ["du får göra som du vill"];
+hall_om_mig =  ["håll om mig"];
+sag_som_det_ar =  ["säg som det är"];
+vinden_har_vant =  ["vinden har vänt"];
+jackie =  ["jackie"];
+lilla_fagel_bla =  ["lilla fågel blå"];
+sommaren_ar_kort =  ["sommaren är kort"];
+en_del_av_mitt_hjarta =  ["en del av mitt hjärta"];
+oppna_landskap =  ["öppna landskap"];
+under_ytan =  ["under ytan"];
+teknikens_under =  ["teknikens under"];
+tva_av_oss =  ["två av oss"];
+vandraren =  ["vandraren"];
+under_norrskenet =  ["under norrskenet"];
+vill_ha_mer =  ["vill ha mer"];
+flykting =  ["flykting"];
+sanningens_krigare =  ["sanningens krigare"];
+i_vargens_spar =  ["i vargens spår"];
+nu_tandas_tusen_julejus =  ["nu tändas tusen julejus"];
+alla_alskar_dig =  ["alla älskar dig"];
+hon_far =  ["hon får"];
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/TVStations.gf

@@ -0,0 +1,3 @@
+abstract TVStations = {
+
+}

grammars/TALK/GF_GoDiS/Resource/Media/TVStationsSwe.gf

@@ -0,0 +1,3 @@
+concrete TVStationsSwe of TVStations = {
+
+}

grammars/TALK/GF_GoDiS/Resource/Numbers/numbers.gf

@@ -0,0 +1,19 @@
+abstract numbers = {
+
+cat
+Number;
+
+fun
+one : Number;
+two : Number;
+three : Number;
+four : Number;
+five : Number;
+six : Number;
+seven : Number;
+eight : Number;
+nine : Number;
+ten : Number;
+
+--aNumber : Number;
+}

grammars/TALK/GF_GoDiS/Resource/Numbers/numbersEng.gf

@@ -0,0 +1,18 @@
+concrete numbersEng of numbers = {
+
+lincat
+Number = {s : Str};
+
+pattern
+one = "one";
+two = "two";
+three = "three";
+four = "four";
+five = "five";
+six = "six";
+seven = "seven";
+eight = "eight";
+nine = "nine";
+ten = "ten";
+
+}

grammars/TALK/GF_GoDiS/Resource/Numbers/numbersPro.gf

@@ -0,0 +1,18 @@
+concrete numbersPro of numbers = {
+
+lincat
+Number = {s : Str};
+
+pattern
+one = "1";
+two = "2";
+three = "3";
+four = "4";
+five = "5";
+six = "6";
+seven = "7";
+eight = "8";
+nine = "9";
+ten = "10";
+
+}

grammars/TALK/GF_GoDiS/Resource/Numbers/numbersSwe.gf

@@ -0,0 +1,20 @@
+concrete numbersSwe of numbers = {
+
+lincat
+Number = {s : Str};
+
+pattern
+one = "ett";
+two = "två";
+three = "tre";
+four = "fyra";
+five = "fem";
+six = "sex";
+seven = "sju";
+eight = "åtta";
+nine = "nio";
+ten = "tio";
+
+--aNumber = "NUMMER";
+
+}

grammars/TALK/GF_GoDiS/Resource/Numbers/orderNum.gf

@@ -0,0 +1,19 @@
+abstract orderNum = {
+
+cat
+OrderNumber;
+
+fun
+first : OrderNumber;
+second : OrderNumber;
+third : OrderNumber;
+fourth : OrderNumber;
+fifth : OrderNumber;
+sixth : OrderNumber;
+seventh : OrderNumber;
+eighth : OrderNumber;
+ninth : OrderNumber;
+tenth : OrderNumber;
+
+--anOrder : OrderNumber;
+}

grammars/TALK/GF_GoDiS/Resource/Numbers/orderNumEng.gf

@@ -0,0 +1,18 @@
+concrete orderNumEng of orderNum = {
+
+lincat
+OrderNumber = {s : Str};
+
+pattern
+first = "first" ;
+second = "second" ;
+third = "third" ;
+fourth = "fourth" ;
+fifth = "fifth" ;
+sixth = "sixth" ;
+seventh = "seventh" ;
+eighth = "eight" ;
+ninth = "ninth" ; 
+tenth = "tenth" ; 
+
+}

grammars/TALK/GF_GoDiS/Resource/Numbers/orderNumPro.gf

@@ -0,0 +1,18 @@
+concrete orderNumPro of orderNum = {
+
+lincat
+OrderNumber = {s : Str};
+
+pattern
+first = "1" ;
+second = "2" ;
+third = "3" ;
+fourth = "4" ;
+fifth = "5" ;
+sixth = "6" ;
+seventh = "7" ;
+eighth = "8" ;
+ninth = "9" ; 
+tenth = "10" ; 
+
+}

grammars/TALK/GF_GoDiS/Resource/Numbers/orderNumSwe.gf

@@ -0,0 +1,20 @@
+concrete orderNumSwe of orderNum = {
+
+lincat
+OrderNumber = {s : Str};
+
+pattern
+first = "första" ;
+second = "andra" ;
+third = "tredje" ;
+fourth = "fjärde" ;
+fifth = "femte" ;
+sixth = "sjätte" ;
+seventh = "sjunde" ;
+eighth = "åttonde" ;
+ninth = "nionde" ; 
+tenth = "tionde" ;
+
+--anOrder = "ORDERNUMBER"; 
+
+}

grammars/TALK/GF_GoDiS/Resource/Time/ResEng.gf

@@ -0,0 +1,12 @@
+resource ResEng = {
+
+param RefHour = ThisFormal | ThisLex | NextLex ;
+oper refs : Str -> Str -> Str -> RefHour => Str = 
+	\x,y,z -> table {ThisFormal => x ; ThisLex => y ; NextLex => z } ; 
+param MinMin = Form | Past | To ;
+oper mins : Str -> Str -> Str -> MinMin => Str = \x,y,z -> table {Form => x ; Past => y ; To => z } ; 
+--oper mins : Str -> Str -> Str -> MinMin => Str = \x,y,z -> table {Form => x ; Past => y ; To => z } ; 
+-- jag vill ha en variantsexpanderare, tänk tänk
+--oper mins : Str -> Str -> Str -> MinMin => Str = \x,y,z -> table {Form => (variants{x}) ; Past => (variants{y}) ; To => (variants{z}) } ; 
+-- Time expressions
+}

grammars/TALK/GF_GoDiS/Resource/Time/ResProlog.gf

@@ -0,0 +1,24 @@
+resource ResProlog = {
+oper
+--with single quotes
+--app2 : Str -> Str -> Str -> Str = \pred -> \argH -> \argM -> pred ++ "(" ++ "'" ++ argH ++ ":" ++ argM ++ "'" ++ ")" ;
+--without single quotes
+--app2 : Str -> Str -> Str -> Str = \pred -> \argH -> \argM -> pred ++ "(" ++ argH ++ ":" ++ argM ++ ")" ;
+
+app3 : Str -> Str -> Str = \argH -> \argM -> argH ++ ":" ++ argM ;
+
+oper
+app : Str -> Str -> Str = 
+		\pred -> \arg -> 
+		pred ++ "(" ++ arg ++ ")" ;
+
+appHakeOne : Str -> Str = 
+		\arg -> 
+		"["++ arg ++ "]" ;
+
+appCurlyOne : Str -> Str = 
+		\arg -> 
+		"{"++ arg ++"}" ;
+
+}
+

grammars/TALK/GF_GoDiS/Resource/Time/ResourceSwe.gf

@@ -0,0 +1,10 @@
+resource ResourceSwe = {
+
+param RefHour = ThisFormal | ThisLex | NextLex ;
+oper refs : Str -> Str -> Str -> RefHour => Str = \x,y,z -> table {ThisFormal => x ; ThisLex => y ; NextLex => z } ; 
+
+
+param MinMin = Form | Past | To ;
+oper mins : Str -> Str -> Str -> MinMin => Str = \u,x,y -> table {Form => u ; Past => x ; To => y } ; 
+}
+

grammars/TALK/GF_GoDiS/Resource/Time/Time.gf

@@ -0,0 +1,103 @@
+abstract Time = {
+cat 
+
+-- Times
+Time ; 
+Hour ; 
+Minute ; 
+
+fun
+-- Time
+hour0 : Hour ;
+hour1 : Hour ;
+hour2 : Hour ;
+hour3 : Hour ;
+hour4 : Hour ;
+hour5 : Hour ;
+hour6 : Hour ;
+hour7 : Hour ;
+hour8 : Hour ;
+hour9 : Hour ;
+hour10 : Hour ;
+hour11 : Hour ;
+hour12 : Hour ;
+hour13 : Hour ;
+hour14 : Hour ;
+hour15 : Hour ;
+hour16 : Hour ;
+hour17 : Hour ;
+hour18 : Hour ;
+hour19 : Hour ;
+hour20 : Hour ;
+hour21 : Hour ;
+hour22 : Hour ; 
+hour23 : Hour ;
+
+-- Minutes
+minute0 : Minute ;
+minute1 : Minute ;
+minute2 : Minute ;
+minute3 : Minute ;
+minute4 : Minute ;
+minute5 : Minute ;
+minute6 : Minute ;
+minute7 : Minute ;
+minute8 : Minute ;
+minute9 : Minute ;
+minute10 : Minute ;
+minute11 : Minute ;
+minute12 : Minute ;
+minute13 : Minute ;
+minute14 : Minute ;
+minute15 : Minute ;
+minute16 : Minute ;
+minute17 : Minute ;
+minute18 : Minute ;
+minute19 : Minute ;
+minute20 : Minute ;
+minute21 : Minute ;
+minute22 : Minute ;
+minute23 : Minute ;
+minute24 : Minute ;
+minute25 : Minute ;
+minute26 : Minute ;
+minute27 : Minute ;
+minute28 : Minute ;
+minute29 : Minute ;
+minute30 : Minute ;
+minute31 : Minute ;
+minute32 : Minute ;
+minute33 : Minute ;
+minute34 : Minute ;
+minute35 : Minute ;
+minute36 : Minute ;
+minute37 : Minute ;
+minute38 : Minute ;
+minute39 : Minute ;
+minute40 : Minute ;
+minute41 : Minute ;
+minute42 : Minute ;
+minute43 : Minute ;
+minute44 : Minute ;
+minute45 : Minute ;
+minute46 : Minute ;
+minute47 : Minute ;
+minute48 : Minute ;
+minute49 : Minute ;
+minute50 : Minute ;
+minute51 : Minute ;
+minute52 : Minute ;
+minute53 : Minute ;
+minute54 : Minute ;
+minute55 : Minute ;
+minute56 : Minute ;
+minute57 : Minute ;
+minute58 : Minute ;
+minute59 : Minute ;
+
+-- Time expressions
+--timeFormal : Hour -> Minute -> Time ;
+--timeInformal : Hour -> Minute -> Time ;
+time : Hour -> Minute -> Time ;
+
+}

grammars/TALK/GF_GoDiS/Resource/Time/TimeEng.gf

@@ -0,0 +1,122 @@
+-- Time grammar English
+
+concrete TimeEng of Time = open ResEng in {
+
+lin
+hour0 = {s = refs ["null null"] (variants {["midnight"];["twelve"]}) "one"} ;
+hour1 = {s = refs "one" (variants {["one"];["one a.m"]}) "two"} ; 
+hour2 = {s = refs "two" (variants {["two"];["two a.m"]}) "three"} ; 
+hour3 = {s = refs "three" (variants {["three"];["three a.m"]}) "four"} ; 
+hour4 = {s = refs "four" (variants {["four"];["four a.m"]}) "five"} ; 
+hour5 = {s = refs "five" (variants {["five"];["five a.m"]}) "six"} ; 
+hour6 = {s = refs "six" (variants {["six"];["six a.m"]}) "seven"} ; 
+hour7 = {s = refs "seven" (variants {["seven"];["seven a.m"]}) "eight"} ; 
+hour8 = {s = refs "eight" (variants {["eight"];["eight a.m"]}) "nine"} ; 
+hour9 = {s = refs "nine" (variants {["nine"];["nine a.m"]}) "ten"} ; 
+hour10 = {s = refs "ten" (variants {["ten"];["ten a.m"]}) "eleven"} ; 
+hour11 = {s = refs "eleven" (variants {["eleven"];["eleven a.m"]}) "twelve"} ; 
+hour12 = {s = refs "twelve" (variants {["twelve"];["twelve a.m"]}) "one" } ; 
+hour13 = {s = refs "thirten" (variants {["one"];["one p.m"]}) "two" };
+hour14 = {s = refs "fourteen" (variants {["two"];["two p.m"]}) "three" } ;
+hour15 = {s = refs "fifteen" (variants {["three"];["three p.m"]}) "four" } ;
+hour16 = {s = refs "sixteen" (variants {["four"];["four p.m"]}) "five" } ;
+hour17 = {s = refs "seventeen" (variants {["five"];["five p.m"]}) "six" } ;
+hour18 = {s = refs "eighteen" (variants {["six"];["six p.m"]}) "seven" } ;
+hour19 = {s = refs "nineteen" (variants {["seven"];["seven p.m"]}) "eight" } ;
+hour20 = {s = refs "twenty" (variants {["eight"];["eight p.m"]}) "nine" } ;
+hour21 = {s = refs ["twenty one"] (variants {["nine"];["nine p.m"]}) "eight" } ; 
+hour22 = {s = refs ["twenty two"] (variants {["ten"];["ten p.m"]}) "eleven" } ;
+hour23 = {s = refs ["twenty three"] (variants {["eleven"]}) (variants {["midnight"];["twelve"]})} ;
+
+
+lin
+
+minute0 = {s = mins (variants {["o'clock"];["sharp"];["hundred hours"]}) (variants{[""]}) (variants{})};
+minute1 = {s = mins ["oh one"] (variants{["one minute past"];["one past"]}) (variants{})};
+minute2 = {s = mins ["oh two"] (variants{["two minutes past"];["two past"]}) (variants{})};
+minute3 = {s = mins ["oh three"] (variants{["three minutes past"];["three past"]}) (variants{})};
+minute4 = {s = mins ["oh four"] (variants{["four minutes past"];["four past"]}) (variants{})};
+minute5 = {s = mins ["oh five"] (variants{["five minutes past"];["five past"]}) (variants{})};
+minute6 = {s = mins ["oh six"] (variants{["six minutes past"];["six past"]}) (variants{})};
+minute7 = {s = mins ["oh seven"] (variants{["seven minutes past"];["seven past"]}) (variants{})};
+minute8 = {s = mins ["oh eight"] (variants{["eight minutes past"];["eight past"]}) (variants{})};
+minute9 = {s = mins ["oh nine"] (variants{["nine minutes past"];["nine past"]}) (variants{})};
+
+minute10 = {s = mins ["ten"] (variants{["ten minutes past"];["ten past"]}) (variants{})};
+minute11 = {s = mins ["eleven"] (variants{["eleven minutes past"];["eleven past"]}) (variants{})};
+minute12 = {s = mins ["twelve"] (variants{["twelve minutes past"];["twelve past"]}) (variants{})};
+minute13 = {s = mins ["thirteen"] (variants{["thirteen minutes past"];["thirteen past"]}) (variants{})};
+minute14 = {s = mins ["fourteen"] (variants{["fourteen minutes past"];["fourteen past"]}) (variants{})};
+minute15 = {s = mins ["fifteen"] (variants{["fifteen minutes past"];["fifteen past"];["quarter past"];["a quarter past"]}) (variants{})};
+minute16 = {s = mins ["sixteen"] (variants{["sixteen minutes past"];["sixteen past"]}) (variants{})};
+minute17 = {s = mins ["seventeen"] (variants{["seventeen minutes past"];["seventeen past"]}) (variants{})};
+minute18 = {s = mins ["eightteen"] (variants{["eighteen minutes past"];["eighteen past"]}) (variants{})};
+minute19 = {s = mins ["nineteen"] (variants{["nineteen minutes past"];["nineteen past"]}) (variants{})};
+
+minute20 = {s = mins ["twenty"] (variants{["twenty minutes past"];["twenty past"]}) (variants{})};
+minute21 = {s = mins ["twenty one"] (variants{["twenty one minutes past"];["twenty one past"]}) (variants{})};
+minute22 = {s = mins ["twenty two"] (variants{["twenty two minutes past"];["twenty two past"]}) (variants{})};
+minute23 = {s = mins ["twenty three"] (variants{["twenty three minutes past"];["twenty three past"]}) (variants{})};
+minute24 = {s = mins ["twenty four"] (variants{["twenty four minutes past"];["twenty four past"]}) (variants{})};
+minute25 = {s = mins ["twenty five"] (variants{["twenty five minutes past"];["twenty two five past"]}) (variants{})};
+minute26 = {s = mins ["twenty six"] (variants{["twenty six minutes past"];["twenty six past"]}) (variants{})};
+minute27 = {s = mins ["twenty seven"] (variants{["twenty seven minutes past"];["twenty seven past"]}) (variants{})};
+minute28 = {s = mins ["twenty eight"] (variants{["twenty eight minutes past"];["twenty eight past"]}) (variants{})};
+minute29 = {s = mins ["twenty nine"] (variants{["twenty nine minutes past"];["twenty nine past"]}) (variants{})};
+
+minute30 = {s = mins ["thirty"] (variants{["thirty minutes past"];["thirty past"];["half past"]}) (variants{})};
+
+minute31 = {s = mins ["thirty one"] (variants{["one minute past half past????"]}) (variants{["twenty nine minutes to"];["twenty nine to"]})};
+minute32 = {s = mins ["thirty two"] (variants{}) (variants{["twenty eight minutes to"];["twenty eight to"]})};
+minute33 = {s = mins ["thirty three"] (variants{}) (variants{["twenty seven minutes to"];["twenty seven to"]})};
+minute34 = {s = mins ["thirty four"] (variants{}) (variants{["twenty six minutes to"];["twenty six to"]})};
+minute35 = {s = mins ["thirty five"] (variants{}) (variants{["twenty five minutes to"];["twenty five to"]})};
+minute36 = {s = mins ["thirty six"] (variants{}) (variants{["twenty four minutes to"];["twenty four to"]})};
+minute37 = {s = mins ["thirty seven"] (variants{}) (variants{["twenty three minutes to"];["twenty three to"]})};
+minute38 = {s = mins ["thirty eight"] (variants{}) (variants{["twenty two minutes to"];["twenty two to"]})};
+minute39 = {s = mins ["thirty nine"] (variants{}) (variants{["twenty one minutes to"];["twenty one to"]})};
+minute40 = {s = mins ["fourty"] (variants{}) (variants{["twenty minutes to"];["twenty to"]})};
+
+minute41 = {s = mins ["fourty one"] (variants{}) (variants{["nineteen minutes to"];["nineteen to"]})};
+minute42 = {s = mins ["fourty two"] (variants{}) (variants{["eightteen minutes to"];["eightteen to"]})};
+minute43 = {s = mins ["fourty three"] (variants{}) (variants{["seventeen minutes to"];["seventeen to"]})};
+minute44 = {s = mins ["fourty four"] (variants{}) (variants{["sixteen minutes to"];["sixteen to"]})};
+minute45 = {s = mins ["fourty five"] (variants{["three quarters past???"]}) (variants{["fifteen minutes to"];["fifteen to"]})};
+minute46 = {s = mins ["fourty six"] (variants{}) (variants{["fourteen minutes to"];["fourteen to"]})};
+minute47 = {s = mins ["fourty seven"] (variants{}) (variants{["thirteen minutes to"];["thirteen to"]})};
+minute48 = {s = mins ["fourty eight"] (variants{}) (variants{["twelve minutes to"];["twelve to"]})};
+minute49 = {s = mins ["fourty nine"] (variants{}) (variants{["eleven minutes to"];["eleven to"]})};
+minute50 = {s = mins ["fifty"] (variants{}) (variants{["ten minutes to"];["ten to"]})};
+
+minute51 = {s = mins ["fifty one"] (variants{}) (variants{["nine minutes to"];["nine to"]})};
+minute52 = {s = mins ["fifty two"] (variants{}) (variants{["eight minutes to"];["eight to"]})};
+minute53 = {s = mins ["fifty three"] (variants{}) (variants{["seven minutes to"];["seven to"]})};
+minute54 = {s = mins ["fifty four"] (variants{}) (variants{["six minutes to"];["six to"]})};
+minute55 = {s = mins ["fifty five"] (variants{}) (variants{["five minutes to"];["five to"]})};
+minute56 = {s = mins ["fifty six"] (variants{}) (variants{["four minutes to"];["four to"]})};
+minute57 = {s = mins ["fifty seven"] (variants{}) (variants{["three minutes to"];["three to"]})};
+minute58 = {s = mins ["fifty eight"] (variants{}) (variants{["two minutes to"];["two to"]})};
+minute59 = {s = mins ["fifty nine"] (variants{}) (variants{["one minute to"];["one to"]})};
+
+
+
+lincat Hour = {s : RefHour => Str} ;
+lincat Minute = {s : MinMin => Str} ;
+
+
+lin 
+
+--timeFormal h m = {s = h.s ! ThisFormal ++ m.s ! Form} ;
+--timeInformal h m = {s = variants { 
+	--m.s ! Past ++ h.s ! ThisLex ; 
+	--m.s ! To ++ h.s ! NextLex
+	--} 
+       --};
+
+time h m = {s = variants { 
+	h.s ! ThisFormal ++ m.s ! Form ;
+	m.s ! Past ++ h.s ! ThisLex ; 
+	m.s ! To ++ h.s ! NextLex
+	} 
+       };
+}

grammars/TALK/GF_GoDiS/Resource/Time/TimeProlog.gf

@@ -0,0 +1,105 @@
+--File name TimeProlog
+-- Time grammar Prolog output notation
+--# -path=.:../Time
+concrete TimeProlog of Time = open ResProlog in {
+
+flags lexer=codelit ; unlexer=codelit ; startcat=Time ;
+--flags lexer=code ; unlexer=code ; startcat=Time ;
+
+pattern
+
+hour0 = "00" ; 
+hour1 = "01" ;
+hour2 = "02" ;
+hour3 = "03" ;
+hour4 = "04" ;
+hour5 = "05" ;
+hour6 = "06" ;
+hour7 = "07" ;
+hour8 = "08" ;
+hour9 = "09" ;
+hour10 = "10" ;
+hour11 = "11" ;
+hour12 = "12" ;
+hour13 = "13" ;
+hour14 = "14" ;
+hour15 = "15" ;
+hour16 = "16" ;
+hour17 = "17" ;
+hour18 = "18" ;
+hour19 = "19" ;
+hour20 = "20" ;
+hour21 = "21" ;
+hour22 = "22" ;
+hour23 = "23" ;
+
+--Minutes
+minute0 = "00" ;
+minute1 = "01" ;
+minute2 = "02" ;
+minute3 = "03" ;
+minute4 = "04" ;
+minute5 = "05" ;
+minute6 = "06" ;
+minute7 = "07" ;
+minute8 = "08" ;
+minute9 = "09" ;
+minute10 = "10" ;
+minute11 = "11" ;
+minute12 = "12" ;
+minute13 = "13" ;
+minute14 = "14" ;
+minute15 = "15" ;
+minute16 = "16" ;
+minute17 = "17" ;
+minute18 = "18" ;
+minute19 = "19" ;
+minute20 = "20" ;
+minute21 = "21" ;
+minute22 = "22" ;
+minute23 = "23" ;
+minute24 = "24" ;
+minute25 = "25" ;
+minute26 = "26" ;
+minute27 = "27" ;
+minute28 = "28" ;
+minute29 = "29" ;
+minute30 = "30" ;
+
+minute31 = "31" ;
+minute32 = "32" ;
+minute33 = "33" ;
+minute34 = "34" ;
+minute35 = "35" ;
+minute36 = "36" ;
+minute37 = "37" ;
+minute38 = "38" ;
+minute39 = "39" ;
+minute40 = "40" ;
+minute41 = "41" ;
+minute42 = "42" ;
+minute43 = "43" ;
+minute44 = "44" ;
+minute45 = "45" ;
+minute46 = "46" ;
+minute47 = "47" ;
+minute48 = "48" ;
+minute49 = "49" ;
+minute50 = "50" ;
+minute51 = "51" ;
+minute52 = "52" ;
+minute53 = "53" ;
+minute54 = "54" ;
+minute55 = "55" ;
+minute56 = "56" ;
+minute57 = "57" ;
+minute58 = "58" ;
+minute59 = "59" ;
+
+
+lin
+--timeFormal h m = {s = app2 "time" h.s m.s } ;
+--timeInformal h m = {s = app2 "time" h.s m.s } ;
+--time h m = {s = app2 "time" h.s m.s } ;
+time h m = {s = app3 h.s m.s } ;
+}

grammars/TALK/GF_GoDiS/Resource/Time/TimeSwe.gf

@@ -0,0 +1,163 @@
+-- File name TimeSwe
+
+--# -path=.:..:../Time:../Weekday
+concrete TimeSwe of Time = open ResourceSwe in {
+
+--Hours
+lin
+
+--hour0 = {s = refs (variants{["noll noll"];["noll"]}) "tolv" "ett"} ; 
+hour0 = {s = refs (variants{["noll noll"];["noll"]})(variants{}) (variants{})} ; 
+hour1 = {s = refs ["noll ett"] "ett" "två"} ; 
+hour2 = {s = refs ["noll två"] "två" "tre"} ; 
+hour3 = {s = refs ["noll tre"] "tre" "fyra"} ; 
+hour4 = {s = refs ["noll fyra"] "fyra" "fem"} ; 
+hour5 = {s = refs ["noll fem"] "fem" "sex"} ; 
+hour6 = {s = refs ["noll sex"] "sex" "sju"} ; 
+hour7 = {s = refs ["noll sju"] "sju" "åtta"} ; 
+hour8 = {s = refs ["noll åtta"] "åtta" "nio"} ; 
+hour9 = {s = refs ["noll nio"] "nio" "tio"} ; 
+hour10 = {s = refs "tio" "tio" "elva"} ; 
+hour11 = {s = refs "elva""elva" "tolv"} ; 
+hour12 = {s = refs "tolv" "tolv" "ett" } ;
+ 
+hour13 = {s = refs "tretton" "ett" "två" };
+hour14 = {s = refs "fjorton" "två" "tre" };
+hour15 = {s = refs "femton" "tre" "fyra" };
+hour16 = {s = refs "sexton" "fyra" "fem" };
+hour17 = {s = refs "sjutton" "fem" "sex" };
+hour18 = {s = refs "arton" "sex" "sju" };
+hour19 = {s = refs "nitton" "sju" "åtta" } ;
+hour20 = {s = refs "tjugo" "åtta" "nio" } ;
+hour21 = {s = refs (variants{["tju ett"];["tjugo ett"]}) "nio" "tio" } ;
+hour22 = {s = refs (variants{["tju två"];["tjugo två"]}) "tio" "elva" } ;
+hour23 = {s = refs (variants{["tju tre"];["tjugo tre"]}) "elva" "tolv" };
+
+--Minutes
+--0-9
+--minute0 = {s = mins (variants{["noll noll"]}) (variants{}) (variants{}) (variants{[""]})} ;
+minute0 = {s = mins ["noll noll"] (variants{[""]}) (variants{})} ;
+minute1 = {s = mins ["noll ett"] (variants {["ett över"] ; ["en minut över"]}) (variants{}) } ;
+minute2 = {s = mins ["noll två"] (variants {["två över"] ; ["två minuter över"]}) (variants{})} ;
+minute3 = {s = mins ["noll tre"] (variants { ["tre över"] ; ["tre minuter över"]}) (variants{})} ;
+minute4 = {s = mins ["noll fyra"] (variants { ["fyra över"] ; ["fyra minuter över"]}) (variants{})} ;
+minute5 = {s = mins ["noll fem"] (variants { ["fem över"] ; ["fem minuter över"]}) (variants{})} ;
+minute6 = {s = mins ["noll sex"] (variants { ["sex över"] ; ["sex minuter över"]}) (variants{})} ;
+minute7 = {s = mins ["noll sju"] (variants { ["sju över"] ; ["sju minuter över"]}) (variants{})} ;
+minute8 = {s = mins ["noll åtta"] (variants { ["åtta över"] ; ["åtta minuter över"]}) (variants{})} ;
+minute9 = {s = mins ["noll nio"] (variants { ["nio över"] ; ["nio minuter över"]}) (variants{})} ;
+
+--10-19
+minute10 = {s = mins ["tio"] (variants { ["tio över"] ; ["tio minuter över"]}) (variants{})} ;
+minute11 = {s = mins ["elva"] (variants { ["elva över"] ; ["elva minuter över"]}) (variants{})} ;
+minute12 = {s = mins ["tolv"] (variants { ["tolv över"] ; ["tolv minuter över"]}) (variants{})} ;
+minute13 = {s = mins ["tretton"] (variants { ["tretton över"] ; ["tretton minuter över"]}) (variants{})} ;
+minute14 = {s = mins ["fjorton"] (variants { ["fjorton över"] ; ["fjorton minuter över"]}) (variants{})} ;
+minute15 = {s = mins ["femton"] (variants { ["femton över"] ; ["femton minuter över"] ; ["kvart över"]}) (variants{})} ;
+minute16 = {s = mins ["sexton"] (variants { ["sexton över"] ; ["sexton minuter över"]}) (variants{})} ;
+minute17 = {s = mins ["sjutton"] (variants { ["sjutton över"] ; ["sjutton minuter över"]}) (variants{})} ;
+minute18 = {s = mins ["arton"] (variants { ["arton över"] ; ["arton minuter över"]}) (variants{})} ;
+minute19 = {s = mins ["nitton"] (variants { ["nitton över"] ; ["nitton minuter över"]}) (variants{})} ;
+
+--20-29
+minute20 = {s = mins ["tjugo"] (variants { ["tjugo över"] ; ["tjugo minuter över"]}) (variants {})} ;
+minute21 = {s = mins (variants{["tju ett"];["tjugo ett"]}) (variants {["tju en över"];["tjugo en över"];["tju ett över"];["tjugo ett över"];["tju en minuter över"];["tjugo en minuter över"]}) (variants {}) } ;
+minute22 = {s = mins (variants{["tju två"];["tjugo två"]}) (variants {["tju två över"];["tjugo två över"];["tju två minuter över"];["tjugo två minuter över"]}) (variants {}) } ;
+minute23 = {s = mins (variants{["tju tre"];["tjugo tre"]}) (variants {["tju tre över"];["tjugo tre över"];["tju tre minuter över"];["tjugo tre minuter över"];}) (variants {}) } ;
+--minute23 = {s = mins ["tjugo tre"] (variants { ["tjugo tre över"] ; ["tjugo tre minuter över"]}) (variants {}) } ;
+minute24 = {s = mins (variants{["tju fyra"];["tjugo fyra"]}) (variants {["tju fyra över"];["tjugo fyra över"];["tju fyra minuter över"];["tjugo fyra minuter över"];}) (variants {["sex minuter i halv"];["sex i halv"]}) } ;
+--minute24 = {s = mins ["tjugo fyra"] (variants { ["tjugo fyra över"];["tjugo fyra minuter över"]}) (variants {["sex minuter i halv"];["sex i halv"]})} ;
+minute25 = {s = mins (variants{["tju fem"];["tjugo fem"]}) (variants {["tju fem över"];["tjugo fem över"];["tju fem minuter över"];["tjugo fem minuter över"];}) (variants {["fem minuter i halv"];["fem i halv"]}) } ;
+--minute25 = {s = mins ["tjugo fem"] (variants { ["tjugo fem över"] ; ["tjugo fem minuter över"]}) (variants {["fem minuter i halv"];["fem i halv"]}) } ;
+minute26 = {s = mins (variants{["tju sex"];["tjugo sex"]}) (variants {["tju sex över"];["tjugo sex över"];["tju sex minuter över"];["tjugo sex minuter över"];}) (variants {["fyra minuter i halv"];["fyra i halv"]}) } ;
+--minute26 = {s = mins ["tjugo sex"] (variants { ["tjugo sex över"] ; ["tjugo sex minuter över"]}) (variants {["fyra minuter i halv"];["fyra i halv"]}) } ;
+minute27 = {s = mins (variants{["tju sju"];["tjugo sju"]}) (variants {["tju sju över"];["tjugo sju över"];["tju sju minuter över"];["tjugo sju minuter över"];}) (variants {["tre minuter i halv"];["tre i halv"]}) } ;
+--minute27 = {s = mins ["tjugo sju"] (variants { ["tjugo sju över"] ; ["tjugo sju minuter över"]}) (variants {["tre minuter i halv"];["tre i halv"]}) } ;
+minute28 = {s = mins (variants{["tju åtta"];["tjugo åtta"]}) (variants {["tju åtta över"];["tjugo åtta över"];["tju åtta minuter över"];["tjugo åtta minuter över"];}) (variants {["två minuter i halv"];["två i halv"]}) } ;
+--minute28 = {s = mins ["tjugo åtta"] (variants { ["tjugo åtta över"] ; ["tjugo åtta minuter över"]}) (variants {["två minuter i halv"];["två i halv"]}) } ;
+minute29 = {s = mins (variants{["tju nio"];["tjugo nio"]}) (variants {["tju nio över"];["tjugo nio över"];["tju nio minuter över"];["tjugo nio minuter över"];}) (variants {["en minuter i halv"];["en i halv"]}) } ;
+--minute29 = {s = mins ["tjugo nio"] (variants { ["tjugo nio över"] ; ["tjugo nio minuter över"]}) (variants {["en minut i halv"];["en i halv"]}) } ;
+
+--30-39
+minute30 = {s = mins ["trettio"] (variants { ["trettio minuter över"]}) ["halv"] } ;
+minute31 = {s = mins ["trettio ett"] (variants { ["trettio en över"] ; ["trettio ett över"] ; ["trettio en minuter över"]}) (variants {["tjugo nio minuter i"];["tjugo nio i"];["en minut över halv"];["en över halv"]}) } ;
+minute32 = {s = mins ["trettio två"] (variants { ["trettio två över"] ; ["trettio två minuter över"]}) (variants {["tjugo åtta minuter i"];["tjugo åtta i"];["två minuter över halv"];["två över halv"]}) } ;
+minute33 = {s = mins ["trettio tre"] (variants { ["trettio tre över"] ; ["trettio tre minuter över"]}) (variants {["tjugo sju minuter i"];["tjugo sju i"];["tre minuter över halv"];["tre över halv"]}) } ;
+minute34 = {s = mins ["trettio fyra"] (variants { ["trettio fyra över"] ; ["trettio fyra minuter över"]}) (variants {["tjugo sex minuter i"];["tjugo sex i"];["fyra minuter över halv"];["fyra över halv"]}) } ;
+minute35 = {s = mins ["trettio fem"] (variants { ["trettio fem över"] ; ["trettio fem minuter över"]}) (variants {["tjugo fem minuter i"];["tjugo fem i"];["fem minuter över halv"]; ["fem över halv"]}) } ;
+minute36 = {s = mins ["trettio sex"] (variants { ["trettio sex över"] ; ["trettio sex minuter över"]}) (variants {["tjugo fyra minuter i"];["tjugo fyra i"];["sex minuter över halv"];["sex över halv"]}) } ;
+minute37 = {s = mins ["trettio sju"] (variants { ["trettio sju över"] ; ["trettio sju minuter över"]}) (variants {["tjugo tre minuter i"];["tjugo tre i"];["sju minuter över halv"];["sju över halv"]}) } ;
+minute38 = {s = mins ["trettio åtta"] (variants { ["trettio åtta över"] ; ["trettio åtta minuter över"]}) (variants {["tjugo två minuter i"];["tjugo två i"]}) } ;
+minute39 = {s = mins ["trettio nio"] (variants { ["trettio nio över"] ; ["trettio nio minuter över"]}) (variants {["tjugo en minuter i"];["tjugo en i"];["tjugo ett i"]}) } ;
+
+--40-49
+minute40 = {s = mins ["fyrtio"] (variants {}) (variants {["tjugo minuter i"];["tjugo i"]}) } ;
+minute41 = {s = mins ["fyrtio ett"] (variants {}) (variants {["nitton minuter i"];["nitton i"]}) } ;
+minute42 = {s = mins ["fyrtio två"] (variants {}) (variants {["arton minuter i"];["arton i"]}) } ;
+minute43 = {s = mins ["fyrtio tre"] (variants {}) (variants {["sjutton minuter i"];["sjutton i"]}) } ;
+minute44 = {s = mins ["fyrtio fyra"] (variants {}) (variants {["sexton minuter i"];["sexton i"]}) } ;
+minute45 = {s = mins (variants {["fyrtio fem"];["tre kvart"]}) (variants {}) (variants {["femton minuter i"];["femton i"];["kvart i"]}) } ;
+minute46 = {s = mins ["fyrtio sex"] (variants {}) (variants {["fjorton minuter i"];["fjorton i"]}) } ;
+minute47 = {s = mins ["fyrtio sju"] (variants {}) (variants {["tretton minuter i"];["tretton i"]}) } ;
+minute48 = {s = mins ["fyrtio åtta"] (variants {}) (variants {["tolv minuter i"];["tolv i"]}) } ;
+minute49 = {s = mins ["fyrtio nio"] (variants {}) (variants {["elva minuter i"];["elva i"]}) } ;
+
+--50-59
+minute50 = {s = mins ["femtio"] (variants {}) (variants {["tio minuter i"];["tio i"]}) } ;
+minute51 = {s = mins ["femtio ett"] (variants {}) (variants {["nio minuter i"];["nio i"]}) } ;
+minute52 = {s = mins ["femtio två"] (variants {}) (variants {["åtta minuter i"];["åtta i"]}) } ;
+minute53 = {s = mins ["femtio tre"] (variants {}) (variants {["sju minuter i"];["sju i"]}) } ;
+minute54 = {s = mins ["femtio fyra"] (variants {}) (variants {["sex minuter i"];["sex i"]}) } ;
+minute55 = {s = mins ["femtio fem"] (variants {}) (variants {["fem minuter i"];["fem i"]}) } ;
+minute56 = {s = mins ["femtio sex"] (variants {}) (variants {["fyra minuter i"];["fyra i"]}) } ;
+minute57 = {s = mins ["femtio sju"] (variants {}) (variants {["tre minuter i"];["tre i"]}) } ;
+minute58 = {s = mins ["femtio åtta"] (variants {}) (variants {["två minuter i"];["två i"]}) } ;
+minute59 = {s = mins ["femtio nio"] (variants {}) (variants {["en minut i"];["en i"];["ett i"]}) } ;
+
+lincat Hour = {s : RefHour => Str} ;
+
+lincat Minute = {s : MinMin => Str} ;
+
+-- Time expressions
+lin 
+--timeDotty h m = {s = h.s ! ThisLex ++ m.s ! Dot };
+--timeInformal h m = {s = variants { 
+	--m.s ! Past ++ h.s ! ThisLex ; 
+	--m.s ! To ++ h.s ! NextLex 
+	--} 
+       --};
+--timeFormal h m = {s = h.s ! ThisFormal ++ m.s ! Form} ;
+
+--klockan arton och tjugo
+--arton och tjugo
+--arton och
+--sex och
+
+time h m = {s = 
+     variants { 
+	h.s ! ThisFormal ++ m.s ! Form ;
+	h.s ! ThisFormal ++ "och" ++ m.s ! Form ;
+	m.s ! Past ++ h.s ! ThisLex ;
+	m.s ! To ++ h.s ! NextLex;
+	"klockan" ++ h.s ! ThisFormal ++ m.s ! Form ;
+	--"klockan" ++ h.s ! ThisFormal ++ "och" ++ m.s ! Form ;
+	"klockan" ++ m.s ! Past ++ h.s ! ThisLex ;
+	"klockan" ++ m.s ! To ++ h.s ! NextLex
+	} 
+       };
+
+}
+
+
+
+
+
+
+
+
+
+
+
+
+
+

grammars/TALK/GF_GoDiS/Resource/Time/Weekday.gf

@@ -0,0 +1,22 @@
+---File name Weekday.gf
+
+abstract Weekday = {
+
+cat
+Weekday ;
+Day ;
+
+fun
+monday : Weekday ;
+tuesday : Weekday ;
+wednesday : Weekday ;
+thursday : Weekday ;
+friday : Weekday ;
+saturday : Weekday ;
+sunday : Weekday ;
+
+fun
+today : Day ;
+tomorrow : Day;
+
+}

grammars/TALK/GF_GoDiS/Resource/Time/WeekdayEng.gf

@@ -0,0 +1,15 @@
+concrete WeekdayEng of Weekday = {
+
+pattern
+today = "today" ;
+monday = "monday" ;
+tuesday = "tuesday" ;
+wednesday = "wednesday" ;
+thursday = "thursday" ;
+friday = "friday" ;
+saturday = "saturday" ;
+sunday = "sunday" ;
+today = "today" ;
+tomorrow = "tomorrow" ;
+
+}

grammars/TALK/GF_GoDiS/Resource/Time/WeekdayProlog.gf

@@ -0,0 +1,19 @@
+--# -path=.:../Time
+
+---File name weekday.Swe.gf
+
+concrete WeekdayProlog of Weekday = {
+
+pattern
+
+monday = "monday" ;
+tuesday = "tuesday" ;
+wednesday = "wednesday" ;
+thursday = "thursday" ;
+friday = "friday" ;
+saturday = "saturday" ;
+sunday = "sunday" ;
+
+today = "today" ;
+tomorrow = "tomorrow";
+}

grammars/TALK/GF_GoDiS/Resource/Time/WeekdaySwe.gf

@@ -0,0 +1,16 @@
+concrete WeekdaySwe of Weekday = {
+
+pattern
+
+monday = "måndag" ;
+tuesday = "tisdag" ;
+wednesday = "onsdag" ;
+thursday = "torsdag" ;
+friday = "fredag" ;
+saturday = "lördag" ;
+sunday = "söndag" ;
+
+today = "idag" ;
+tomorrow = "imorgon" ;
+
+}