fecundf

#!/usr/bin/env raku
use v6;

use Test;

multi trait_mod:<is> (Routine \routine, :$equality-A!) {
    trait_mod:<is>(routine, :equiv(&infix:<==>));
}

multi trait_mod:<is> (Routine \routine, :$equality-B!) {

fecundf

#!/usr/bin/env perl6

#--------------------------------------------------------------------------------
# Nigel Hamilton (2016) - Artistic Licence 2.0
#
# jmp - Perl6 powered tools for quickly jmping to the next thing in your workflow
#
#      - please add subcommands for your own workflow. For example, you could jmp to:
#
#            - log files

fecundf

ar => lib
arflags => /nologo
arout => /out:
asm => .asm
asmout => /Fa
asmswitch => /c /FAs
auxclean => $(RM) moar.ilk moar.pdb moar.dll.lib moar.dll.exp vc100.pdb
be => 0
bindir => C:\rakudo\bin
booltype => 0

fecundf

#!/usr/bin/env perl

# Pragmas
use 5.020; # Also turns on "use strict" ever since 5.012
use warnings;
no warnings qw(experimental::signatures);
use feature qw(signatures);

# Using a signature means less work to set up arguments
sub main ($utterance) {