From 90ebe643d79b5d01b4538ceb7d384a727f950068 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 7 Apr 2016 20:53:54 +0000 Subject: mcf2graph (6apr16) git-svn-id: svn://tug.org/texlive/trunk@40329 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'Master/texmf-dist/metapost') 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; -- cgit v1.2.3