The health agency reported 13,472 available hospital beds in Texas, 1,453 ICU beds and 5,834 available ventilators. 768 hospital beds are available in Austin.

The state’s population is 29 million people.

https://www.spiegel.de/psychologie/corona-massnahmen-druecken-aufs-lebensglueck-a-5020db7f-9080-4161-9881-8956abf9a3c8

; rt – running tailsum
; xx – decrementer
;
to TAILSUM :xx :rt
if :xx = 0 [print :rt stop]
make “rt :rt + :xx
TAILSUM :xx -1 :rt
END

RESET
CLEARTEXT
TAILSUM 15 0

home
clearscreen
cleartext

make “cnt 0
make “size 10
make “wafer 200
make “whalf :wafer/2
; ——————-
TO SQUARE :length
REPEAT 4 [FW :length RT 90]
FW :length
END
; ——————–

; draw the origin and wafer
home
circle 5
circle :whalf

; move turtle to top left to start drawing grid
pu
fw :whalf
lt 90
fw :whalf
rt 90
pd

;orient turtle looking EAST
RT 90

; draw the grid
; two rows of squares at a time
; go out to the EAST, down back to the west
; drop down two rows and reorient the turtle to the EAST
;; do it again.. (outer loop)
REPEAT 10 [REPEAT 2 [ REPEAT 20 [ SQUARE :size make “cnt :cnt+1 ] RT 90 FW :size2 RT 90 ] RT 90 FW :size2 LT 90 ]

;REPEAT 4 [REPEAT 2 [REPEAT 20 [SQUARE :size make “cnt :cnt+1] RT 90 FW :size*4 RT 90]RT 90 FW :size LT 90]

; SQRT exists as undoc fct…
make “y SQRT :cnt
print [“number “of “squares ]
print :cnt

Run at logo.twentygototen.org