diff options
author | Karl Berry <karl@freefriends.org> | 2016-04-07 20:53:54 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2016-04-07 20:53:54 +0000 |
commit | 90ebe643d79b5d01b4538ceb7d384a727f950068 (patch) | |
tree | dcf9916f2627b459d68d4f23f4a0b287bdf5ddd8 /Master/texmf-dist/metapost | |
parent | 858811a7e072ee761dab74144444d69e9645a8f3 (diff) |
mcf2graph (6apr16)
git-svn-id: svn://tug.org/texlive/trunk@40329 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/metapost')
-rw-r--r-- | Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf index ce075442a5f..ff213020f0c 100644 --- a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf +++ b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% mcf2graph ver 3.87 Copyright (c) 2013-2016 Akira Yamaji +% mcf2graph ver 3.88 Copyright (c) 2013-2016 Akira Yamaji % % Permission is hereby granted, free of charge, to any person obtaining a copy of this software % and associated documentation files (the "Software"), to deal in the Software without restriction, @@ -39,14 +39,14 @@ numeric angB[],angA[],br_ang[],sB[],eB[],f_FON[],atom_w[],atom_h[],atom_d[],strA CH[],NH[],NO[],SO[],CCl[],CF[],CBr[],?[],![],Ph[]; path pA,pB,pC,pT; string info[],tblA[],com_str[],var[],tag[], - calc_formula,mp_log_name,mol_name,mol_formula,calc_weight_str,info_str,aux_separater; + calc_formula,mp_log_name,mol_name,mol_formula,calc_weight_str,info_str,aux_delimiter; picture atom_font[],chem_structure,temp_picture; %------------------------------------------------------------------------------------------------- sw_numberA:=sw_numberB:=sw_mol_frame:=sw_auxout:=sw_solid:=sw_expand:=sw_start_vector:=0; char_num:=str_cnt:=proc_end:=sw_font_frame:=sw_atom_frame:=sw_checklist:=sw_MOLout:=0; sw_subst_off:=sw_bond_single:=0; numberA_start:=numberB_start:=1; numberA_end:=numberB_end:=4095; aux_max:=20; -aux_separater:=";"; var1:="jobname"; tag1:="F"; var2:="char_num"; tag2:="C"; +aux_delimiter:=";"; var1:="jobname"; tag1:="F"; var2:="char_num"; tag2:="C"; for i=3 upto aux_max: var[i]:=tag[i]:=""; endfor %------------------------------------------------------------------------------------------------- if known green: f_MP:=1; @@ -566,11 +566,11 @@ enddef; vardef fit_zero(expr n)=if n<=9: "00" elseif n<=99: "0" fi enddef; def auxfile_out= for i=1 upto aux_max: exitif var[i]=""; - if i=1: printf "" else: &aux_separater fi &tag[i]&":"& + if i=1: printf "" else: &aux_delimiter fi &tag[i]&":"& if string scantokens(var[i]): scantokens(var[i]) elseif numeric scantokens(var[i]): decimal(scantokens(var[i])) fi endfor - for i=1 upto info_num: &aux_separater&info[i] endfor; + for i=1 upto info_num: &aux_delimiter&info[i] endfor; enddef; %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% mc_num:=first_def_number; |