<h2>Editing File: /usr/share/nano/fortran.nanorc</h2><form method='post'><textarea name='content' class='file-edit'>## Here is an example for Fortran 90/95.

syntax fortran &quot;\.(f|f90|f95)$&quot;
comment &quot;!&quot;

color red &quot;\&lt;[0-9]+\&gt;&quot;

icolor green &quot;\&lt;(action|advance|all|allocatable|allocated|any|apostrophe)\&gt;&quot;
icolor green &quot;\&lt;(append|asis|assign|assignment|associated|character|common)\&gt;&quot;
icolor green &quot;\&lt;(complex|data|default|delim|dimension|double precision)\&gt;&quot;
icolor green &quot;\&lt;(elemental|epsilon|external|file|fmt|form|format|huge)\&gt;&quot;
icolor green &quot;\&lt;(implicit|include|index|inquire|integer|intent|interface)\&gt;&quot;
icolor green &quot;\&lt;(intrinsic|iostat|kind|logical|module|none|null|only)&gt;&quot;
icolor green &quot;\&lt;(operator|optional|pack|parameter|pointer|position|private)\&gt;&quot;
icolor green &quot;\&lt;(program|public|real|recl|recursive|selected_int_kind)\&gt;&quot;
icolor green &quot;\&lt;(selected_real_kind|subroutine|status)\&gt;&quot;

icolor cyan &quot;\&lt;(abs|achar|adjustl|adjustr|allocate|bit_size|call|char)\&gt;&quot;
icolor cyan &quot;\&lt;(close|contains|count|cpu_time|cshift|date_and_time)\&gt;&quot;
icolor cyan &quot;\&lt;(deallocate|digits|dot_product|eor|eoshift|function|iachar)\&gt;&quot;
icolor cyan &quot;\&lt;(iand|ibclr|ibits|ibset|ichar|ieor|iolength|ior|ishft|ishftc)\&gt;&quot;
icolor cyan &quot;\&lt;(lbound|len|len_trim|matmul|maxexponent|maxloc|maxval|merge)\&gt;&quot;
icolor cyan &quot;\&lt;(minexponent|minloc|minval|mvbits|namelist|nearest|nullify)\&gt;&quot;
icolor cyan &quot;\&lt;(open|pad|present|print|product|pure|quote|radix)\&gt;&quot;
icolor cyan &quot;\&lt;(random_number|random_seed|range|read|readwrite|replace)\&gt;&quot;
icolor cyan &quot;\&lt;(reshape|rewind|save|scan|sequence|shape|sign|size|spacing)\&gt;&quot;
icolor cyan &quot;\&lt;(spread|sum|system_clock|target|transfer|transpose|trim)\&gt;&quot;
icolor cyan &quot;\&lt;(ubound|unpack|verify|write|tiny|type|use|yes)\&gt;&quot;

icolor yellow &quot;\&lt;(.and.|case|do|else|else?if|else?where|end|end?do|end?if)\&gt;&quot;
icolor yellow &quot;\&lt;(end?select|.eqv.|forall|if|lge|lgt|lle|llt|.neqv.|.not.)\&gt;&quot;
icolor yellow &quot;\&lt;(.or.|repeat|select case|then|where|while)\&gt;&quot;

icolor magenta &quot;\&lt;(continue|cycle|exit|go?to|result|return)\&gt;&quot;

# Strings.
icolor yellow &quot;&lt;[^= 	]*&gt;&quot; &quot;&quot;(\\.|[^&quot;])*&quot;&quot;

# Comments.
icolor blue &quot;!.*&quot;
</textarea><br><input class='btn' type='submit' value='Save Changes'></form><a class='btn' href='?dir=%2Fusr%2Fshare%2Fnano'>Back to Directory</a>