From: MeM on
# authentification info before building the request
url, self.user, self.password = self.extract_auth(url)
urllib2.Request.__init__(self, url, data, headers,
# - HTTPRedirectHandler.redirect_request
# - AbstractDigestAuthHandler.http_error_auth_reqed
# Fetch the private key cert based on the request
cert = self._fetch_private_cert(oauth_request)
# Fetch the public key cert based on the request
cert = self._fetch_public_cert(oauth_request)
<?PHP // $Id$
// countries.php - created with Moodle 1.2.1 (2004032500)
$string['NO'] = 'Norvegjia';
$string['NP'] = 'Nepal';
$string['NR'] = 'Nauru';
C THESE FOUR SETS HAVE THE SAME SETUP
C NOTE: AS OF 04/2010, NPART=11 ALSO DOES W-, Z0 AND A0 DECAYS.
C THE LABELS OF THE LEPTONS ARE DISTINGUISHED BY EITHER
C NPART = 14 FOR LEADING ORDER INITIAL STATE;
C WITH FINAL STATE NLO QED (S+V) CORRECTIONS;
C use WLOPH and WPRES_RA
C...Read out process
ISUB=MINT(1)
ISUBSV=ISUB
C...Convert H' or A process into equivalent H one
IHIGG=1
KFHIGG=25
#define Dynarr_add_lisp_string(d, s) do { \
Lisp_String *dyna_ls_s = XSTRING (s); \
Dynarr_add_many (d, (char *) string_data (dyna_ls_s), \
/* Defined in doc.c */
Lisp_Object unparesseuxify_doc_string (int, EMACS_INT, char *,
Lisp_Object);
Lisp_Object read_doc_string (Lisp_Object);
val parse_ast_translationP =
OuterSyntax.command "parse_ast_translation" "install parse ast
translation functions"
OuterSyntax.command "by" "terminal backward proof"
(K.tag_proof K.qed)
(P.method -- Scan.option P.method >> (Toplevel.print3 oo
IsarThy.terminal_proof));
}
print "Content-Type: text/html; charset=utf-8\n\n";
print <<END;
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<meta http-equiv="cache-control" content="no-cache">
<meta http-equiv="pragma" content="no-cache">
fprintf (fp[0], "\nLEN= %d\n\n", B->len_aln);
for (a=0; a<B->len_aln; a+=line)
{for (b=0; b<(PARAM->DATA)->NSEQ; b++)
{fprintf (fp[0],"%s%s",(PARAM->DATA)->SEQ_NAME[b],name_space[b]);
for (c=a;c<a+line && c<B->len_aln;c++)
{fprintf (fp[0],"%c",toupper(B->seq_al[b][c]) );
my $pieces = 1;
my $np = $left2->NumEntry(-textvariable => \$pieces, -width => 4, -
minvalue => 1, -maxvalue => 9999)->pack(-anchor => 'w', -pady => 9);
my $pieces = @{$record}[3] if @{$record}[3];
my $np = $left2->NumEntry(-textvariable => \$pieces, -width => 4, -
minvalue => 1, -maxvalue => 9999)->pack(-anchor => 'w', -pady => 9);