home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 November / CPNL0711.ISO / communic / email / Evolution-2.8.2-2.msi / Data1.cab / fortran.lang < prev    next >
Extensible Markup Language  |  2007-03-07  |  11KB  |  369 lines

  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <!DOCTYPE language SYSTEM "language.dtd">
  3. <language _name="Fortran 95" version="1.0" _section="Sources" mimetypes="text/x-fortran">
  4.     
  5.     <escape-char>\</escape-char>
  6.  
  7.     <!-- Note: contains an hack to avoid considering ^COMMON a comment -->
  8.     <line-comment _name = "Line Comment" style= "Comment">
  9.         <start-regex>!|(^[Cc](\b|[^Oo]))</start-regex>
  10.     </line-comment>
  11.  
  12.     <string _name = "String" style = "String" end-at-line-end = "TRUE">
  13.         <start-regex>"</start-regex>
  14.         <end-regex>"</end-regex>
  15.     </string>
  16.     <string _name = "String 2" style = "String" end-at-line-end = "TRUE">
  17.         <start-regex>'</start-regex>
  18.         <end-regex>'</end-regex>
  19.     </string>
  20.  
  21.     <keyword-list _name = "Operators" style = "Keyword"
  22.      case-sensitive = "FALSE"
  23.      match-empty-string-at-beginning = "FALSE"
  24.      match-empty-string-at-end = "FALSE"
  25.      beginning-regex = "\." end-regex = "\.">
  26.         <keyword>TRUE</keyword>
  27.         <keyword>FALSE</keyword>
  28.         <keyword>NOT</keyword>
  29.         <keyword>AND</keyword>
  30.         <keyword>OR</keyword>
  31.         <keyword>XOR</keyword>
  32.         <keyword>EQV</keyword>
  33.         <keyword>NEQV</keyword>
  34.         <keyword>EQ</keyword>
  35.         <keyword>NE</keyword>
  36.         <keyword>GT</keyword>
  37.         <keyword>GE</keyword>
  38.         <keyword>LT</keyword>
  39.         <keyword>LE</keyword>
  40.     </keyword-list>
  41.  
  42.     <keyword-list _name = "Keywords" style = "Keyword" case-sensitive="FALSE">
  43.         <keyword>block data</keyword>
  44.         <keyword>CALL</keyword>
  45.         <keyword>case</keyword>
  46.         <keyword>common</keyword>
  47.         <keyword>contains</keyword>
  48.         <keyword>continue</keyword>
  49.         <keyword>cycle</keyword>
  50.         <keyword>data</keyword>
  51.         <keyword>do</keyword>
  52.         <keyword>elseif</keyword>
  53.         <keyword>else</keyword>
  54.         <keyword>elsewhere</keyword>
  55.         <keyword>enddo</keyword>
  56.         <keyword>endif</keyword>
  57.         <keyword>end</keyword>
  58.         <keyword>external</keyword>
  59.         <keyword>forall</keyword>
  60.         <keyword>function</keyword>
  61.         <keyword>goto</keyword>
  62.         <keyword>if</keyword>
  63.         <keyword>implicit none</keyword>
  64.         <keyword>include</keyword>
  65.         <keyword>intrinsic</keyword>
  66.         <keyword>kind</keyword>
  67.         <keyword>len</keyword>
  68.         <keyword>module</keyword>
  69.         <keyword>program</keyword>
  70.         <keyword>return</keyword>
  71.         <keyword>save</keyword>
  72.         <keyword>SELECT</keyword>
  73.         <keyword>stop</keyword>
  74.         <keyword>subroutine</keyword>
  75.         <keyword>then</keyword>
  76.         <keyword>type</keyword>
  77.         <keyword>use</keyword>
  78.         <keyword>where</keyword>
  79.         <keyword>while</keyword>
  80.     </keyword-list>
  81.  
  82.     <keyword-list _name = "Read/Write" style = "Keyword" case-sensitive="FALSE">
  83.         <keyword>backspace</keyword>
  84.         <keyword>close</keyword>
  85.         <keyword>inquire</keyword>
  86.         <keyword>open</keyword>
  87.         <keyword>rewind</keyword>
  88.         <keyword>endfile</keyword>
  89.         <keyword>read</keyword>
  90.         <keyword>write</keyword>
  91.         <keyword>print</keyword>
  92.     </keyword-list>
  93.  
  94.     <keyword-list _name = "Input/Output" style = "Keyword" case-sensitive="FALSE">
  95.         <keyword>unit</keyword>
  96.         <keyword>file</keyword>
  97.         <keyword>iostat</keyword>
  98.         <keyword>access</keyword>
  99.         <keyword>blank</keyword>
  100.         <keyword>fmt</keyword>
  101.         <keyword>form</keyword>
  102.         <keyword>recl</keyword>
  103.         <keyword>status</keyword>
  104.         <keyword>exist</keyword>
  105.         <keyword>opened</keyword>
  106.         <keyword>number</keyword>
  107.         <keyword>named</keyword>
  108.         <keyword>name</keyword>
  109.         <keyword>sequential</keyword>
  110.         <keyword>direct</keyword>
  111.         <keyword>rec</keyword>
  112.         <keyword>formatted</keyword>
  113.         <keyword>unformatted</keyword>
  114.         <keyword>nextrec</keyword>
  115.         <keyword>pad</keyword>
  116.         <keyword>position</keyword>
  117.         <keyword>action</keyword>
  118.         <keyword>delim</keyword>
  119.         <keyword>readwrite</keyword>
  120.         <keyword>eor</keyword>
  121.         <keyword>advance</keyword>
  122.         <keyword>nml</keyword>
  123.     </keyword-list>
  124.     <keyword-list _name = "Intrinsics" style = "Keyword" case-sensitive="FALSE">
  125.         <keyword>adjustl</keyword>
  126.         <keyword>adjustr</keyword>
  127.         <keyword>all</keyword>
  128.         <keyword>allocated</keyword>
  129.         <keyword>any</keyword>
  130.         <keyword>associated</keyword>
  131.         <keyword>bit_size</keyword>
  132.         <keyword>btest</keyword>
  133.         <keyword>ceiling</keyword>
  134.         <keyword>count</keyword>
  135.         <keyword>cshift</keyword>
  136.         <keyword>date_and_time</keyword>
  137.         <keyword>digits</keyword>
  138.         <keyword>dim</keyword>
  139.         <keyword>dot_product</keyword>
  140.         <keyword>dprod</keyword>
  141.         <keyword>eoshift</keyword>
  142.         <keyword>epsilon</keyword>
  143.         <keyword>exponent</keyword>
  144.         <keyword>floor</keyword>
  145.         <keyword>fraction</keyword>
  146.         <keyword>huge</keyword>
  147.         <keyword>iand</keyword>
  148.         <keyword>ibclr</keyword>
  149.         <keyword>ibits</keyword>
  150.         <keyword>ibset</keyword>
  151.         <keyword>ieor</keyword>
  152.         <keyword>ior</keyword>
  153.         <keyword>ishft</keyword>
  154.         <keyword>ishftc</keyword>
  155.         <keyword>lbound</keyword>
  156.         <keyword>len_trim</keyword>
  157.         <keyword>matmul</keyword>
  158.         <keyword>maxexponent</keyword>
  159.         <keyword>maxloc</keyword>
  160.         <keyword>maxval</keyword>
  161.         <keyword>merge</keyword>
  162.         <keyword>minexponent</keyword>
  163.         <keyword>minloc</keyword>
  164.         <keyword>minval</keyword>
  165.         <keyword>modulo</keyword>
  166.         <keyword>mvbits</keyword>
  167.         <keyword>nearest</keyword>
  168.         <keyword>pack</keyword>
  169.         <keyword>present</keyword>
  170.         <keyword>product</keyword>
  171.         <keyword>radix</keyword>
  172.         <keyword>random_number</keyword>
  173.         <keyword>random_seed</keyword>
  174.         <keyword>range</keyword>
  175.         <keyword>repeat</keyword>
  176.         <keyword>reshape</keyword>
  177.         <keyword>rrspacing</keyword>
  178.         <keyword>scale</keyword>
  179.         <keyword>selected_int_kind</keyword>
  180.         <keyword>selected_real_kind</keyword>
  181.         <keyword>scan</keyword>
  182.         <keyword>shape</keyword>
  183.         <keyword>size</keyword>
  184.         <keyword>spacing</keyword>
  185.         <keyword>spread</keyword>
  186.         <keyword>set_exponent</keyword>
  187.         <keyword>tiny</keyword>
  188.         <keyword>transpose</keyword>
  189.         <keyword>trim</keyword>
  190.         <keyword>ubound</keyword>
  191.         <keyword>unpack</keyword>
  192.         <keyword>verify</keyword>
  193.         <keyword>precision</keyword>
  194.         <keyword>sum</keyword>
  195.         <keyword>system_clock</keyword>
  196.         <keyword>abs</keyword>
  197.         <keyword>acos</keyword>
  198.         <keyword>aimag</keyword>
  199.         <keyword>aint</keyword>
  200.         <keyword>anint</keyword>
  201.         <keyword>asin</keyword>
  202.         <keyword>atan</keyword>
  203.         <keyword>atan2</keyword>
  204.         <keyword>cos</keyword>
  205.         <keyword>sin</keyword>
  206.         <keyword>tan</keyword>
  207.         <keyword>sinh</keyword>
  208.         <keyword>cosh</keyword>
  209.         <keyword>tanh</keyword>
  210.         <keyword>exp</keyword>
  211.         <keyword>log</keyword>
  212.         <keyword>log10</keyword>
  213.         <keyword>sign</keyword>
  214.         <keyword>sqrt</keyword>
  215.         <keyword>int</keyword>
  216.         <keyword>cmplx</keyword>
  217.         <keyword>nint</keyword>
  218.         <keyword>min</keyword>
  219.         <keyword>max</keyword>
  220.         <keyword>conjg</keyword>
  221.         <keyword>char</keyword>
  222.         <keyword>ichar</keyword>
  223.         <keyword>index</keyword>
  224.         <keyword>cabs</keyword>
  225.         <keyword>ccos</keyword>
  226.         <keyword>cexp</keyword>
  227.         <keyword>clog</keyword>
  228.         <keyword>csin</keyword>
  229.         <keyword>csqrt</keyword>
  230.         <keyword>dacos</keyword>
  231.         <keyword>dasin</keyword>
  232.         <keyword>datan</keyword>
  233.         <keyword>datan2</keyword>
  234.         <keyword>dcos</keyword>
  235.         <keyword>dcosh</keyword>
  236.         <keyword>ddim</keyword>
  237.         <keyword>dexp</keyword>
  238.         <keyword>dint</keyword>
  239.         <keyword>dlog</keyword>
  240.         <keyword>dlog10</keyword>
  241.         <keyword>dmod</keyword>
  242.         <keyword>dabs</keyword>
  243.         <keyword>dnint</keyword>
  244.         <keyword>dsign</keyword>
  245.         <keyword>dsin</keyword>
  246.         <keyword>dsinh</keyword>
  247.         <keyword>dsqrt</keyword>
  248.         <keyword>dtan</keyword>
  249.         <keyword>dtanh</keyword>
  250.         <keyword>iabs</keyword>
  251.         <keyword>idim</keyword>
  252.         <keyword>idnint</keyword>
  253.         <keyword>isign</keyword>
  254.         <keyword>idint</keyword>
  255.         <keyword>ifix</keyword>
  256.         <keyword>amax0</keyword>
  257.         <keyword>amax1</keyword>
  258.         <keyword>dmax1</keyword>
  259.         <keyword>max0</keyword>
  260.         <keyword>max1</keyword>
  261.         <keyword>amin0</keyword>
  262.         <keyword>amin1</keyword>
  263.         <keyword>dmin1</keyword>
  264.          <keyword>loc</keyword>
  265.         <keyword>min0</keyword>
  266.         <keyword>min1</keyword>
  267.         <keyword>amod</keyword>
  268.         <keyword>float</keyword>
  269.         <keyword>sngl</keyword>
  270.         <keyword>alog</keyword>
  271.         <keyword>alog10</keyword>
  272.         <keyword>cdabs</keyword>
  273.         <keyword>cdcos</keyword>
  274.         <keyword>cdexp</keyword>
  275.         <keyword>cdlog</keyword>
  276.         <keyword>cdsin</keyword>
  277.         <keyword>cdsqrt</keyword>
  278.         <keyword>cqabs</keyword>
  279.         <keyword>cqcos</keyword>
  280.         <keyword>cqexp</keyword>
  281.         <keyword>cqlog</keyword>
  282.         <keyword>cqsin</keyword>
  283.         <keyword>cqsqrt</keyword>
  284.         <keyword>qacos</keyword>
  285.         <keyword>qasin</keyword>
  286.         <keyword>qatan</keyword>
  287.         <keyword>qatan2</keyword>
  288.         <keyword>qcos</keyword>
  289.         <keyword>qcosh</keyword>
  290.         <keyword>qdim</keyword>
  291.         <keyword>qexp</keyword>
  292.         <keyword>iqint</keyword>
  293.         <keyword>qlog</keyword>
  294.         <keyword>qlog10</keyword>
  295.         <keyword>qmod</keyword>
  296.         <keyword>qabs</keyword>
  297.         <keyword>qnint</keyword>
  298.         <keyword>qsign</keyword>
  299.         <keyword>qsin</keyword>
  300.         <keyword>qsinh</keyword>
  301.         <keyword>qsqrt</keyword>
  302.         <keyword>qtan</keyword>
  303.         <keyword>qtanh</keyword>
  304.         <keyword>qmax1</keyword>
  305.         <keyword>qmin1</keyword>
  306.         <keyword>dimag</keyword>
  307.         <keyword>qimag</keyword>
  308.         <keyword>dcmplx</keyword>
  309.         <keyword>qcmplx</keyword>
  310.         <keyword>dconjg</keyword>
  311.         <keyword>qconjg</keyword>
  312.         <keyword>gamma</keyword>
  313.         <keyword>dgamma</keyword>
  314.         <keyword>qgamma</keyword>
  315.         <keyword>algama</keyword>
  316.         <keyword>dlgama</keyword>
  317.         <keyword>qlgama</keyword>
  318.         <keyword>erf</keyword>
  319.         <keyword>derf</keyword>
  320.         <keyword>qerf</keyword>
  321.         <keyword>erfc</keyword>
  322.         <keyword>derfc</keyword>
  323.         <keyword>qerfc</keyword>
  324.         <keyword>dfloat</keyword>
  325.         <keyword>zabs</keyword>
  326.         <keyword>zcos</keyword>
  327.         <keyword>zexp</keyword>
  328.         <keyword>zlog</keyword>
  329.         <keyword>zsin</keyword>
  330.         <keyword>zsqrt</keyword>
  331.     </keyword-list>
  332.  
  333.     <keyword-list _name = "Types" style = "Data Type" case-sensitive="FALSE">
  334.         <keyword>REAL</keyword>
  335.         <keyword>INTEGER</keyword>
  336.         <keyword>CHARACTER</keyword>
  337.         <keyword>LOGICAL</keyword>
  338.         <keyword>COMPLEX</keyword>
  339.         <keyword>DOUBLE PRECISION</keyword>
  340.         <keyword>DOUBLE COMPLEX</keyword>
  341.         <keyword>BYTE</keyword>
  342.         <keyword>dimension</keyword>
  343.         <keyword>parameter</keyword>
  344.         <keyword>intent</keyword>
  345.         <keyword>private</keyword>
  346.         <keyword>optional</keyword>
  347.         <keyword>pointer</keyword>
  348.         <keyword>target</keyword>
  349.         <keyword>allocatable</keyword>
  350.     </keyword-list>
  351.  
  352.     <pattern-item _name = "Decimal" style = "Decimal">
  353.         <regex>\b([1-9][0-9]*|0)([Uu]([Ll]|LL|ll)?|([Ll]|LL|ll)[Uu]?)?\b</regex>
  354.     </pattern-item>
  355.  
  356.     <pattern-item _name = "Floating Point Number" style = "Floating Point">
  357.         <regex>\b([0-9]+[Ee][-]?[0-9]+|([0-9]*\.[0-9]+|[0-9]+\.)([Ee][-]?[0-9]+)?)[fFlL]?</regex>
  358.     </pattern-item>
  359.  
  360.     <pattern-item _name = "Octal Number" style = "Base-N Integer">
  361.         <regex>\b0[0-7]+([Uu]([Ll]|LL|ll)?|([Ll]|LL|ll)[Uu]?)?\b</regex>
  362.     </pattern-item>
  363.  
  364.     <pattern-item _name = "Hex Number" style = "Base-N Integer">
  365.         <regex>\b0[xX][0-9a-fA-F]+([Uu]([Ll]|LL|ll)?|([Ll]|LL|ll)[Uu]?)?\b</regex>
  366.     </pattern-item>
  367.  
  368. </language>
  369.