Skip to content

Instantly share code, notes, and snippets.

View vijfhoek's full-sized avatar

Sijmen vijfhoek

View GitHub Profile
/* Generated by cobc 3.1.2.0 */
/* Generated from day06b.cob */
/* Generated at nov 06 2021 23:45:03 */
/* GnuCOBOL build date Dec 24 2020 19:08:58 */
/* GnuCOBOL package date Dec 23 2020 12:04:58 UTC */
/* Compile command cobc -C day06b.cob */
#include <stdio.h>
#include <string.h>
#define COB_KEYWORD_INLINE __inline
identification division.
program-id. day06.
data division.
working-storage section.
01 input-line pic x(100).
01 action pic x(10).
01 coords pic x(100).
01 start-coords pic x(100).
identification division.
program-id. day06.
data division.
working-storage section.
01 input-line pic x(100).
01 action pic x(10).
01 coords pic x(100).
01 start-coords pic x(100).
identification division.
program-id. aoc03part1.
data division.
working-storage section.
01 ws-input pic x(10000).
01 ws-char pic x.
01 ws-i pic 9(10) value 1.
*Initialize 3-digit numerics for the x and y coordinates
identification division.
program-id. aoc03part1.
data division.
working-storage section.
01 ws-input pic x(10000).
01 ws-char pic x.
01 ws-i pic 9(10).

Keybase proof

I hereby claim:

  • I am vijfhoek on github.
  • I am vijfhoek (https://keybase.io/vijfhoek) on keybase.
  • I have a public key ASD-bW3fCSNln1L6UoxMw2XRDcg-Cye3eAhzQe-ShnLVTwo

To claim this, I am signing this object:

TIMx->PSC = 47;
TIMx->ARR = 8;
TIMx->CCR1 = 4;
TIMx->CCMR1 |= TIM_CCMR1_OC1M_2 | TIM_CCMR1_OC1M_1 | TIM_CCMR1_OC1PE;
TIMx->CCER |= TIM_CCER_CC1E;
TIMx->BDTR |= TIM_BDTR_MOE;
TIMx->CR1 |= TIM_CR1_CEN;
TIMx->EGR |= TIM_EGR_UG;
from typing import Tuple
def rule_0(s):
if s != '':
v0 = rule_8(s)
v1 = (out for inp in v0 for out in rule_11(inp))
yield from v1
def rule_1(s):
from typing import Tuple
def rule_0(s):
if s != '':
v0 = rule_8(s)
v1 = (out for inp in v0 for out in rule_11(inp))
yield from v1
def rule_1(s):
from typing import Tuple
def rule_0(s):
if s == '':
return []
valid_0 = rule_8(s)
valid_1 = (out for inp in valid_0 for out in rule_11(inp))
yield from valid_1