学习FORTRAN查的东西哈哈——怪异
2007-07-14 17:07
405 查看
fortran脚本
# Define SciTE settings for Fortran files.filter.fortran=Fortran (f for f90 f95 f2k)|*.f;*.for;*.f90;*.f95;*.f2k|
file.patterns.f95=*.f90;*.f95;*.f2k
file.patterns.f77=*.f;*.for
file.patterns.fortran=$(file.patterns.f95);$(file.patterns.f77)
lexer.$(file.patterns.f95)=fortran
lexer.$(file.patterns.f77)=f77
# keywords and input/output specifiers
keywordclass.fortran=access action advance allocatable allocate /
apostrophe assign assignment associate asynchronous backspace /
bind blank blockdata call case character class close common /
complex contains continue cycle data deallocate decimal delim /
default dimension direct do dowhile double doubleprecision else /
elseif elsewhere encoding end endassociate endblockdata enddo /
endfile endforall endfunction endif endinterface endmodule endprogram /
endselect endsubroutine endtype endwhere entry eor equivalence /
err errmsg exist exit external file flush fmt forall form format /
formatted function go goto id if implicit in include inout /
integer inquire intent interface intrinsic iomsg iolength /
iostat kind len logical module name named namelist nextrec nml /
none nullify number only open opened operator optional out pad /
parameter pass pause pending pointer pos position precision /
print private program protected public quote read readwrite /
real rec recl recursive result return rewind save select /
selectcase selecttype sequential sign size stat status stop stream /
subroutine target then to type unformatted unit use value /
volatile wait where while write
keywords.$(file.patterns.f95)=$(keywordclass.fortran)
keywords.$(file.patterns.f77)=$(keywordclass.fortran)
# keywords2 is for highlighting intrinsic and extended functions
keywords2.$(file.patterns.fortran)=abs achar acos acosd adjustl adjustr /
aimag aimax0 aimin0 aint ajmax0 ajmin0 akmax0 akmin0 all allocated alog /
alog10 amax0 amax1 amin0 amin1 amod anint any asin asind associated /
atan atan2 atan2d atand bitest bitl bitlr bitrl bjtest bit_size bktest break /
btest cabs ccos cdabs cdcos cdexp cdlog cdsin cdsqrt ceiling cexp char /
clog cmplx conjg cos cosd cosh count cpu_time cshift csin csqrt dabs /
dacos dacosd dasin dasind datan datan2 datan2d datand date /
date_and_time dble dcmplx dconjg dcos dcosd dcosh dcotan ddim dexp /
dfloat dflotk dfloti dflotj digits dim dimag dint dlog dlog10 dmax1 dmin1 /
dmod dnint dot_product dprod dreal dsign dsin dsind dsinh dsqrt dtan dtand /
dtanh eoshift epsilon errsns exp exponent float floati floatj floatk floor fraction /
free huge iabs iachar iand ibclr ibits ibset ichar idate idim idint idnint ieor ifix /
iiabs iiand iibclr iibits iibset iidim iidint iidnnt iieor iifix iint iior iiqint iiqnnt iishft /
iishftc iisign ilen imax0 imax1 imin0 imin1 imod index inint inot int int1 int2 int4 /
int8 iqint iqnint ior ishft ishftc isign isnan izext jiand jibclr jibits jibset jidim jidint /
jidnnt jieor jifix jint jior jiqint jiqnnt jishft jishftc jisign jmax0 jmax1 jmin0 jmin1 /
jmod jnint jnot jzext kiabs kiand kibclr kibits kibset kidim kidint kidnnt kieor kifix /
kind kint kior kishft kishftc kisign kmax0 kmax1 kmin0 kmin1 kmod knint knot kzext /
lbound leadz len len_trim lenlge lge lgt lle llt log log10 logical lshift malloc matmul /
max max0 max1 maxexponent maxloc maxval merge min min0 min1 minexponent minloc /
minval mod modulo mvbits nearest nint not nworkers number_of_processors pack popcnt /
poppar precision present product radix random random_number random_seed range real /
repeat reshape rrspacing rshift scale scan secnds selected_int_kind /
selected_real_kind set_exponent shape sign sin sind sinh size sizeof sngl snglq spacing /
spread sqrt sum system_clock tan tand tanh tiny transfer transpose trim ubound unpack verify
# keywords3 are nonstardard, extended and user defined functions
keywords3.$(file.patterns.fortran)=cdabs cdcos cdexp cdlog cdsin cdsqrt cotan cotand /
dcmplx dconjg dcotan dcotand decode dimag dll_export dll_import doublecomplex dreal /
dvchk encode find flen flush getarg getcharqq getcl getdat getenv gettim hfix ibchng /
identifier imag int1 int2 int4 intc intrup invalop iostat_msg isha ishc ishl jfix /
lacfar locking locnear map nargs nbreak ndperr ndpexc offset ovefl peekcharqq precfill /
prompt qabs qacos qacosd qasin qasind qatan qatand qatan2 qcmplx qconjg qcos qcosd /
qcosh qdim qexp qext qextd qfloat qimag qlog qlog10 qmax1 qmin1 qmod qreal qsign qsin /
qsind qsinh qsqrt qtan qtand qtanh ran rand randu rewrite segment setdat settim system /
timer undfl unlock union val virtual volatile zabs zcos zexp zlog zsin zsqrt
#fold.comment.fortran=1
#fold.quotes.fortran=1
comment.block.fortran=!~
# These setting do not work very well for FORTRAN, uncoment to use it
# statement.indent.$(file.patterns.fortran)=8 associate block blockdata case do enum /
# function interface module program subroutine then type where
# statement.end.$(file.patterns.fortran)=10 end
# Fortran styles
# Default
style.fortran.0=fore:#808080
style.f77.0=fore:#808080
style.fortran.32=
style.f77.32=
# Comment
style.fortran.1=$(colour.code.comment.line),$(font.code.comment.line)
style.f77.1=$(colour.code.comment.line),$(font.code.comment.line)
# Number
style.fortran.2=$(colour.number)
style.f77.2=$(colour.number)
# Single quoted string
style.fortran.3=$(colour.string)
style.f77.3=$(colour.string)
# Double quoted string
style.fortran.4=$(colour.string)
style.f77.4=$(colour.string)
# End of line where string is not closed
style.fortran.5=fore:#000000,back:#E0C0E0,eolfilled
style.f77.5=fore:#000000,back:#E0C0E0,eolfilled
# Operators
style.fortran.6=$(colour.operator),bold
style.f77.6=$(colour.operator),bold
# Identifiers
style.fortran.7=
style.f77.7=
# Keywords
style.fortran.8=$(colour.keyword),case:u
style.f77.8=$(colour.keyword),case:u
# Keywords2
style.fortran.9=fore:#B00040
style.f77.9=fore:#B00040
# Keywords3
style.fortran.10=fore:#B04080
style.f77.10=fore:#B04080
# Preprocessor
style.fortran.11=$(colour.preproc)
style.f77.11=$(colour.preproc)
# Operators in .NAME. format
style.fortran.12=$(colour.operator),bold
style.f77.12=$(colour.operator),bold
# Labels
style.fortran.13=fore:#E0C0E0
style.f77.13=fore:#E0C0E0
# Continuation
style.fortran.14=fore:#000000,back:#F0E080
style.f77.14=fore:#000000,back:#F0E080
# Braces are matched in all cases
braces.fortran.style=0
if PLAT_WIN
fc77=lf95 $(FileNameExt) -c -fix
fc90=lf95 $(FileNameExt) -c
if PLAT_GTK
fc77=f77 -c -o $(FileName).o $(FileNameExt)
fc90=f90 -c -o $(FileName).o $(FileNameExt)
command.compile.*.f=$(fc77)
command.build.*.f=make
command.go.*.f=$(FileName)
command.compile.*.for=$(fc77)
command.build.*.for=make
command.go.*.for=$(FileName)
command.compile.*.f90=$(fc90)
command.build.*.f90=make
command.go.*.f90=$(FileName)
command.compile.*.f95=$(fc90)
command.build.*.f95=make
command.go.*.f95=$(FileName)
if PLAT_WIN
api.$(file.patterns.fortran)=$(SciteDefaultHome)/fortran.api
autocomplete.fortran.ignorecase=1
autocomplete.f77.ignorecase=1
calltip.fortran.ignorecase=1
calltip.f77.ignorecase=1
相关文章推荐
- 工作一年,突然觉得有必要写点东西记录下生活学习方面的东西,希望能坚持下去
- 工作一年,突然觉得有必要写点东西记录下生活学习方面的东西,希望能坚持下去
- 真正的完美版的WAYOS完美破解版,确实有这号东西,哈哈
- 学习新东西的唯一方法
- 2017.05.15回顾 numpy新东西学习 scoreatpercentile
- 软件专业--大学期间学习的东西
- [linux笔记]第一次工作上用了平时学习的东西。
- 最近要学习的东西
- 关于Cocos2d-X 学习中遇到的一些难以理解的东西 将来将会一一删除
- 最近在搞增值移动平台的开发,有好多东西还得学习研究啊。
- 7月18日Java基础:本人为新手正在学习Java中把每天学的东西晚上都会在博客记录希望大神可以指点 不足在此谢过。
- 从零开始前端学习[40]:css3中的resize,user-select属性,多列布局特性,怪异盒子模型,倒影
- ios开发学习笔记(这里一定有你想要的东西,全部免费)
- 学习新东西的唯一方法
- 记录点学习的东西-flex.ScrollBar样式应用
- 正则表达式学习记录-正则表达式到底是什么东西?
- 关于win7下RemoveDPC学习到的一点东西
- VC学习到的东西
- 开始在这里写学习东西了
- 这几日学习的东西