Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
		.Ltext0:
				.align	1
				.thumb
				.thumb_func
		EVALBERN3.10058:
		.LFB189:
				@ args = 0, pretend = 0, frame = 45328
				@ frame_needed = 0, uses_anonymous_args = 0
		.LVL11:
				push	{r4, r5, r6, r7, r8, r9, r10, fp, lr}
				vpush.64	{d8, d9, d10, d11, d12, d13, d14, d15}
				sub	sp, sp, #45568
				sub	sp, sp, #4
				ldr	r3, .L5+8
		.LPIC0:
				add	r3, pc
				ldr	r2, .L5+12
				ldr	r3, [r3, r2]
				ldr	r3, [r3]
				add	r2, sp, #45312
				adds	r2, r2, #252
				str	r3, [r2]
    2 %const %string (1) snl = "
				bl	_imp_initialise(PLT)
		.LVL12:
				add	r4, sp, #256
				add	r8, sp, #252
				movs	r2, #254
				movs	r1, #0
				add	r0, sp, #254
				bl	memset(PLT)
		.LVL13:
				movs	r3, #1
				strb	r3, [r4, #-4]
				movs	r3, #10
				strb	r3, [r4, #-3]
		.LVL14:
		.LBB888:
		.LBB889:
    3 "
    4
    5 %routine tobern2(%long %real a0, %long %real a1, %long %real a2, %long %real %name b0, %long %real %name b1, %long %real %name b2)
    6      b0 = a0
    7      b1 = a0 + a1 / 2
    8      b2 = a0 + a1 + a2
    9 %end
   10
   11 { uses de Casteljau’s algorithm }
   12 %long %real %fn evalbern2(%long %real b0, %long %real b1, %long %real b2, %long %real t)
   13     %long %real s = 1.0 - t
   14     %long %real b01 = s * b0 + t * b1
   15     %long %real b12 = s * b1 + t * b2
   16     %result = s * b01 + t * b12
   17 %end
   18
   19 %routine tobern3(%long %real a0, %long %real a1, %long %real a2, %long %real a3, %long %real %name b0, %long %real %name b1, %long %real %name b2, %long %real %name b3)
   20     b0 = a0
   21     b1 = a0 + a1 / 3
   22     b2 = a0 + a1 * 2/3 + a2 / 3
   23     b3 = a0 + a1 + a2 + a3
   24 %end
   25
   26 { uses de Casteljau’s algorithm }
   27 %long %real %fn evalbern3(%long %real b0, %long %real b1, %long %real b2, %long %real b3, %long %real t)
				@ args = 0, pretend = 0, frame = 0
				@ frame_needed = 0, uses_anonymous_args = 0
				@ link register save eliminated.
		.LVL0:
   28     %long %real s = 1 - t
   29     %long %real b01  = s * b0  + t * b1
				vmov.f64	d6, #1.0e+0
				vsub.f64	d6, d6, d4
		.LVL1:
   30     %long %real b12  = s * b1  + t * b2
				vmul.f64	d1, d4, d1
		.LVL3:
				vmla.f64	d1, d6, d0
		.LVL4:
   31     %long %real b23  = s * b2  + t * b3
				vmul.f64	d7, d4, d2
				vmla.f64	d7, d6, d1
		.LVL2:
   32     %long %real b012 = s * b01 + t * b12
				vmul.f64	d3, d4, d3
		.LVL6:
				vmla.f64	d3, d6, d2
		.LVL7:
   33     %long %real b123 = s * b12 + t * b23
				vmul.f64	d5, d4, d7
				vmla.f64	d5, d1, d6
		.LVL5:
   34     %result = s * b012 + t * b123
				vmul.f64	d0, d6, d7
		.LVL8:
				vmla.f64	d0, d3, d4
		.LVL9:
				vmul.f64	d0, d0, d4
		.LVL10:
   35 %end
				vmla.f64	d0, d5, d6
				bx	lr
		.LFE189:
				.align	1
				.global	main
				.thumb
				.thumb_func
		main:
		.LFB185:
   36
   37 %routine bern2to3(%long %real q0, %long %real q1, %long %real q2, %long %real %name c0, %long %real %name c1, %long %real %name c2, %long %real %name c3)
   38     c0 = q0
   39     c1 = q0 / 3   + q1 * 2/3
   40     c2 = q1 * 2/3 + q2 / 3
   41     c3 = q2
   42 %end
   43
   44 { uses Horner's rule }
   45 %long %real %fn evalmono2(%long %real a0, %long %real a1, %long %real a2, %long %real t)
   46     %result = a0 + (t * (a1 + (t * a2)))
   47 %end
   48
   49 { uses Horner's rule }
   50 %long %real %fn evalmono3(%long %real a0, %long %real a1, %long %real a2, %long %real a3, %long %real t)
   51     %result = a0 + (t * (a1 + (t * (a2 + (t * a3)))))
   52 %end
   53
   54     %long %real p0m, p1m, p2m, q0m, q1m, q2m, r0m, r1m, r2m, r3m
   55     %long %real p0b2, p1b2, p2b2, q0b2, q1b2, q2b2
   56     %long %real p0b3, p1b3, p2b3, p3b3, q0b3, q1b3, q2b3, q3b3, r0b3, r1b3, r2b3, r3b3
   57     %long %real pc0, pc1, pc2, pc3, qc0, qc1, qc2, qc3
   58
   59     %long %real x, y, m
   60
   61     p0m = 1; p1m = 0; p2m = 0
   62     q0m = 1; q1m = 2; q2m = 3
   63     r0m = 1; r1m = 2; r2m = 3; r3m = 4
   64
   65     tobern2 (p0m, p1m, p2m, p0b2, p1b2, p2b2)
   66     tobern2 (q0m, q1m, q2m, q0b2, q1b2, q2b2)
   67     print string ("Subprogram (1) examples:".snl)
   68     print string ("  mono ( ")
				ldr	r6, .L5+16
		.LPIC1:
				add	r6, pc
				mov	r2, r4
				mov	r1, r6
				add	r7, sp, #44800
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL19:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #1020
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL20:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL21:
		.LBE892:
		.LBB893:
		.LBB894:
				mov	r2, r5
				add	r1, sp, #45056
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL22:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL23:
		.LBE894:
		.LBE893:
		.LBB895:
		.LBB896:
				vmov.f64	d8, #1.0e+0
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL24:
		.LBE896:
		.LBE895:
		.LBB897:
   69     print fl (p0m, 4); print string (", ")
				mov	r2, r8
				add	r1, sp, #764
				add	r6, sp, #45056
				adds	r6, r6, #252
				mov	r0, r6
				bl	_imp_join(PLT)
		.LVL15:
				mov	r4, #256
				mov	r2, r4
				add	r1, sp, #508
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL16:
		.LBE889:
		.LBE888:
		.LBB890:
		.LBB891:
				movs	r5, #240
				mov	r2, r5
				add	r1, sp, #45312
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL17:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL18:
		.LBE891:
		.LBE890:
		.LBB892:
   70     print fl (p1m, 4); print string (", ")
				add	r9, r6, r4
				mov	r2, r4
				mov	r1, r9
				add	r7, sp, #44544
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL25:
				mov	r2, r4
				mov	r1, r7
				addw	r10, sp, #1276
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL26:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL27:
		.LBE897:
		.LBB898:
		.LBB899:
				mov	r2, r5
				add	r1, sp, #44800
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL28:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL29:
		.LBE899:
		.LBE898:
		.LBB900:
		.LBB901:
				vldr.64	d9, .L5
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL30:
		.LBE901:
		.LBE900:
		.LBB902:
   71     print fl (p2m, 4); print string (") --> bern ( ")
				mov	r2, r4
				mov	r1, r9
				add	r7, sp, #44288
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL31:
				mov	r2, r4
				mov	r1, r7
				addw	r10, sp, #1532
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL32:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL33:
		.LBE902:
		.LBB903:
		.LBB904:
				mov	r2, r5
				add	r1, sp, #44544
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL34:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL35:
		.LBE904:
		.LBE903:
		.LBB905:
		.LBB906:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL36:
		.LBE906:
		.LBE905:
		.LBB907:
   72     print fl (p0b2, 4); print string (", ")
				add	r10, r6, #512
				mov	r2, r4
				mov	r1, r10
				add	r7, sp, #44032
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL37:
				mov	r2, r4
				mov	r1, r7
				addw	fp, sp, #1788
				mov	r0, fp
				bl	memcpy(PLT)
		.LVL38:
				mov	r2, r4
				mov	r1, fp
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL39:
		.LBE907:
		.LBB908:
		.LBB909:
				mov	r2, r5
				add	r1, sp, #44288
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL40:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL41:
		.LBE909:
		.LBE908:
		.LBB910:
		.LBB911:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL42:
		.LBE911:
		.LBE910:
		.LBB912:
   73     print fl (p1b2, 4); print string (", ")
				mov	r2, r4
				mov	r1, r9
				add	r7, sp, #43776
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL43:
				mov	r2, r4
				mov	r1, r7
				addw	fp, sp, #2044
				mov	r0, fp
				bl	memcpy(PLT)
		.LVL44:
				mov	r2, r4
				mov	r1, fp
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL45:
		.LBE912:
		.LBB913:
		.LBB914:
				mov	r2, r5
				add	r1, sp, #44032
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL46:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL47:
		.LBE914:
		.LBE913:
		.LBB915:
		.LBB916:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL48:
		.LBE916:
		.LBE915:
		.LBB917:
   74     print fl (p2b2, 4); print string (")".snl)
				mov	r2, r4
				mov	r1, r9
				add	r7, sp, #43520
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL49:
				mov	r2, r4
				mov	r1, r7
				addw	fp, sp, #2300
				mov	r0, fp
				bl	memcpy(PLT)
		.LVL50:
				mov	r2, r4
				mov	r1, fp
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL51:
		.LBE917:
		.LBB918:
		.LBB919:
				mov	r2, r5
				add	r1, sp, #43776
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL52:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL53:
		.LBE919:
		.LBE918:
		.LBB920:
		.LBB921:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL54:
		.LBE921:
		.LBE920:
		.LBB922:
		.LBB923:
   75     print string ("  mono ( ")
				mov	r2, r4
				mov	r1, r6
				add	r7, sp, #43008
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL59:
				mov	r2, r4
				mov	r1, r7
				addw	fp, sp, #3068
				mov	r0, fp
				bl	memcpy(PLT)
		.LVL60:
				mov	r2, r4
				mov	r1, fp
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL61:
		.LBE926:
		.LBB927:
		.LBB928:
				mov	r2, r5
				add	r1, sp, #43264
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL62:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL63:
		.LBE928:
		.LBE927:
		.LBB929:
		.LBB930:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL64:
		.LBE930:
		.LBE929:
		.LBB931:
				mov	r2, r4
				mov	r1, r9
				add	r7, sp, #42752
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL65:
				mov	r2, r4
				mov	r1, r7
				addw	fp, sp, #3324
				mov	r0, fp
				bl	memcpy(PLT)
		.LVL66:
				mov	r2, r4
				mov	r1, fp
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL67:
		.LBE931:
		.LBB932:
		.LBB933:
				mov	r2, r5
				add	r1, sp, #43008
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL68:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL69:
		.LBE933:
		.LBE932:
		.LBB934:
		.LBB935:
				vmov.f64	d9, #2.0e+0
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL70:
		.LBE935:
		.LBE934:
		.LBB936:
   76     print fl (q0m, 4); print string (", ")
   77     print fl (q1m, 4); print string (", ")
				mov	r2, r8
				addw	r1, sp, #2812
				add	r7, sp, #43264
				adds	r7, r7, #252
				mov	r0, r7
				bl	_imp_join(PLT)
		.LVL55:
				mov	r2, r4
				addw	r1, sp, #2556
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL56:
		.LBE923:
		.LBE922:
		.LBB924:
		.LBB925:
				mov	r2, r5
				add	r1, sp, #43520
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL57:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL58:
		.LBE925:
		.LBE924:
		.LBB926:
   78     print fl (q2m, 4); print string (") --> bern ( ")
				mov	r2, r4
				mov	r1, r9
				add	r7, sp, #42496
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL71:
				mov	r2, r4
				mov	r1, r7
				addw	fp, sp, #3580
				mov	r0, fp
				bl	memcpy(PLT)
		.LVL72:
				mov	r2, r4
				mov	r1, fp
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL73:
		.LBE936:
		.LBB937:
		.LBB938:
				mov	r2, r5
				add	r1, sp, #42752
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL74:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL75:
		.LBE938:
		.LBE937:
		.LBB939:
		.LBB940:
				movs	r0, #4
				vmov.f64	d0, #3.0e+0
				bl	_imp_printfl(PLT)
		.LVL76:
		.LBE940:
		.LBE939:
		.LBB941:
   79     print fl (q0b2, 4); print string (", ")
				mov	r2, r4
				mov	r1, r10
				add	r7, sp, #42240
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL77:
				mov	r2, r4
				mov	r1, r7
				addw	r10, sp, #3836
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL78:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL79:
		.LBE941:
		.LBB942:
		.LBB943:
				mov	r2, r5
				add	r1, sp, #42496
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL80:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL81:
		.LBE943:
		.LBE942:
		.LBB944:
		.LBB945:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL82:
		.LBE945:
		.LBE944:
		.LBB946:
   80     print fl (q1b2, 4); print string (", ")
				mov	r2, r4
				mov	r1, r9
				add	r7, sp, #41984
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL83:
				mov	r2, r4
				mov	r1, r7
				addw	r10, sp, #4092
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL84:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL85:
		.LBE946:
		.LBB947:
		.LBB948:
				mov	r2, r5
				add	r1, sp, #42240
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL86:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL87:
		.LBE948:
		.LBE947:
		.LBB949:
		.LBB950:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL88:
		.LBE950:
		.LBE949:
		.LBB951:
   81     print fl (q2b2, 4); print string (")".snl)
				mov	r2, r4
				mov	r1, r9
				add	r7, sp, #41728
				adds	r7, r7, #252
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL89:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #4320
				add	r9, r9, #28
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL90:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL91:
		.LBE951:
		.LBB952:
		.LBB953:
				mov	r2, r5
				add	r1, sp, #41984
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL92:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL93:
		.LBE953:
		.LBE952:
		.LBB954:
		.LBB955:
				movs	r0, #4
				vmov.f64	d0, #6.0e+0
				bl	_imp_printfl(PLT)
		.LVL94:
		.LBE955:
		.LBE954:
		.LBB956:
		.LBB957:
   82
   83     print string ("Subprogram (2) examples:".snl)
   84     x = 0.25
				mov	r2, r8
				add	r1, sp, #4832
				adds	r1, r1, #28
				add	r7, sp, #41472
				adds	r7, r7, #252
				mov	r0, r7
				bl	_imp_join(PLT)
		.LVL95:
				mov	r2, r4
				add	r1, sp, #4576
				adds	r1, r1, #28
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL96:
		.LBE957:
		.LBE956:
		.LBB958:
		.LBB959:
				mov	r2, r5
				add	r1, sp, #41728
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL97:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL98:
		.LBE959:
		.LBE958:
		.LBB960:
		.LBB961:
   85     y = evalbern2 (p0b2, p1b2, p2b2, x)
				add	r9, sp, #41472
				sub	r7, r9, #4
				mov	r2, r8
				add	r1, sp, #5344
				adds	r1, r1, #28
				mov	r0, r7
				bl	_imp_join(PLT)
		.LVL99:
				mov	r2, r4
				add	r1, sp, #5088
				adds	r1, r1, #28
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL100:
		.LBE961:
		.LBE960:
		.LBB962:
		.LBB963:
				mov	r2, r5
				add	r1, r9, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL101:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL102:
		.LBE963:
		.LBE962:
		.LBB964:
   86     print string ("  p ( "); print fl (x, 4)
				add	r10, sp, #41216
				sub	r7, r10, #4
				add	r9, r6, #768
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL103:
				mov	r2, r4
				mov	r1, r7
				add	r8, sp, #5600
				add	r8, r8, #28
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL104:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL105:
		.LBE964:
		.LBB965:
		.LBB966:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL106:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL107:
		.LBE966:
		.LBE965:
		.LBB967:
		.LBB968:
				vmov.f64	d9, #2.5e-1
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL108:
		.LBE968:
		.LBE967:
		.LBB969:
   87     print string (") = "); print fl (y, 4)
				add	fp, sp, #40960
				sub	r7, fp, #4
				add	r8, r6, #1024
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				b	.L6
		.L7:
				.align	3
		.L5:
				.word	0
				.word	0
				.word	_GLOBAL_OFFSET_TABLE_-(.LPIC0+4)
				.word	__stack_chk_guard(GOT)
				.word	.LANCHOR0-(.LPIC1+4)
		.L6:
				bl	memcpy(PLT)
		.LVL109:
				mov	r2, r4
				mov	r1, r7
				add	r10, sp, #5856
				add	r10, r10, #28
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL110:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL111:
		.LBE969:
		.LBB970:
		.LBB971:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL112:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL113:
		.LBE971:
		.LBE970:
		.LBB972:
		.LBB973:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL114:
		.LBE973:
		.LBE972:
		.LBB974:
		.LBB975:
				bl	_imp_newline(PLT)
		.LVL115:
		.LBE975:
		.LBE974:
		.LBB976:
   88     newline
   89     x = 7.50
   90     y = evalbern2 (p0b2, p1b2, p2b2, x)
   91     print string ("  p ( "); print fl (x, 4)
				add	r10, sp, #40704
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL116:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #6112
				add	r9, r9, #28
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL117:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL118:
		.LBE976:
		.LBB977:
		.LBB978:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL119:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL120:
		.LBE978:
		.LBE977:
		.LBB979:
		.LBB980:
				movs	r0, #4
				vmov.f64	d0, #7.5e+0
				bl	_imp_printfl(PLT)
		.LVL121:
		.LBE980:
		.LBE979:
		.LBB981:
   92     print string (") = "); print fl (y, 4)
				add	r10, sp, #40448
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL122:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #6368
				add	r9, r9, #28
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL123:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL124:
		.LBE981:
		.LBB982:
		.LBB983:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL125:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL126:
		.LBE983:
		.LBE982:
		.LBB984:
		.LBB985:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL127:
		.LBE985:
		.LBE984:
		.LBB986:
		.LBB987:
				bl	_imp_newline(PLT)
		.LVL128:
		.LBE987:
		.LBE986:
		.LBB988:
   93     newline
   94     x = 0.25
   95     y = evalbern2 (q0b2, q1b2, q2b2, x)
   96     print string ("  q ( "); print fl (x, 4)
				add	r10, sp, #40192
				sub	r7, r10, #4
				add	r6, r6, #1280
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL129:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #6624
				add	r9, r9, #28
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL130:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL131:
		.LBE988:
		.LBB989:
		.LBB990:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL132:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL133:
		.LBE990:
		.LBE989:
		.LBB991:
		.LBB992:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL134:
		.LBE992:
		.LBE991:
		.LBB993:
   97     print string (") = "); print fl (y, 4)
				add	r9, sp, #39936
				sub	r7, r9, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL135:
				mov	r2, r4
				mov	r1, r7
				add	r8, sp, #6880
				add	r8, r8, #28
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL136:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL137:
		.LBE993:
		.LBB994:
		.LBB995:
				mov	r2, r5
				add	r1, r9, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL138:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL139:
		.LBE995:
		.LBE994:
		.LBB996:
		.LBB997:
				movs	r0, #4
				vmov.f64	d0, #1.6875e+0
				bl	_imp_printfl(PLT)
		.LVL140:
		.LBE997:
		.LBE996:
		.LBB998:
		.LBB999:
				bl	_imp_newline(PLT)
		.LVL141:
		.LBE999:
		.LBE998:
		.LBB1000:
   98     newline
   99     x = 7.50
  100     y = evalbern2 (q0b2, q1b2, q2b2, x)
  101     print string ("  q ( "); print fl (x, 4)
				add	r7, sp, #39680
				sub	r8, r7, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL142:
				mov	r2, r4
				mov	r1, r8
				add	r5, sp, #7136
				adds	r5, r5, #28
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL143:
				mov	r2, r4
				mov	r1, r5
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL144:
		.LBE1000:
		.LBB1001:
		.LBB1002:
				movs	r5, #240
				mov	r2, r5
				add	r1, r7, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL145:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL146:
		.LBE1002:
		.LBE1001:
		.LBB1003:
		.LBB1004:
				movs	r0, #4
				vmov.f64	d0, #7.5e+0
				bl	_imp_printfl(PLT)
		.LVL147:
		.LBE1004:
		.LBE1003:
		.LBB1005:
  102     print string (") = "); print fl (y, 4)
				add	r9, sp, #39424
				sub	r6, r9, #4
				ldr	r7, .L8+16
		.LPIC20:
				add	r7, pc
				mov	r4, #256
				mov	r2, r4
				add	r1, r7, #1024
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL148:
				mov	r2, r4
				mov	r1, r6
				add	r8, sp, #7392
				add	r8, r8, #28
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL149:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL150:
		.LBE1005:
		.LBB1006:
		.LBB1007:
				mov	r2, r5
				add	r1, r9, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL151:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL152:
		.LBE1007:
		.LBE1006:
		.LBB1008:
		.LBB1009:
				movs	r0, #4
				vldr.64	d0, .L8
				bl	_imp_printfl(PLT)
		.LVL153:
		.LBE1009:
		.LBE1008:
		.LBB1010:
		.LBB1011:
				bl	_imp_newline(PLT)
		.LVL154:
		.LBE1011:
		.LBE1010:
		.LBB1012:
		.LBB1013:
  103     newline
  104
  105     tobern3 (p0m, p1m, p2m, 0, p0b3, p1b3, p2b3, p3b3)
  106     tobern3 (q0m, q1m, q2m, 0, q0b3, q1b3, q2b3, q3b3)
  107     tobern3 (r0m, r1m, r2m, r3m, r0b3, r1b3, r2b3, r3b3)
  108     print string ("Subprogram (3) examples:".snl)
  109     print string ("  mono ( ")
				add	r10, sp, #38912
				sub	r6, r10, #4
				mov	r2, r4
				mov	r1, r7
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL159:
				mov	r2, r4
				mov	r1, r6
				add	r8, sp, #8160
				add	r8, r8, #28
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL160:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL161:
		.LBE1016:
		.LBB1017:
		.LBB1018:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL162:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL163:
		.LBE1018:
		.LBE1017:
		.LBB1019:
		.LBB1020:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL164:
		.LBE1020:
		.LBE1019:
		.LBB1021:
  110     print fl (p0m, 4); print string (", ")
				add	r8, sp, #39168
				sub	r6, r8, #4
				add	r9, sp, #252
				mov	r2, r9
				add	r1, sp, #7904
				adds	r1, r1, #28
				mov	r0, r6
				bl	_imp_join(PLT)
		.LVL155:
				mov	r2, r4
				add	r1, sp, #7648
				adds	r1, r1, #28
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL156:
		.LBE1013:
		.LBE1012:
		.LBB1014:
		.LBB1015:
				mov	r2, r5
				add	r1, r8, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL157:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL158:
		.LBE1015:
		.LBE1014:
		.LBB1016:
  111     print fl (p1m, 4); print string (", ")
				add	fp, sp, #38656
				sub	r8, fp, #4
				adds	r6, r7, r4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL165:
				mov	r2, r4
				mov	r1, r8
				add	r10, sp, #8384
				add	r10, r10, #60
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL166:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL167:
		.LBE1021:
		.LBB1022:
		.LBB1023:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL168:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL169:
		.LBE1023:
		.LBE1022:
		.LBB1024:
		.LBB1025:
				vldr.64	d9, .L8+8
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL170:
		.LBE1025:
		.LBE1024:
		.LBB1026:
  112     print fl (p2m, 4); print string (", ")
				add	fp, sp, #38400
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL171:
				mov	r2, r4
				mov	r1, r8
				add	r10, sp, #8640
				add	r10, r10, #60
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL172:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL173:
		.LBE1026:
		.LBB1027:
		.LBB1028:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL174:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL175:
		.LBE1028:
		.LBE1027:
		.LBB1029:
		.LBB1030:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL176:
		.LBE1030:
		.LBE1029:
		.LBB1031:
  113     print fl (0, 4); print string (") --> bern ( ")
				add	fp, sp, #38144
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL177:
				mov	r2, r4
				mov	r1, r8
				add	r10, sp, #8896
				add	r10, r10, #60
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL178:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL179:
		.LBE1031:
		.LBB1032:
		.LBB1033:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL180:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL181:
		.LBE1033:
		.LBE1032:
		.LBB1034:
		.LBB1035:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL182:
		.LBE1035:
		.LBE1034:
		.LBB1036:
  114     print fl (p0b3, 4); print string (", ")
				add	fp, sp, #37888
				sub	r8, fp, #4
				add	r10, r7, #512
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL183:
				mov	r2, r4
				mov	r1, r8
				add	r3, sp, #9152
				adds	r3, r3, #60
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL184:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL185:
		.LBE1036:
		.LBB1037:
		.LBB1038:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL186:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL187:
		.LBE1038:
		.LBE1037:
		.LBB1039:
		.LBB1040:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL188:
		.LBE1040:
		.LBE1039:
		.LBB1041:
  115     print fl (p1b3, 4); print string (", ")
				add	fp, sp, #37632
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL189:
				mov	r2, r4
				mov	r1, r8
				add	r3, sp, #9408
				adds	r3, r3, #60
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL190:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL191:
		.LBE1041:
		.LBB1042:
		.LBB1043:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL192:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL193:
		.LBE1043:
		.LBE1042:
		.LBB1044:
		.LBB1045:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL194:
		.LBE1045:
		.LBE1044:
		.LBB1046:
  116     print fl (p2b3, 4); print string (", ")
				add	fp, sp, #37376
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL195:
				mov	r2, r4
				mov	r1, r8
				add	r3, sp, #9664
				adds	r3, r3, #60
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL196:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL197:
		.LBE1046:
		.LBB1047:
		.LBB1048:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL198:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL199:
		.LBE1048:
		.LBE1047:
		.LBB1049:
		.LBB1050:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL200:
		.LBE1050:
		.LBE1049:
		.LBB1051:
  117     print fl (p3b3, 4); print string (")".snl)
				add	fp, sp, #37120
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL201:
				mov	r2, r4
				mov	r1, r8
				add	r3, sp, #9920
				adds	r3, r3, #60
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL202:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL203:
		.LBE1051:
		.LBB1052:
		.LBB1053:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL204:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL205:
		.LBE1053:
		.LBE1052:
		.LBB1054:
		.LBB1055:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL206:
		.LBE1055:
		.LBE1054:
		.LBB1056:
		.LBB1057:
  118     print string ("  mono ( ")
				add	fp, sp, #36608
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r7
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL211:
				mov	r2, r4
				mov	r1, r8
				add	r3, sp, #10688
				adds	r3, r3, #60
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL212:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL213:
		.LBE1060:
		.LBB1061:
		.LBB1062:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL214:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL215:
		.LBE1062:
		.LBE1061:
		.LBB1063:
		.LBB1064:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL216:
		.LBE1064:
		.LBE1063:
		.LBB1065:
				add	fp, sp, #36352
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL217:
				mov	r2, r4
				mov	r1, r8
				add	r3, sp, #10944
				adds	r3, r3, #60
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL218:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL219:
		.LBE1065:
		.LBB1066:
		.LBB1067:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL220:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL221:
		.LBE1067:
		.LBE1066:
		.LBB1068:
		.LBB1069:
				movs	r0, #4
				vmov.f64	d0, #2.0e+0
				bl	_imp_printfl(PLT)
		.LVL222:
		.LBE1069:
		.LBE1068:
		.LBB1070:
  119     print fl (q0m, 4); print string (", ")
  120     print fl (q1m, 4); print string (", ")
				add	fp, sp, #36864
				sub	r8, fp, #4
				mov	r2, r9
				add	r1, sp, #10432
				adds	r1, r1, #60
				mov	r0, r8
				bl	_imp_join(PLT)
		.LVL207:
				mov	r2, r4
				add	r1, sp, #10176
				adds	r1, r1, #60
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL208:
		.LBE1057:
		.LBE1056:
		.LBB1058:
		.LBB1059:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL209:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL210:
		.LBE1059:
		.LBE1058:
		.LBB1060:
  121     print fl (q2m, 4); print string (", ")
				add	fp, sp, #36096
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL223:
				mov	r2, r4
				mov	r1, r8
				add	r3, sp, #11200
				adds	r3, r3, #60
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL224:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL225:
		.LBE1070:
		.LBB1071:
		.LBB1072:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL226:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL227:
		.LBE1072:
		.LBE1071:
		.LBB1073:
		.LBB1074:
				movs	r0, #4
				vmov.f64	d0, #3.0e+0
				bl	_imp_printfl(PLT)
		.LVL228:
		.LBE1074:
		.LBE1073:
		.LBB1075:
  122     print fl (0, 4); print string (") --> bern ( ")
				add	fp, sp, #35840
				sub	r8, fp, #4
				mov	r2, r4
				b	.L9
		.L10:
				.align	3
		.L8:
				.word	0
				.word	1080498176
				.word	0
				.word	0
				.word	.LANCHOR0-(.LPIC20+4)
		.L9:
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL229:
				mov	r2, r4
				mov	r1, r8
				add	r3, sp, #11456
				adds	r3, r3, #60
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL230:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL231:
		.LBE1075:
		.LBB1076:
		.LBB1077:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL232:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL233:
		.LBE1077:
		.LBE1076:
		.LBB1078:
		.LBB1079:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL234:
		.LBE1079:
		.LBE1078:
		.LBB1080:
  123     print fl (q0b3, 4); print string (", ")
				add	fp, sp, #35584
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL235:
				mov	r2, r4
				mov	r1, r8
				add	r10, sp, #11712
				add	r10, r10, #60
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL236:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL237:
		.LBE1080:
		.LBB1081:
		.LBB1082:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL238:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL239:
		.LBE1082:
		.LBE1081:
		.LBB1083:
		.LBB1084:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL240:
		.LBE1084:
		.LBE1083:
		.LBB1085:
  124     print fl (q1b3, 4); print string (", ")
				add	fp, sp, #35328
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL241:
				mov	r2, r4
				mov	r1, r8
				add	r10, sp, #11968
				add	r10, r10, #60
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL242:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL243:
		.LBE1085:
		.LBB1086:
		.LBB1087:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL244:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL245:
		.LBE1087:
		.LBE1086:
		.LBB1088:
		.LBB1089:
				movs	r0, #4
				vldr.64	d0, .L11
				bl	_imp_printfl(PLT)
		.LVL246:
		.LBE1089:
		.LBE1088:
		.LBB1090:
  125     print fl (q2b3, 4); print string (", ")
				add	fp, sp, #35072
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL247:
				mov	r2, r4
				mov	r1, r8
				add	r10, sp, #12224
				add	r10, r10, #60
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL248:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL249:
		.LBE1090:
		.LBB1091:
		.LBB1092:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL250:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL251:
		.LBE1092:
		.LBE1091:
		.LBB1093:
		.LBB1094:
				movs	r0, #4
				vldr.64	d0, .L11+8
				bl	_imp_printfl(PLT)
		.LVL252:
		.LBE1094:
		.LBE1093:
		.LBB1095:
  126     print fl (q3b3, 4); print string (")".snl)
				add	fp, sp, #34816
				sub	r8, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL253:
				mov	r2, r4
				mov	r1, r8
				add	r10, sp, #12480
				add	r10, r10, #60
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL254:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL255:
		.LBE1095:
		.LBB1096:
		.LBB1097:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL256:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL257:
		.LBE1097:
		.LBE1096:
		.LBB1098:
		.LBB1099:
				movs	r0, #4
				vmov.f64	d0, #6.0e+0
				bl	_imp_printfl(PLT)
		.LVL258:
		.LBE1099:
		.LBE1098:
		.LBB1100:
		.LBB1101:
  127     print string ("  mono ( ")
				add	r9, sp, #34304
				sub	r8, r9, #4
				mov	r2, r4
				mov	r1, r7
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL263:
				mov	r2, r4
				mov	r1, r8
				add	r7, sp, #13248
				adds	r7, r7, #60
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL264:
				mov	r2, r4
				mov	r1, r7
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL265:
		.LBE1104:
		.LBB1105:
		.LBB1106:
				mov	r2, r5
				add	r1, r9, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL266:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL267:
		.LBE1106:
		.LBE1105:
		.LBB1107:
		.LBB1108:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL268:
		.LBE1108:
		.LBE1107:
		.LBB1109:
				mov	r2, r4
				mov	r1, r6
				add	r5, sp, #33792
				adds	r5, r5, #252
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL269:
				mov	r2, r4
				mov	r1, r5
				add	r6, sp, #13504
				adds	r6, r6, #60
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL270:
				mov	r2, r4
				mov	r1, r6
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL271:
		.LBE1109:
		.LBB1110:
		.LBB1111:
				add	r1, sp, #34048
				subs	r6, r1, #4
				movs	r5, #240
				mov	r2, r5
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL272:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL273:
		.LBE1111:
		.LBE1110:
		.LBB1112:
		.LBB1113:
				movs	r0, #4
				vmov.f64	d0, #2.0e+0
				bl	_imp_printfl(PLT)
		.LVL274:
		.LBE1113:
		.LBE1112:
		.LBB1114:
  128     print fl (r0m, 4); print string (", ")
  129     print fl (r1m, 4); print string (", ")
				add	r10, sp, #34560
				sub	r8, r10, #4
				mov	r2, r9
				add	r1, sp, #12992
				adds	r1, r1, #60
				mov	r0, r8
				bl	_imp_join(PLT)
		.LVL259:
				mov	r2, r4
				add	r1, sp, #12736
				adds	r1, r1, #60
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL260:
		.LBE1101:
		.LBE1100:
		.LBB1102:
		.LBB1103:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL261:
				ldm	r8, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL262:
		.LBE1103:
		.LBE1102:
		.LBB1104:
  130     print fl (r2m, 4); print string (", ")
				add	r10, sp, #33792
				sub	r7, r10, #4
				ldr	r6, .L11+16
		.LPIC39:
				add	r6, pc
				add	r8, r6, r4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL275:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #13760
				add	r9, r9, #60
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL276:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL277:
		.LBE1114:
		.LBB1115:
		.LBB1116:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL278:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL279:
		.LBE1116:
		.LBE1115:
		.LBB1117:
		.LBB1118:
				movs	r0, #4
				vmov.f64	d0, #3.0e+0
				bl	_imp_printfl(PLT)
		.LVL280:
		.LBE1118:
		.LBE1117:
		.LBB1119:
  131     print fl (r3m, 4); print string (") --> bern ( ")
				add	r10, sp, #33536
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL281:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #14016
				add	r9, r9, #60
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL282:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL283:
		.LBE1119:
		.LBB1120:
		.LBB1121:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL284:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL285:
		.LBE1121:
		.LBE1120:
		.LBB1122:
		.LBB1123:
				movs	r0, #4
				vmov.f64	d0, #4.0e+0
				bl	_imp_printfl(PLT)
		.LVL286:
		.LBE1123:
		.LBE1122:
		.LBB1124:
  132     print fl (r0b3, 4); print string (", ")
				add	r10, sp, #33280
				sub	r7, r10, #4
				mov	r2, r4
				add	r1, r6, #512
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL287:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #14272
				add	r9, r9, #60
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL288:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL289:
		.LBE1124:
		.LBB1125:
		.LBB1126:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL290:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL291:
		.LBE1126:
		.LBE1125:
		.LBB1127:
		.LBB1128:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL292:
		.LBE1128:
		.LBE1127:
		.LBB1129:
  133     print fl (r1b3, 4); print string (", ")
				add	r10, sp, #33024
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL293:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #14528
				add	r9, r9, #60
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL294:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL295:
		.LBE1129:
		.LBB1130:
		.LBB1131:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL296:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL297:
		.LBE1131:
		.LBE1130:
		.LBB1132:
		.LBB1133:
				vldr.64	d11, .L11
				movs	r0, #4
				vmov.f64	d0, d11
				bl	_imp_printfl(PLT)
		.LVL298:
		.LBE1133:
		.LBE1132:
		.LBB1134:
  134     print fl (r2b3, 4); print string (", ")
				add	r10, sp, #32768
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL299:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #14784
				add	r9, r9, #60
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL300:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL301:
		.LBE1134:
		.LBB1135:
		.LBB1136:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL302:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL303:
		.LBE1136:
		.LBE1135:
		.LBB1137:
		.LBB1138:
				vldr.64	d12, .L11+8
				movs	r0, #4
				vmov.f64	d0, d12
				bl	_imp_printfl(PLT)
		.LVL304:
		.LBE1138:
		.LBE1137:
		.LBB1139:
  135     print fl (r3b3, 4); print string (")".snl)
				add	r9, sp, #32512
				sub	r7, r9, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL305:
				mov	r2, r4
				mov	r1, r7
				add	r8, sp, #15040
				add	r8, r8, #60
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL306:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL307:
		.LBE1139:
		.LBB1140:
		.LBB1141:
				mov	r2, r5
				add	r1, r9, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL308:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL309:
		.LBE1141:
		.LBE1140:
		.LBB1142:
		.LBB1143:
				vmov.f64	d13, #1.0e+1
				movs	r0, #4
				vmov.f64	d0, d13
				bl	_imp_printfl(PLT)
		.LVL310:
		.LBE1143:
		.LBE1142:
		.LBB1144:
		.LBB1145:
  136
  137     print string ("Subprogram (4) examples:".snl)
  138     x = 0.25
				add	r8, sp, #32256
				sub	r7, r8, #4
				add	r9, sp, #252
				mov	r2, r9
				add	r1, sp, #15552
				adds	r1, r1, #60
				mov	r0, r7
				bl	_imp_join(PLT)
		.LVL311:
				mov	r2, r4
				add	r1, sp, #15296
				adds	r1, r1, #60
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL312:
		.LBE1145:
		.LBE1144:
		.LBB1146:
		.LBB1147:
				mov	r2, r5
				add	r1, r8, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL313:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL314:
		.LBE1147:
		.LBE1146:
		.LBB1148:
		.LBB1149:
  139     y = evalbern3 (p0b3, p1b3, p2b3, p3b3, x)
				add	r8, sp, #32000
				sub	r7, r8, #4
				mov	r2, r9
				add	r1, sp, #16064
				adds	r1, r1, #60
				mov	r0, r7
				bl	_imp_join(PLT)
		.LVL315:
				mov	r2, r4
				add	r1, sp, #15808
				adds	r1, r1, #60
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL316:
		.LBE1149:
		.LBE1148:
		.LBB1150:
		.LBB1151:
				mov	r2, r5
				add	r1, r8, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL317:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL318:
		.LBE1151:
		.LBE1150:
				vmov.f64	d10, #2.5e-1
				vmov.f64	d4, d10
				vmov.f64	d3, d8
				vmov.f64	d2, d8
				vmov.f64	d1, d8
				vmov.f64	d0, d8
				bl	EVALBERN3.10058(PLT)
		.LVL319:
				vmov.f64	d9, d0
		.LVL320:
		.LBB1152:
  140     print string ("  p ( "); print fl (x, 4)
				add	r10, sp, #31744
				sub	r7, r10, #4
				add	r9, r6, #768
				mov	r2, r4
				mov	r1, r9
				b	.L12
		.L13:
				.align	3
		.L11:
				.word	-1431655766
				.word	1073392298
				.word	-1431655766
				.word	1074440874
				.word	.LANCHOR0-(.LPIC39+4)
		.L12:
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL321:
				mov	r2, r4
				mov	r1, r7
				add	r8, sp, #16320
				add	r8, r8, #60
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL322:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL323:
		.LBE1152:
		.LBB1153:
		.LBB1154:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL324:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL325:
		.LBE1154:
		.LBE1153:
		.LBB1155:
		.LBB1156:
				movs	r0, #4
				vmov.f64	d0, d10
				bl	_imp_printfl(PLT)
		.LVL326:
		.LBE1156:
		.LBE1155:
		.LBB1157:
  141     print string (") = "); print fl (y, 4)
				add	fp, sp, #31488
				sub	r7, fp, #4
				add	r8, r6, #1024
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL327:
				mov	r2, r4
				mov	r1, r7
				add	r10, sp, #16512
				add	r10, r10, #124
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL328:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL329:
		.LBE1157:
		.LBB1158:
		.LBB1159:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL330:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL331:
		.LBE1159:
		.LBE1158:
		.LBB1160:
		.LBB1161:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL332:
		.LBE1161:
		.LBE1160:
		.LBB1162:
		.LBB1163:
				bl	_imp_newline(PLT)
		.LVL333:
		.LBE1163:
		.LBE1162:
  142     newline
  143     x = 7.50
  144     y = evalbern3 (p0b3, p1b3, p2b3, p3b3, x)
				vmov.f64	d9, #7.5e+0
		.LVL334:
				vmov.f64	d4, d9
				vmov.f64	d3, d8
				vmov.f64	d2, d8
				vmov.f64	d1, d8
				vmov.f64	d0, d8
				bl	EVALBERN3.10058(PLT)
		.LVL335:
				vmov.f64	d14, d0
		.LVL336:
		.LBB1164:
  145     print string ("  p ( "); print fl (x, 4)
				add	r10, sp, #31232
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL337:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #16768
				add	r9, r9, #124
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL338:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL339:
		.LBE1164:
		.LBB1165:
		.LBB1166:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL340:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL341:
		.LBE1166:
		.LBE1165:
		.LBB1167:
		.LBB1168:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL342:
		.LBE1168:
		.LBE1167:
		.LBB1169:
  146     print string (") = "); print fl (y, 4)
				add	r10, sp, #30976
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL343:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #17024
				add	r9, r9, #124
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL344:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL345:
		.LBE1169:
		.LBB1170:
		.LBB1171:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL346:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL347:
		.LBE1171:
		.LBE1170:
		.LBB1172:
		.LBB1173:
				movs	r0, #4
				vmov.f64	d0, d14
				bl	_imp_printfl(PLT)
		.LVL348:
		.LBE1173:
		.LBE1172:
		.LBB1174:
		.LBB1175:
				bl	_imp_newline(PLT)
		.LVL349:
		.LBE1175:
		.LBE1174:
  147     newline
  148     x = 0.25
  149     y = evalbern3 (q0b3, q1b3, q2b3, q3b3, x)
				vmov.f64	d14, #6.0e+0
		.LVL350:
				vmov.f64	d4, d10
				vmov.f64	d3, d14
				vmov.f64	d2, d12
				vmov.f64	d1, d11
				vmov.f64	d0, d8
				bl	EVALBERN3.10058(PLT)
		.LVL351:
				vmov.f64	d15, d0
		.LVL352:
		.LBB1176:
  150     print string ("  q ( "); print fl (x, 4)
				add	fp, sp, #30720
				sub	r7, fp, #4
				add	r9, r6, #1280
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL353:
				mov	r2, r4
				mov	r1, r7
				add	r10, sp, #17280
				add	r10, r10, #124
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL354:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL355:
		.LBE1176:
		.LBB1177:
		.LBB1178:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL356:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL357:
		.LBE1178:
		.LBE1177:
		.LBB1179:
		.LBB1180:
				movs	r0, #4
				vmov.f64	d0, d10
				bl	_imp_printfl(PLT)
		.LVL358:
		.LBE1180:
		.LBE1179:
		.LBB1181:
  151     print string (") = "); print fl (y, 4)
				add	fp, sp, #30464
				sub	r7, fp, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL359:
				mov	r2, r4
				mov	r1, r7
				add	r10, sp, #17536
				add	r10, r10, #124
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL360:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL361:
		.LBE1181:
		.LBB1182:
		.LBB1183:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL362:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL363:
		.LBE1183:
		.LBE1182:
		.LBB1184:
		.LBB1185:
				movs	r0, #4
				vmov.f64	d0, d15
				bl	_imp_printfl(PLT)
		.LVL364:
		.LBE1185:
		.LBE1184:
		.LBB1186:
		.LBB1187:
				bl	_imp_newline(PLT)
		.LVL365:
		.LBE1187:
		.LBE1186:
  152     newline
  153     x = 7.50
  154     y = evalbern3 (q0b3, q1b3, q2b3, q3b3, x)
				vmov.f64	d4, d9
				vmov.f64	d3, d14
				vmov.f64	d2, d12
				vmov.f64	d1, d11
				vmov.f64	d0, d8
				bl	EVALBERN3.10058(PLT)
		.LVL366:
				vmov.f64	d14, d0
		.LVL367:
		.LBB1188:
  155     print string ("  q ( "); print fl (x, 4)
				add	r10, sp, #30208
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL368:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #17792
				add	r9, r9, #124
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL369:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL370:
		.LBE1188:
		.LBB1189:
		.LBB1190:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL371:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL372:
		.LBE1190:
		.LBE1189:
		.LBB1191:
		.LBB1192:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL373:
		.LBE1192:
		.LBE1191:
		.LBB1193:
  156     print string (") = "); print fl (y, 4)
				add	r10, sp, #29952
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL374:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #18048
				add	r9, r9, #124
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL375:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL376:
		.LBE1193:
		.LBB1194:
		.LBB1195:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL377:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL378:
		.LBE1195:
		.LBE1194:
		.LBB1196:
		.LBB1197:
				movs	r0, #4
				vmov.f64	d0, d14
				bl	_imp_printfl(PLT)
		.LVL379:
		.LBE1197:
		.LBE1196:
		.LBB1198:
		.LBB1199:
				bl	_imp_newline(PLT)
		.LVL380:
		.LBE1199:
		.LBE1198:
  157     newline
  158     x = 0.25
  159     y = evalbern3 (r0b3, r1b3, r2b3, r3b3, x)
				vmov.f64	d4, d10
				vmov.f64	d3, d13
				vmov.f64	d2, d12
				vmov.f64	d1, d11
				vmov.f64	d0, d8
				bl	EVALBERN3.10058(PLT)
		.LVL381:
				vmov.f64	d14, d0
		.LVL382:
		.LBB1200:
  160     print string ("  r ( "); print fl (x, 4)
				add	r10, sp, #29696
				sub	r7, r10, #4
				add	r6, r6, #1536
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL383:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #18304
				add	r9, r9, #124
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL384:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL385:
		.LBE1200:
		.LBB1201:
		.LBB1202:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL386:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL387:
		.LBE1202:
		.LBE1201:
		.LBB1203:
		.LBB1204:
				movs	r0, #4
				vmov.f64	d0, d10
				bl	_imp_printfl(PLT)
		.LVL388:
		.LBE1204:
		.LBE1203:
		.LBB1205:
  161     print string (") = "); print fl (y, 4)
				add	r10, sp, #29440
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL389:
				mov	r2, r4
				mov	r1, r7
				add	r9, sp, #18560
				add	r9, r9, #124
				mov	r0, r9
				bl	memcpy(PLT)
		.LVL390:
				mov	r2, r4
				mov	r1, r9
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL391:
		.LBE1205:
		.LBB1206:
		.LBB1207:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL392:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL393:
		.LBE1207:
		.LBE1206:
		.LBB1208:
		.LBB1209:
				movs	r0, #4
				vmov.f64	d0, d14
				bl	_imp_printfl(PLT)
		.LVL394:
		.LBE1209:
		.LBE1208:
		.LBB1210:
		.LBB1211:
				bl	_imp_newline(PLT)
		.LVL395:
		.LBE1211:
		.LBE1210:
  162     newline
  163     x = 7.50
  164     y = evalbern3 (r0b3, r1b3, r2b3, r3b3, x)
				vmov.f64	d4, d9
				vmov.f64	d3, d13
				vmov.f64	d2, d12
				vmov.f64	d1, d11
				vmov.f64	d0, d8
				bl	EVALBERN3.10058(PLT)
		.LVL396:
				vmov.f64	d8, d0
		.LVL397:
		.LBB1212:
  165     print string ("  r ( "); print fl (x, 4)
				add	r9, sp, #29184
				sub	r7, r9, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL398:
				mov	r2, r4
				mov	r1, r7
				add	r6, sp, #18816
				adds	r6, r6, #124
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL399:
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL400:
		.LBE1212:
		.LBB1213:
		.LBB1214:
				mov	r2, r5
				add	r1, r9, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL401:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL402:
		.LBE1214:
		.LBE1213:
		.LBB1215:
		.LBB1216:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL403:
		.LBE1216:
		.LBE1215:
		.LBB1217:
  166     print string (") = "); print fl (y, 4)
				mov	r2, r4
				mov	r1, r8
				add	r5, sp, #28800
				adds	r5, r5, #124
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL404:
				mov	r2, r4
				mov	r1, r5
				add	r6, sp, #19072
				adds	r6, r6, #124
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL405:
				mov	r2, r4
				mov	r1, r6
				mov	r0, r5
				bl	memcpy(PLT)
		.LVL406:
		.LBE1217:
		.LBB1218:
		.LBB1219:
				add	r1, sp, #28928
				subs	r4, r1, #4
				movs	r5, #240
				mov	r2, r5
				adds	r1, r1, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL407:
				ldm	r4, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL408:
		.LBE1219:
		.LBE1218:
		.LBB1220:
		.LBB1221:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL409:
		.LBE1221:
		.LBE1220:
		.LBB1222:
		.LBB1223:
				bl	_imp_newline(PLT)
		.LVL410:
		.LBE1223:
		.LBE1222:
		.LBB1224:
		.LBB1225:
  167     newline
  168
  169     bern2to3 (p0b2, p1b2, p2b2, pc0, pc1, pc2, pc3)
  170     bern2to3 (q0b2, q1b2, q2b2, qc0, qc1, qc2, qc3)
  171     print string ("Subprogram (5) examples:".snl)
  172     print string ("  bern ( ")
				add	fp, sp, #28416
				sub	r6, fp, #4
				ldr	r8, .L14
		.LPIC57:
				add	r8, pc
				add	r10, r8, #1792
				mov	r2, r4
				mov	r1, r10
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL415:
				mov	r2, r4
				mov	r1, r6
				add	r7, sp, #19840
				adds	r7, r7, #124
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL416:
				mov	r2, r4
				mov	r1, r7
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL417:
		.LBE1228:
		.LBB1229:
		.LBB1230:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL418:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL419:
		.LBE1230:
		.LBE1229:
		.LBB1231:
		.LBB1232:
				vmov.f64	d8, #1.0e+0
		.LVL420:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL421:
		.LBE1232:
		.LBE1231:
		.LBB1233:
  173     print fl (p0b2, 4); print string (", ")
				add	r7, sp, #28672
				subs	r6, r7, #4
				add	r9, sp, #252
				mov	r2, r9
				add	r1, sp, #19584
				adds	r1, r1, #124
				mov	r0, r6
				bl	_imp_join(PLT)
		.LVL411:
				mov	r4, #256
				mov	r2, r4
				add	r1, sp, #19328
				adds	r1, r1, #124
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL412:
		.LBE1225:
		.LBE1224:
		.LBB1226:
		.LBB1227:
				mov	r2, r5
				add	r1, r7, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL413:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL414:
		.LBE1227:
		.LBE1226:
		.LBB1228:
  174     print fl (p1b2, 4); print string (", ")
				add	fp, sp, #28160
				sub	r7, fp, #4
				add	r6, r8, r4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL422:
				mov	r2, r4
				mov	r1, r7
				add	r3, sp, #20096
				adds	r3, r3, #124
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL423:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL424:
		.LBE1233:
		.LBB1234:
		.LBB1235:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL425:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL426:
		.LBE1235:
		.LBE1234:
		.LBB1236:
		.LBB1237:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL427:
		.LBE1237:
		.LBE1236:
		.LBB1238:
  175     print fl (p2b2, 4); print string (") --> bern ( ")
				add	fp, sp, #27904
				sub	r7, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL428:
				mov	r2, r4
				mov	r1, r7
				add	r3, sp, #20352
				adds	r3, r3, #124
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL429:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL430:
		.LBE1238:
		.LBB1239:
		.LBB1240:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL431:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL432:
		.LBE1240:
		.LBE1239:
		.LBB1241:
		.LBB1242:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL433:
		.LBE1242:
		.LBE1241:
		.LBB1243:
  176     print fl (pc0, 4); print string (", ")
				add	fp, sp, #27648
				sub	r7, fp, #4
				add	r8, r8, #512
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL434:
				mov	r2, r4
				mov	r1, r7
				add	r3, sp, #20608
				adds	r3, r3, #124
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL435:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL436:
		.LBE1243:
		.LBB1244:
		.LBB1245:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL437:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL438:
		.LBE1245:
		.LBE1244:
		.LBB1246:
		.LBB1247:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL439:
		.LBE1247:
		.LBE1246:
		.LBB1248:
  177     print fl (pc1, 4); print string (", ")
				add	fp, sp, #27392
				sub	r7, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL440:
				mov	r2, r4
				mov	r1, r7
				add	r3, sp, #20864
				adds	r3, r3, #124
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL441:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL442:
		.LBE1248:
		.LBB1249:
		.LBB1250:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL443:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL444:
		.LBE1250:
		.LBE1249:
		.LBB1251:
		.LBB1252:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL445:
		.LBE1252:
		.LBE1251:
		.LBB1253:
  178     print fl (pc2, 4); print string (", ")
				add	fp, sp, #27136
				sub	r7, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL446:
				mov	r2, r4
				mov	r1, r7
				add	r3, sp, #21120
				adds	r3, r3, #124
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL447:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL448:
		.LBE1253:
		.LBB1254:
		.LBB1255:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL449:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL450:
		.LBE1255:
		.LBE1254:
		.LBB1256:
		.LBB1257:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL451:
		.LBE1257:
		.LBE1256:
		.LBB1258:
  179     print fl (pc3, 4); print string (")".snl)
				add	fp, sp, #26880
				sub	r7, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL452:
				mov	r2, r4
				mov	r1, r7
				add	r3, sp, #21376
				adds	r3, r3, #124
				str	r3, [sp, #244]
				mov	r0, r3
				bl	memcpy(PLT)
		.LVL453:
				mov	r2, r4
				ldr	r1, [sp, #244]
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL454:
		.LBE1258:
		.LBB1259:
		.LBB1260:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL455:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL456:
		.LBE1260:
		.LBE1259:
		.LBB1261:
		.LBB1262:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL457:
		.LBE1262:
		.LBE1261:
		.LBB1263:
		.LBB1264:
  180     print string ("  bern ( ")
				add	fp, sp, #26368
				sub	r7, fp, #4
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL462:
				mov	r2, r4
				mov	r1, r7
				add	r10, sp, #22144
				add	r10, r10, #124
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL463:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL464:
		.LBE1267:
		.LBB1268:
		.LBB1269:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL465:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL466:
		.LBE1269:
		.LBE1268:
		.LBB1270:
		.LBB1271:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL467:
		.LBE1271:
		.LBE1270:
		.LBB1272:
				add	fp, sp, #26112
				sub	r7, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL468:
				mov	r2, r4
				mov	r1, r7
				add	r10, sp, #22400
				add	r10, r10, #124
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL469:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL470:
		.LBE1272:
		.LBB1273:
		.LBB1274:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL471:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL472:
		.LBE1274:
		.LBE1273:
		.LBB1275:
		.LBB1276:
				movs	r0, #4
				vmov.f64	d0, #2.0e+0
				bl	_imp_printfl(PLT)
		.LVL473:
		.LBE1276:
		.LBE1275:
		.LBB1277:
  181     print fl (q0b2, 4); print string (", ")
  182     print fl (q1b2, 4); print string (", ")
				add	fp, sp, #26624
				sub	r7, fp, #4
				mov	r2, r9
				add	r1, sp, #21888
				adds	r1, r1, #124
				mov	r0, r7
				bl	_imp_join(PLT)
		.LVL458:
				mov	r2, r4
				add	r1, sp, #21632
				adds	r1, r1, #124
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL459:
		.LBE1264:
		.LBE1263:
		.LBB1265:
		.LBB1266:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL460:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL461:
		.LBE1266:
		.LBE1265:
		.LBB1267:
  183     print fl (q2b2, 4); print string (") --> bern ( ")
				add	fp, sp, #25856
				sub	r7, fp, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL474:
				mov	r2, r4
				mov	r1, r7
				add	r10, sp, #22656
				add	r10, r10, #124
				mov	r0, r10
				bl	memcpy(PLT)
		.LVL475:
				mov	r2, r4
				mov	r1, r10
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL476:
		.LBE1277:
		.LBB1278:
		.LBB1279:
				mov	r2, r5
				add	r1, fp, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL477:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL478:
		.LBE1279:
		.LBE1278:
		.LBB1280:
		.LBB1281:
				vmov.f64	d9, #6.0e+0
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL479:
		.LBE1281:
		.LBE1280:
		.LBB1282:
  184     print fl (qc0, 4); print string (", ")
				add	r10, sp, #25600
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL480:
				mov	r2, r4
				mov	r1, r7
				add	r8, sp, #22912
				add	r8, r8, #124
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL481:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL482:
		.LBE1282:
		.LBB1283:
		.LBB1284:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL483:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL484:
		.LBE1284:
		.LBE1283:
		.LBB1285:
		.LBB1286:
				movs	r0, #4
				vmov.f64	d0, d8
				bl	_imp_printfl(PLT)
		.LVL485:
		.LBE1286:
		.LBE1285:
		.LBB1287:
  185     print fl (qc1, 4); print string (", ")
				add	r10, sp, #25344
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL486:
				mov	r2, r4
				mov	r1, r7
				add	r8, sp, #23168
				add	r8, r8, #124
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL487:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL488:
		.LBE1287:
		.LBB1288:
		.LBB1289:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL489:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL490:
		.LBE1289:
		.LBE1288:
		.LBB1290:
		.LBB1291:
				movs	r0, #4
				vmov.f64	d0, d11
				bl	_imp_printfl(PLT)
		.LVL491:
		.LBE1291:
		.LBE1290:
		.LBB1292:
  186     print fl (qc2, 4); print string (", ")
				add	r10, sp, #25088
				sub	r7, r10, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL492:
				mov	r2, r4
				mov	r1, r7
				add	r8, sp, #23424
				add	r8, r8, #124
				mov	r0, r8
				bl	memcpy(PLT)
		.LVL493:
				mov	r2, r4
				mov	r1, r8
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL494:
		.LBE1292:
		.LBB1293:
		.LBB1294:
				mov	r2, r5
				add	r1, r10, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL495:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL496:
		.LBE1294:
		.LBE1293:
		.LBB1295:
		.LBB1296:
				movs	r0, #4
				vmov.f64	d0, d12
				bl	_imp_printfl(PLT)
		.LVL497:
		.LBE1296:
		.LBE1295:
		.LBB1297:
  187     print fl (qc3, 4); print string (")".snl)
				add	r8, sp, #24832
				sub	r7, r8, #4
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL498:
				mov	r2, r4
				mov	r1, r7
				add	r6, sp, #23680
				adds	r6, r6, #124
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL499:
				mov	r2, r4
				mov	r1, r6
				mov	r0, r7
				bl	memcpy(PLT)
		.LVL500:
		.LBE1297:
		.LBB1298:
		.LBB1299:
				mov	r2, r5
				add	r1, r8, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL501:
				ldm	r7, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL502:
		.LBE1299:
		.LBE1298:
		.LBB1300:
		.LBB1301:
				movs	r0, #4
				vmov.f64	d0, d9
				bl	_imp_printfl(PLT)
		.LVL503:
		.LBE1301:
		.LBE1300:
		.LBB1302:
		.LBB1303:
  188 %endofprogram
?M unused
?EVALMONO3 unused
?EVALMONO2 unused
  245 Statements compiled
				add	r7, sp, #24576
				subs	r6, r7, #4
				mov	r2, r9
				add	r1, sp, #24192
				adds	r1, r1, #124
				mov	r0, r6
				bl	_imp_join(PLT)
		.LVL504:
				mov	r2, r4
				add	r1, sp, #23936
				adds	r1, r1, #124
				mov	r0, r6
				bl	memcpy(PLT)
		.LVL505:
		.LBE1303:
		.LBE1302:
		.LBB1304:
		.LBB1305:
				mov	r2, r5
				add	r1, r7, #12
				mov	r0, sp
				bl	memcpy(PLT)
		.LVL506:
				ldm	r6, {r0, r1, r2, r3}
				bl	_imp_printstring(PLT)
		.LVL507:
		.LBE1305:
		.LBE1304:
		.LBB1306:
		.LBB1307:
				movs	r0, #0
				bl	exit(PLT)
		.LVL508:
		.L15:
				.align	2
		.L14:
				.word	.LANCHOR0-(.LPIC57+4)
		.LBE1307:
		.LBE1306:
		.LFE185:
				.section	.rodata
				.align	2
				.set	.LANCHOR0,. + 0
		.LC1:
				.byte	9
				.ascii	"  mono ( \000"
				.space	245
		.LC2:
				.byte	2
				.ascii	", \000"
				.space	252
		.LC3:
				.byte	13
				.ascii	") --> bern ( \000"
				.space	241
		.LC6:
				.byte	6
				.ascii	"  p ( \000"
				.space	248
		.LC7:
				.byte	4
				.ascii	") = \000"
				.space	250
		.LC8:
				.byte	6
				.ascii	"  q ( \000"
				.space	248
		.LC11:
				.byte	6
				.ascii	"  r ( \000"
				.space	248
		.LC13:
				.byte	9
				.ascii	"  bern ( \000"
				.space	245
		.Letext0: