blob: 693a91565ab1a7273e3e02953faf1cea82fa1eef (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
% File tibadjusttsheg.otp
% Creation of the tsheg-mark after tibetan word
% Copyright (c) 1997 Norbert Preining
% this file is part of the otibet package.
%
% Killing wrong tshegs inserted at spaces by intib!
input: 2;
output: 2;
aliases:
c = ( @"0f00 | ( @"0f40 - @"0f47 ) | ( @"0f49 - @"0f69 ) | ( @"0f71 - @"0f8b )) ;
tsheg = ( @"0f0b ) ;
expressions:
^({c}) {tsheg} => \1 ;
|
