mirror of
https://github.com/danog/telegram-tt.git
synced 2024-11-26 20:34:44 +01:00
1 line
7.3 KiB
Plaintext
1 line
7.3 KiB
Plaintext
|
{"version":3,"file":"8138.9b29a768a035996247bd.js","mappings":"sFA0GAA,EAAOC,QAjGP,SAAgBC,GACd,MAAMC,EAAQD,EAAKC,MAQbC,EAAyB,gBACzBC,EAAsB,kBACtBC,EAAS,CACbC,UAAW,SACXC,SAAU,CACR,CAAEC,MAAON,EAAMO,OAAO,QAAS,UAAWL,EAAqBD,IAC/D,CAAEK,MAAON,EAAMO,OAAO,QAASL,EAAqBD,IACpD,CAAEK,MAAON,EAAMO,OAAO,QAASL,EAAqBD,KAEtDO,UAAW,GAiDb,MAAO,CACLC,KAAM,SACNC,kBAAkB,EAClBC,SAjDiB,CACjBC,QAAS,iBACTC,QAAS,o6DAuBTC,SAAU,q+DAyBVC,QAAS,OACTC,SAAU,CACRjB,EAAKkB,QAAQlB,EAAKmB,iBAAkB,CAClCd,UAAW,SACXI,UAAW,IAEbT,EAAKkB,QAAQlB,EAAKoB,kBAAmB,CACnCf,UAAW,SACXI,UAAW,IAEb,CACEJ,UAAW,WACXgB,cAAe,8BACfL,QAAS,WACTC,SAAU,CACRjB,EAAKsB,sBApFE,CACbjB,UAAW,SACXE,MAAO,MACPgB,IAAK,SAqFHvB,EAAKwB,QAAQ,IAAK,IAAK,CAAEf,UAAW,IACpCT,EAAKwB,QAAQ,YAAa,UAAW,CAAEf,UAAW,KAClDL","sources":["webpack://telegram-t/./node_modules/highlight.js/lib/languages/irpf90.js"],"sourcesContent":["/*\nLanguage: IRPF90\nAuthor: Anthony Scemama <scemama@irsamc.ups-tlse.fr>\nDescription: IRPF90 is an open-source Fortran code generator\nWebsite: http://irpf90.ups-tlse.fr\nCategory: scientific\n*/\n\n/** @type LanguageFn */\nfunction irpf90(hljs) {\n const regex = hljs.regex;\n const PARAMS = {\n className: 'params',\n begin: '\\\\(',\n end: '\\\\)'\n };\n\n // regex in both fortran and irpf90 should match\n const OPTIONAL_NUMBER_SUFFIX = /(_[a-z_\\d]+)?/;\n const OPTIONAL_NUMBER_EXP = /([de][+-]?\\d+)?/;\n const NUMBER = {\n className: 'number',\n variants: [\n { begin: regex.concat(/\\b\\d+/, /\\.(\\d*)/, OPTIONAL_NUMBER_EXP, OPTIONAL_NUMBER_SUFFIX) },\n { begin: regex.concat(/\\b\\d+/, OPTIONAL_NUMBER_EXP, OPTIONAL_NUMBER_SUFFIX) },\n { begin: regex.concat(/\\.\\d+/, OPTIONAL_NUMBER_EXP, OPTIONAL_NUMBER_SUFFIX) }\n ],\n relevance: 0\n };\n\n const F_KEYWORDS = {\n literal: '.False. .True.',\n keyword: 'kind do while private call intrinsic where elsewhere '\n + 'type endtype endmodule endselect endinterface end enddo endif if forall endforall only contains default return stop then '\n + 'public subroutine|10 function program .and. .or. .not. .le. .eq. .ge. .gt. .lt. '\n + 'goto save else use module select case '\n + 'access blank direct exist file fmt form formatted iostat name named nextrec number opened rec recl sequential status unformatted unit '\n + 'continue format pause cycle exit '\n + 'c_null_char c_alert c_backspace c_form_feed flush wait decimal round iomsg '\n + 'synchronous nopass non_overridable pass protected volatile abstract extends import '\n + 'non_intrinsic value deferred generic final enumerator class associate bind enum '\n + 'c_int c_short c_long c_long_long c_signed_char c_size_t c_int8_t c_int16_t c_int32_t c_int64_t c_int_least8_t c_int_least16_t '\n + 'c_int_least32_t c_int_least64_t c_int_fast8_t c_int_fast16_t c_int_fast32_t c_int_fast64_t c_intmax_t C_intptr_t c_float c_double '\n + 'c_long_double c_float_complex c_double_complex c_long_double_complex c_bool c_char c_null_ptr c_null_funptr '\n + 'c_new_line c_carriage_return c_horizontal_tab c_vertical_tab iso_c_binding c_loc c_funloc c_associated c_f_pointer '\n + 'c_ptr c_funptr iso_fortran_env character_storage_size error_unit file_storage_size input_unit iostat_end iostat_eor '\n + 'numeric_storage_size output_unit c_f_procpointer ieee_arithmetic ieee_support_underflow_control '\n + 'ieee_get_underflow_mode ieee_set_underflow_mode newunit contiguous recursive '\n + 'pad position action delim readwrite eor advance nml interface procedure namelist include sequence elemental pure '\n + 'integer real character complex logical dimension allocatable|10 parameter '\n + 'external implicit|10 none double precision assign intent optional pointer '\n + 'target in out common equivalence data '\n // IRPF90 special keywords\n + 'begin_provider &begin_provider end_provider begin_shell end_shell begin_template end_template subst assert touch '\n + 'soft_touch provide no_dep free irp_if irp_else irp_endif irp_write irp_read',\n built_in: 'alog alog10 amax0 am
|