changecom(`//') %// M4 preprocessor include file for widely-used groups %// 17-JAN-2000 IK change opening comment marker define(`Me_', `atom("C",C,R) atom("H$_3$",L) ') define(`eM_', `atom("C",C,L) atom("H$_3$",R) ') define(`CH2_', `atom("CH$_2$",C,L,R) ') define(`Et_', `atom("C",C,R) atom("H$_2$CH$_3$",L) ') define(`tE_', `atom("C",C,L) atom("H$_3$CH$_2$",R) ') define(`iPr_', `branch{bond($1,,0) bond(l) branch{bond(l+); bond(l--);};} ') define(`Ph_', `ring(,0,H0=2=4=,,,ifelse($1,`', `r', `$1'))') define(`OH_', `atom("O",C,R) atom("H",L) ') define(`HO_', `atom("O",C,L) atom("H",R) ') define(`OMe_', `atom("O",C,R) atom("CH$_3$",L) ') define(`MeO_', `atom("O",C,L) atom("H$_3$C",R) ') define(`OEt_', `atom("O",C,R) atom("CH$_2$CH$_3$",L) ') define(`EtO_', `atom("O",C,L) atom("H$_3$CH$_2$C",R) ') define(`CH2OH_', `atom("C",C,R) atom("H$_2$OH",L) ') define(`HOCH2_', `atom("H$_2$",C,L) atom("HOC",R) ') define(`NH2_', `atom("N",C,R) atom("H$_2$",L) ') define(`H2N_', `atom("N",C,L) atom("H$_2$",R) ') define(`NH_', `branch { bond($1) atom("H"); atom("N",C); } ') define(`NMe2_', `atom("N",C,R) atom("(CH$_3$)$_2$",L) ') define(`Me2N_', `atom("N",C,L) atom("(H$_3$C)$_2$",R) ') define(`NMe2p_', `atom("N",C,R) atom("$^\oplus$(CH$_3$)$_2$",L) ') define(`pMe2N_', `atom("N",C,L) atom("(H$_3$C)$_2^\oplus$",R) ') define(`NH2p_', `atom("N",C,R) atom("$^\oplus$H$_2$",L) ') define(`pH2N_', `atom("N",C,L) atom("H$_2^\oplus$",R) ') define(`COOH_', `atom("C",C,R) atom("OOH",L) ') define(`HOOC_', `atom("C",C,L) atom("HOO",R) ') define(`COOMe_', `atom("C",C,R) atom("OOCH$_3$",L) ') define(`MeOOC_', `atom("C",C,L) atom("H$_3$COO",R) ') define(`COOEt_', `atom("C",C,R) atom("OOCH$_2$CH$_3$C",L) ') define(`EtOOC_', `atom("C",C,L) atom("H$_3$CH$_2$COO",R) ') define(`SO3H_', `atom("S",C,R) atom("O$_3$H",L) ') define(`HO3S_', `atom("C",C,L) atom("HO$_3$",R) ') define(`SO3m_', `atom("S",C,R) atom("O$_3^\ominus$",L) ') define(`mO3S_', `atom("C",C,L) atom("$^\ominus$O$_3$",R) ')