require '_h2ph_pre.ph';

unless(defined(&SI)) {
    sub SI {
	local($x) = @_;
	eval q(($x));
    }
}
unless(defined(&si_sum)) {
    sub si_sum () {	 ($si_i->{idp_sum});}
}
unless(defined(&si_len)) {
    sub si_len () {	 ($si_i->{idp_len});}
}
unless(defined(&si_tc)) {
    sub si_tc () {	 ($si_i->{idp_tc});}
}
unless(defined(&si_pt)) {
    sub si_pt () {	 ($si_i->{idp_pt});}
}
unless(defined(&si_dna)) {
    sub si_dna () {	 ($si_i->{idp_dna});}
}
unless(defined(&si_sna)) {
    sub si_sna () {	 ($si_i->{idp_sna});}
}
unless(defined(&si_sport)) {
    sub si_sport () {	 ($si_i->{idp_sna}->{x_port});}
}
unless(defined(&si_cc)) {
    sub si_cc () {	 ($si_s->{sp_cc});}
}
unless(defined(&si_dt)) {
    sub si_dt () {	 ($si_s->{sp_dt});}
}
unless(defined(&si_sid)) {
    sub si_sid () {	 ($si_s->{sp_sid});}
}
unless(defined(&si_did)) {
    sub si_did () {	 ($si_s->{sp_did});}
}
unless(defined(&si_seq)) {
    sub si_seq () {	 ($si_s->{sp_seq});}
}
unless(defined(&si_ack)) {
    sub si_ack () {	 ($si_s->{sp_ack});}
}
unless(defined(&si_alo)) {
    sub si_alo () {	 ($si_s->{sp_alo});}
}
1;
