{ Ce schema decrit la presentation utilisee pour la saisie d une
	reference bibliographique

	  V. Quint - I. Vatton	Janvier 1987 }

PRESENTATION RefBib;

DEFAULT

   BEGIN
   HorizRef: Enclosed . HRef;
   VertRef: * . Left;
   Width: Enclosed . Width;
   Height: Enclosed . Height;
   HorizPos: Left = Previous . Right;
   VertPos: HRef = Previous . HRef;
   Visibility: Enclosing =;
   Font: Enclosing =;
   Style: Enclosing =;
   Size: Enclosing =;
   LineSpacing: Enclosing =;
   Justify: Enclosing =;
   Adjust: Enclosing =;
   Indent: Enclosing =;
   Depth: 0;
   UnderLine: Enclosing =;
   Thickness: Enclosing =;
   Background: Enclosing =;
   Foreground: Enclosing =;
   END;

BOXES

   VirguleBlanc:
	Content: Text ', ';

   Et:
#ifdef ENGLISH
	Content: Text ' and ';
#else
	Content: Text ' et ';
#endif

#ifdef FORM
   BoiteArticle:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Article in a journal';
#else
	Content: Text 'Article d''un journal';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Enclosing . Top;
	HorizPos: Left = Enclosing . Left;
	END;

   BoiteLivre:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Book';
#else
	Content: Text 'Livre';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Enclosing . Top;
	HorizPos: Left = Enclosing . Left;
	END;

   BoiteConference:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Article in proceedings';
#else
	Content: Text 'Article paru dans une conf\351rence';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Enclosing . Top;
	HorizPos: Left = Enclosing . Left;
	END;

   BoiteManuel:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Technical manual';
#else
	Content: Text 'Manuel technique';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Enclosing . Top;
	HorizPos: Left = Enclosing . Left;
	END;

   BoiteRapport:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Research report';
#else
	Content: Text 'Rapport publi\351 par un labo';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Enclosing . Top;
	HorizPos: Left = Enclosing . Left;
	END;

   BoiteThese:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Dissertation';
#else
	Content: Text 'Th\350se';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Enclosing . Top;
	HorizPos: Left = Enclosing . Left;
	END;

   BoiteIdent:
	BEGIN
	Content: Text 'Ident:';
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteNote:
	BEGIN
	Content: Text 'Notes:';
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteAuteurs:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Author(s):';
#else
	Content: Text 'Auteur(s):';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteTitre_Article:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Article title:';
#else
	Content: Text 'Titre de l''article:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteTitre_Journal:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Journal title:';
#else
	Content: Text 'Titre du journal:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteVolume:
	BEGIN
	Content: Text 'Volume:';
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteNumero:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Number:';
#else
	Content: Text 'Num\351ro:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoitePages:
	BEGIN
	Content: Text 'Pages:';
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteAnnee:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Year:';
#else
	Content: Text 'Ann\351e:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteMois:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Month:';
#else
	Content: Text 'Mois:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteTitre_Livre:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Book title:';
#else
	Content: Text 'Titre du livre:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoitePublie_par:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Publisher:';
#else
	Content: Text 'Publi\351 par:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteAdresse:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Address:';
#else
	Content: Text 'Adresse:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteEdite_par:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Editor:';
#else
	Content: Text 'Edit\351 par:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteTitre:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Title:';
#else
	Content: Text 'Titre:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteOrganisation:
	BEGIN
#ifdef ENGLISH
	Content: Text 'Organization:';
#else
	Content: Text 'Organisation:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteInstitution:
	BEGIN
	Content: Text 'Institution:';
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteType_these:
	BEGIN
#ifdef ENGLISH
#else
	Content: Text 'Type de th\350se:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;

   BoiteUniversite:
	BEGIN
#ifdef ENGLISH
#else
	Content: Text 'Universit\351:';
#endif
	Font: Helvetica;
	Style: Bold;
	VertPos: Top = Previous . Bottom + 0.2;
	HorizPos: Left = Enclosing . Left + 2;
	END;
#else

#ifdef CLE
   CrochetOuvr:
	Content: Text '[';

   CrochetFerm:
	Content: Text '] ';
#endif

   ParenthOuvr:
	Content: Text '(';

   ParenthFermPoint:
	Content: Text ').';

   ParenthFermVirgBl:
	Content: Text '), ';

   PP:
	Content: Text 'pp. ';

   Point:
	Content: Text '.';

   Edite_par:
#ifdef ENGLISH
	Content: Text 'edited by ';
#else
	Content: Text '\351dit\351 par ';
#endif

   Blanc:
	Content: Text ' ';

#ifndef ENGLISH
   OuvreGuill:
	Content: Text '``';

   FermeGuill:
	Content: Text ''''', ';
#endif
#endif

RULES

   RefBib:
	BEGIN
	Width: Enclosing . Width;
	VertPos: Top = Previous . Bottom + 0.5;
	HorizPos: Left = Enclosing . Left;
	Style: Roman;
	END;

   Article:
	BEGIN
#ifdef FORM
	CreateFirst(BoiteArticle);
	VertPos: Top = Previous . Bottom + 0.5;
	HorizPos: Left = Enclosing . Left;
#else
	Line;
#ifdef CLE
	Indent: -2;
#endif
#endif
	Width: Enclosing . Width;
	END;

   Livre:
	BEGIN
#ifdef FORM
	CreateFirst(BoiteLivre);
	VertPos: Top = Previous . Bottom + 0.5;
	HorizPos: Left = Enclosing . Left;
#else
	Line;
#ifdef CLE
	Indent: -2;
#endif
#endif
	Width: Enclosing . Width;
	END;

   Conf\351rence:
	BEGIN
#ifdef FORM
	CreateFirst(BoiteConference);
	VertPos: Top = Previous . Bottom + 0.5;
	HorizPos: Left = Enclosing . Left;
#else
	Line;
#ifdef CLE
	Indent: -2;
#endif
#endif
	Width: Enclosing . Width;
	END;

   Manuel:
	BEGIN
#ifdef FORM
	CreateFirst(BoiteManuel);
	VertPos: Top = Previous . Bottom + 0.5;
	HorizPos: Left = Enclosing . Left;
#else
	Line;
#ifdef CLE
	Indent: -2;
#endif
#endif
	Width: Enclosing . Width;
	END;

   Rapport:
	BEGIN
#ifdef FORM
	CreateFirst(BoiteRapport);
	VertPos: Top = Previous . Bottom + 0.5;
	HorizPos: Left = Enclosing . Left;
#else
	Line;
#ifdef CLE
	Indent: -2;
#endif
#endif
	Width: Enclosing . Width;
	END;

   Th\350se:
	BEGIN
#ifdef FORM
	CreateFirst(BoiteThese);
	VertPos: Top = Previous . Bottom + 0.5;
	HorizPos: Left = Enclosing . Left;
#else
	Line;
#ifdef CLE
	Indent: -2;
#endif
#endif
	Width: Enclosing . Width;
	END;

   Ident: BEGIN
#ifdef FORM
	CreateBefore(BoiteIdent);
	HorizPos: Left = Enclosing . Left + 7;
	Width: Enclosing . Width - 7;
	Line;
#else
#ifdef CLE
	CreateBefore(CrochetOuvr);
	CreateAfter(CrochetFerm);
#else
	Visibility: 0;
#endif
#endif
	END;

   Note: BEGIN
#ifdef FORM
	CreateBefore(BoiteNote);
	HorizPos: Left = Enclosing . Left + 7;
	Width: Enclosing . Width - 7;
	Line;
#else
	Visibility: 0;
#endif
	END;

#ifdef FORM
   Auteurs:
	BEGIN
	CreateBefore(BoiteAuteurs);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
	END;
#endif

   Auteur:
	BEGIN
	IF NOT First AND NOT Last CreateBefore (VirguleBlanc);
	IF Last AND NOT First CreateBefore (Et);
#ifndef FORM
	IF Last CreateAfter (VirguleBlanc);
#endif
	END;

   Titre_Article:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteTitre_Article);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
#ifdef ENGLISH
	CreateLast(VirguleBlanc);
#else
	CreateFirst(OuvreGuill);
	CreateLast(FermeGuill);
#endif
#endif
	END;

   Titre_Journal:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteTitre_Journal);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	Style: Italics;
	CreateLast(VirguleBlanc);
#endif
	END;

#ifdef FORM
   Volume:
	BEGIN
	CreateBefore(BoiteVolume);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
	END;
#endif

   Num\351ro:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteNumero);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	CreateFirst(ParenthOuvr);
	IF Last CreateLast(ParenthFermPoint);
	IF NOT Last CreateLast(ParenthFermVirgBl);
#endif
	END;

   Pages:
	BEGIN
#ifdef FORM
	CreateBefore(BoitePages);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	CreateFirst(PP);
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Ann\351e:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteAnnee);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Mois:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteMois);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(Blanc);
#endif
	END;

   Titre_Livre:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteTitre_Livre);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	Style: Italics;
#ifdef ENGLISH
	CreateLast(VirguleBlanc);
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
#endif
	END;

   Publi\351_par:
	BEGIN
#ifdef FORM
	CreateBefore(BoitePublie_par);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Adresse:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteAdresse);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Edit\351_par:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteEdite_par);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	CreateFirst(Edite_par);
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Titre:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteTitre);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	Style: Italics;
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Organisation:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteOrganisation);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Institution:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteInstitution);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Type_th\350se:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteType_these);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   Universit\351:
	BEGIN
#ifdef FORM
	CreateBefore(BoiteUniversite);
	HorizPos: Left = Enclosing . Left + 13;
	Width: Enclosing . Width - 13;
	Line;
#else
	IF Last CreateLast(Point);
	IF NOT Last CreateLast(VirguleBlanc);
#endif
	END;

   TEXT_UNIT:
	HorizRef: Enclosed . HRef;

   Indice:
	BEGIN
	PageBreak: No;
	LineBreak: No;
	HorizRef: Enclosed . HRef - 0.3;
	Size: Enclosing -2 min 1;
	END;

   Exposant:
	BEGIN
	PageBreak: No;
	LineBreak: No;
	HorizRef: Enclosed . HRef + 0.4;
	Size: Enclosing -2 min 1;
	END;

END