0.02 s
$ /nix/store/vzx1mi9c0xfadmsm9dhd83d005cb1qs9-coreutils-9.8/bin/timeout --kill-after=15s 7200s /nix/store/99b1z08awpxj8b6mzggn59gp1shljnff-nix-2.34.5/bin/nix --extra-experimental-features nix-command --extra-experimental-features flakes --log-format internal-json build --no-link git+https://github.com/NorfairKing/sydtest?ref=mutation-testing&rev=ea6f1381292a87ea3f7ed6cc8a6c7421a790fa7d#checks.x86_64-linux.mutation-really-safe-money --print-build-logs
0.08 s
warning: ignoring untrusted flake configuration setting 'extra-substituters'.
0.08 s
Pass '--accept-flake-config' to trust it
0.08 s
warning: ignoring untrusted flake configuration setting 'extra-trusted-public-keys'.
0.08 s
Pass '--accept-flake-config' to trust it
0.57 s
error (ignored): SQLite database '/var/cache/private/nix-ci-worker/eval-cache-v6/e424c01cda7040a60f0c63c62714914f1ff10c3349ffed7e5ebb481689ab37f7.sqlite ' is busy
1.41 s
2.93 s
Waiting for lock on sydtest-mutation-plugin-source
7.98 s
Waiting for lock on sydtest-mutation-plugin
43.08 s
Building really-safe-money
43.29 s
[really-safe-money] Phase: setupCompilerEnvironmentPhase
43.29 s
[really-safe-money] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3.
43.54 s
[really-safe-money] Phase: unpackPhase
43.54 s
[really-safe-money] unpacking source archive /nix/store/pxkha6z3d3bjfgkdar4ma3wx2c1f8pmm-really-safe-money-source-0.0.0.0/really-safe-money-0.0.0.0.tar.gz
43.55 s
[really-safe-money] source root is really-safe-money-0.0.0.0
43.55 s
[really-safe-money] setting SOURCE_DATE_EPOCH to timestamp 1778737784 of file "really-safe-money-0.0.0.0/src/Numeric/DecimalLiteral.hs"
43.56 s
[really-safe-money] Phase: patchPhase
43.57 s
[really-safe-money] Phase: compileBuildDriverPhase
43.57 s
[really-safe-money] setupCompileFlags: -package-db=/build/tmp.1JDa0tM4T5/setup-package.conf.d -threaded
43.61 s
[really-safe-money] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.1JDa0tM4T5/Main.o )
43.65 s
[really-safe-money] [2 of 2] Linking Setup
44.80 s
[really-safe-money] Phase: updateAutotoolsGnuConfigScriptsPhase
44.81 s
[really-safe-money] Phase: configurePhase
44.81 s
[really-safe-money] configureFlags: --verbose --prefix=/nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --with-gcc=gcc --package-db=/build/tmp.1JDa0tM4T5/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --disable-static --disable-executable-dynamic --disable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --ghc-options=-fplugin-opt=Test.Syd.Mutation.Plugin:--debug --disable-optimization --ghc-option=-j1 --ghc-option=+RTS --ghc-option=-A32M --ghc-option=-M16g --ghc-option=-RTS --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib
44.82 s
[really-safe-money] Using Parsec parser
44.82 s
[really-safe-money] Configuring really-safe-money-0.0.0.0...
45.37 s
[really-safe-money] Dependency base >=4.7 && <5: using base-4.20.2.0
45.37 s
[really-safe-money] Dependency containers: using containers-0.7
45.37 s
[really-safe-money] Dependency deepseq: using deepseq-1.5.0.0
45.37 s
[really-safe-money] Dependency validity: using validity-0.12.1.0
45.37 s
[really-safe-money] Dependency validity-containers: using validity-containers-0.5.0.5
45.37 s
[really-safe-money] Dependency validity-scientific: using validity-scientific-0.2.0.3
45.37 s
[really-safe-money] Source component graph: component lib
45.37 s
[really-safe-money] Configured component graph:
45.37 s
[really-safe-money] component really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
45.37 s
[really-safe-money] include base-4.20.2.0-64da
45.37 s
[really-safe-money] include containers-0.7-504a
45.37 s
[really-safe-money] include deepseq-1.5.0.0-9a2c
45.37 s
[really-safe-money] include validity-0.12.1.0-2vJMqyxn6Ae2B1jlP90HgP
45.37 s
[really-safe-money] include validity-containers-0.5.0.5-JMisIHg6jT0HAhS7h7vTA4
45.37 s
[really-safe-money] include validity-scientific-0.2.0.3-6oQtdkDOQFR80MBRT1UQ1R
45.37 s
[really-safe-money] Linked component graph:
45.37 s
[really-safe-money] unit really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
45.37 s
[really-safe-money] include base-4.20.2.0-64da
45.37 s
[really-safe-money] include containers-0.7-504a
45.37 s
[really-safe-money] include deepseq-1.5.0.0-9a2c
45.37 s
[really-safe-money] include validity-0.12.1.0-2vJMqyxn6Ae2B1jlP90HgP
45.37 s
[really-safe-money] include validity-containers-0.5.0.5-JMisIHg6jT0HAhS7h7vTA4
45.37 s
[really-safe-money] include validity-scientific-0.2.0.3-6oQtdkDOQFR80MBRT1UQ1R
45.37 s
[really-safe-money] Money.Account=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.Account,Money.AccountOf=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.AccountOf,Money.Amount=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.Amount,Money.AmountOf=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.AmountOf,Money.ConversionRate=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.ConversionRate,Money.ConversionRateOf=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.ConversionRateOf,Money.Currency=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.Currency,Money.MultiAccount=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.MultiAccount,Money.MultiAmount=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.MultiAmount,Money.QuantisationFactor=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Money.QuantisationFactor,Numeric.DecimalLiteral=really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9:Numeric.DecimalLiteral
45.37 s
[really-safe-money] Ready component graph:
45.37 s
[really-safe-money] definite really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
45.37 s
[really-safe-money] depends base-4.20.2.0-64da
45.37 s
[really-safe-money] depends containers-0.7-504a
45.37 s
[really-safe-money] depends deepseq-1.5.0.0-9a2c
45.37 s
[really-safe-money] depends validity-0.12.1.0-2vJMqyxn6Ae2B1jlP90HgP
45.37 s
[really-safe-money] depends validity-containers-0.5.0.5-JMisIHg6jT0HAhS7h7vTA4
45.37 s
[really-safe-money] depends validity-scientific-0.2.0.3-6oQtdkDOQFR80MBRT1UQ1R
45.37 s
[really-safe-money] Using Cabal-3.12.1.0 compiled by ghc-9.10
45.37 s
[really-safe-money] Using compiler: ghc-9.10.3
45.37 s
[really-safe-money] Using install prefix:
45.37 s
[really-safe-money] /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0
45.37 s
[really-safe-money] Executables installed in:
45.37 s
[really-safe-money] /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/bin
45.37 s
[really-safe-money] Libraries installed in:
45.37 s
[really-safe-money] /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
45.37 s
[really-safe-money] Dynamic Libraries installed in:
45.37 s
[really-safe-money] /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6
45.37 s
[really-safe-money] Private executables installed in:
45.37 s
[really-safe-money] /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/libexec/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-0.0.0.0
45.37 s
[really-safe-money] Data files installed in:
45.37 s
[really-safe-money] /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/share/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-0.0.0.0
45.37 s
[really-safe-money] Documentation installed in:
45.37 s
[really-safe-money] /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/share/doc/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-0.0.0.0
45.37 s
[really-safe-money] Configuration files installed in:
45.37 s
[really-safe-money] /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/etc
45.37 s
[really-safe-money] No alex found
45.37 s
[really-safe-money] Using ar found on system at:
45.37 s
[really-safe-money] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar
45.37 s
[really-safe-money] No c2hs found
45.37 s
[really-safe-money] No cpphs found
45.37 s
[really-safe-money] No doctest found
45.37 s
[really-safe-money] Using gcc version 14.3.0 given by user at:
45.37 s
[really-safe-money] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc
45.37 s
[really-safe-money] Using ghc version 9.10.3 found on system at:
45.37 s
[really-safe-money] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc
45.37 s
[really-safe-money] Using ghc-pkg version 9.10.3 found on system at:
45.37 s
[really-safe-money] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3
45.37 s
[really-safe-money] No ghcjs found
45.37 s
[really-safe-money] No ghcjs-pkg found
45.37 s
[really-safe-money] No greencard found
45.37 s
[really-safe-money] Using haddock version 2.31.1 found on system at:
45.37 s
[really-safe-money] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3
45.38 s
[really-safe-money] No happy found
45.38 s
[really-safe-money] Using haskell-suite found on system at: haskell-suite-dummy-location
45.38 s
[really-safe-money] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
45.38 s
[really-safe-money] No hmake found
45.38 s
[really-safe-money] Using hpc version 0.69 found on system at:
45.38 s
[really-safe-money] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3
45.38 s
[really-safe-money] Using hsc2hs version 0.68.10 found on system at:
45.38 s
[really-safe-money] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3
45.38 s
[really-safe-money] Using hscolour version 1.25 found on system at:
45.38 s
[really-safe-money] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour
45.38 s
[really-safe-money] No jhc found
45.38 s
[really-safe-money] Using ld found on system at:
45.38 s
[really-safe-money] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld
45.38 s
[really-safe-money] No pkg-config found
45.38 s
[really-safe-money] Using runghc version 9.10.3 found on system at:
45.38 s
[really-safe-money] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3
45.38 s
[really-safe-money] Using strip version 2.44 found on system at:
45.38 s
[really-safe-money] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip
45.38 s
[really-safe-money] Using tar found on system at:
45.38 s
[really-safe-money] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar
45.38 s
[really-safe-money] No uhc found
45.53 s
[really-safe-money] Phase: buildPhase
45.53 s
[really-safe-money] mutation-nix: setting MUTATION_MANIFEST_DIR=/nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest
45.57 s
[really-safe-money] Preprocessing library for really-safe-money-0.0.0.0...
45.57 s
[really-safe-money] Building library for really-safe-money-0.0.0.0...
45.74 s
[really-safe-money] [ 1 of 12] Compiling Numeric.DecimalLiteral ( src/Numeric/DecimalLiteral.hs, dist/build/Numeric/DecimalLiteral.o, dist/build/Numeric/DecimalLiteral.dyn_o )
46.02 s
[really-safe-money] mutation: instrumenting Numeric.DecimalLiteral
46.02 s
[really-safe-money] added mutation BoolLit at src/Numeric/DecimalLiteral.hs:396:23-27
46.02 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:396:18-27
46.02 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
46.02 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
46.02 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
46.02 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:368:10-39
46.02 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:368:10-39
46.02 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:368:10-39
46.02 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:370:30-58
46.02 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:370:30-58
46.02 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:375:80-82
46.02 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:375:80-82
46.02 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:375:76-82
46.02 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:375:76-82
46.02 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:337:21-22
46.02 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
46.02 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
46.02 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
46.02 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:337:16-22
46.02 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:337:16-22
46.02 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:337:16-22
46.02 s
[really-safe-money] added mutation BoolLit at src/Numeric/DecimalLiteral.hs:337:46-51
46.02 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:337:41-51
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:332:11-46
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:332:11-46
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:332:11-46
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:333:11-46
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:333:11-46
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:333:11-46
46.05 s
[really-safe-money] added mutation RemoveAction at src/Numeric/DecimalLiteral.hs:333:3-46
46.05 s
[really-safe-money] added mutation RemoveAction at src/Numeric/DecimalLiteral.hs:332:3-46
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:315:67-68
46.05 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:310:27-33
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:304:42-43
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:299:11-47
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:299:11-47
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:299:11-47
46.05 s
[really-safe-money] added mutation RemoveAction at src/Numeric/DecimalLiteral.hs:299:3-47
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
46.05 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:287:38-40
46.05 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:287:38-40
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:244:14-15
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:244:9-15
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:244:9-15
46.05 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:261:11-22
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:264:13-26
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:264:13-26
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:266:13-19
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:266:13-19
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:267:13-18
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:267:13-18
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:269:41-43
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:269:41-43
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:269:37-43
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:269:37-43
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:269:63-65
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:269:63-65
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:269:59-65
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:269:59-65
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:272:37-42
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:272:37-42
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:252:36-37
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:252:38-39
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:208:9-10
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
46.05 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:208:5-10
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:208:5-10
46.05 s
[really-safe-money] added mutation BoolLit at src/Numeric/DecimalLiteral.hs:208:62-67
46.05 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:208:57-67
46.05 s
[really-safe-money] added mutation ListLit at src/Numeric/DecimalLiteral.hs:186:15-25
46.05 s
[really-safe-money] added mutation ListLit at src/Numeric/DecimalLiteral.hs:186:15-25
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:145:15-30
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:145:15-30
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:152:9-23
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:152:9-23
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:154:23-38
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:154:23-38
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:139:27-29
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:139:27-29
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-29
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-29
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-50
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-50
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:136:39-41
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:136:39-41
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-41
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-41
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-62
46.05 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-62
46.05 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:136:29-71
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-30
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-30
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:119:22-30
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:34-42
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:34-42
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:119:34-42
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-42
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-42
46.05 s
[really-safe-money] added mutation LogicOp at src/Numeric/DecimalLiteral.hs:119:22-42
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:119:22-42
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:123:19-34
46.05 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:123:19-34
46.05 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:123:19-34
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:125:29-30
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:127:44-45
46.05 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:130:48-49
46.05 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:112:17-21
46.05 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:112:17-21
46.05 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:86:18-18
46.05 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:86:18-18
46.05 s
[really-safe-money] added 141 mutations
47.63 s
[really-safe-money] [ 2 of 12] Compiling Money.QuantisationFactor ( src/Money/QuantisationFactor.hs, dist/build/Money/QuantisationFactor.o, dist/build/Money/QuantisationFactor.dyn_o )
47.65 s
[really-safe-money] mutation: instrumenting Money.QuantisationFactor
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:87:27-28
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:87:12-28
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:87:12-28
47.65 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:87:12-28
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:92:13-14
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:92:13-14
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:93:16-17
47.65 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
47.65 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
47.65 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:93:12-17
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:93:12-17
47.65 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:93:12-17
47.65 s
[really-safe-money] added mutation MaybeOp at src/Money/QuantisationFactor.hs:95:16-22
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:98:27-28
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:98:27-28
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:98:8-28
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:98:8-28
47.65 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:98:8-28
47.65 s
[really-safe-money] added mutation MaybeOp at src/Money/QuantisationFactor.hs:99:12-32
47.65 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
47.65 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
47.65 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:102:6-46
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:102:6-46
47.65 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:102:6-46
47.65 s
[really-safe-money] added mutation MaybeOp at src/Money/QuantisationFactor.hs:103:10-54
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:67:67-68
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:67:67-68
47.65 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:40:62-63
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:40:57-63
47.65 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:40:57-63
47.65 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:40:57-63
47.65 s
[really-safe-money] added mutation ListLit at src/Money/QuantisationFactor.hs:39:7-8
47.65 s
[really-safe-money] added mutation ListLit at src/Money/QuantisationFactor.hs:39:7-8
47.65 s
[really-safe-money] added 35 mutations
47.99 s
[really-safe-money] [ 3 of 12] Compiling Money.Currency ( src/Money/Currency.hs, dist/build/Money/Currency.o, dist/build/Money/Currency.dyn_o )
48.00 s
[really-safe-money] mutation: instrumenting Money.Currency
48.00 s
[really-safe-money] added 0 mutations
48.33 s
[really-safe-money] [ 4 of 12] Compiling Money.ConversionRate ( src/Money/ConversionRate.hs, dist/build/Money/ConversionRate.o, dist/build/Money/ConversionRate.dyn_o )
48.39 s
[really-safe-money] mutation: instrumenting Money.ConversionRate
48.39 s
[really-safe-money] added mutation Arith at src/Money/ConversionRate.hs:132:3-24
48.39 s
[really-safe-money] added mutation Arith at src/Money/ConversionRate.hs:132:3-24
48.39 s
[really-safe-money] added mutation Arith at src/Money/ConversionRate.hs:127:70-79
48.39 s
[really-safe-money] added mutation Arith at src/Money/ConversionRate.hs:127:70-79
48.39 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:116:45-46
48.39 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:116:45-46
48.39 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:109:27-28
48.39 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:109:27-28
48.39 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:72:25-26
48.39 s
[really-safe-money] added mutation Cmp at src/Money/ConversionRate.hs:72:21-26
48.39 s
[really-safe-money] added mutation Cmp at src/Money/ConversionRate.hs:72:21-26
48.39 s
[really-safe-money] added mutation Cmp at src/Money/ConversionRate.hs:72:21-26
48.39 s
[really-safe-money] added mutation ConstBool at src/Money/ConversionRate.hs:72:21-26
48.39 s
[really-safe-money] added mutation ConstBool at src/Money/ConversionRate.hs:72:21-26
48.39 s
[really-safe-money] added mutation Negate at src/Money/ConversionRate.hs:72:21-26
48.39 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:38:56-57
48.39 s
[really-safe-money] added mutation ConstBool at src/Money/ConversionRate.hs:38:41-57
48.40 s
[really-safe-money] added mutation ConstBool at src/Money/ConversionRate.hs:38:41-57
48.40 s
[really-safe-money] added mutation Negate at src/Money/ConversionRate.hs:38:41-57
48.40 s
[really-safe-money] added mutation ListLit at src/Money/ConversionRate.hs:37:7-8
48.40 s
[really-safe-money] added mutation ListLit at src/Money/ConversionRate.hs:37:7-8
48.40 s
[really-safe-money] added 21 mutations
48.56 s
[really-safe-money] [ 5 of 12] Compiling Money.ConversionRateOf ( src/Money/ConversionRateOf.hs, dist/build/Money/ConversionRateOf.o, dist/build/Money/ConversionRateOf.dyn_o )
48.56 s
[really-safe-money] mutation: instrumenting Money.ConversionRateOf
48.56 s
[really-safe-money] added 0 mutations
48.63 s
[really-safe-money] [ 6 of 12] Compiling Money.Amount ( src/Money/Amount.hs, dist/build/Money/Amount.o, dist/build/Money/Amount.dyn_o )
48.70 s
[really-safe-money] mutation: instrumenting Money.Amount
48.70 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:801:36-38
48.70 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:801:36-38
48.70 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:801:36-38
48.70 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:720:6-40
48.70 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:720:6-40
48.70 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:721:10-44
48.70 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:721:10-44
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:569:18-19
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:569:10-19
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:569:10-19
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:569:10-19
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:577:39-63
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:577:39-63
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:543:11-88
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:543:11-88
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:544:10-23
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:544:10-23
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:544:10-23
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:544:10-23
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:544:10-23
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:544:10-23
48.71 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:546:14-66
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:517:11-18
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:517:11-18
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:518:14-15
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:518:10-15
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:518:10-15
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:518:10-15
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:518:10-15
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:518:10-15
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:518:10-15
48.71 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:520:14-66
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:475:11-18
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:475:11-18
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:476:10-23
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:476:10-23
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:476:10-23
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:476:10-23
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:476:10-23
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:476:10-23
48.71 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:478:14-66
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:388:5-16
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:388:5-16
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:389:9-10
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:389:5-10
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:389:5-10
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:389:5-10
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:389:5-10
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:389:5-10
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:392:28-71
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:392:28-71
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:397:14-31
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:397:14-31
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:397:14-31
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:399:18-83
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:399:18-83
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:399:18-83
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:399:18-83
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:399:18-83
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:399:18-83
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:320:9-10
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:320:5-10
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:320:5-10
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:320:5-10
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:320:5-10
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:320:5-10
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:323:26-67
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:323:26-67
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:327:9-16
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:327:9-16
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:328:9-21
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:328:9-21
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:332:38-40
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:332:38-40
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:332:38-40
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:332:14-40
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:332:14-40
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:332:14-40
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:332:14-40
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:332:14-40
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:332:14-40
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:339:22-39
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:339:22-39
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:339:22-39
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:341:26-91
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:341:26-91
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:341:26-91
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:341:26-91
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:341:26-91
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:341:26-91
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:290:79-80
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:494:29-94
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:494:29-94
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:494:96-97
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:495:10-23
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:495:10-23
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:495:10-23
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:495:10-23
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:495:10-23
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:495:10-23
48.71 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:497:14-66
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:250:15-16
48.71 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:660:28-37
48.71 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:661:19-28
48.71 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:661:30-31
48.71 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:668:17-30
48.71 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:668:17-30
48.71 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:668:17-30
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:666:27-44
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:666:27-44
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:681:12-37
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:681:12-37
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:681:12-37
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:681:12-37
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:681:12-37
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:681:12-37
48.71 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:683:16-27
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:762:40-49
48.71 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:762:40-49
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:806:79-92
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:806:79-92
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:806:79-92
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:806:79-92
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:806:79-92
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:806:79-92
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:607:15-22
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:607:15-22
48.71 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:607:15-22
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:607:15-22
48.71 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:607:15-22
48.71 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:607:15-22
48.71 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:604:9-21
48.71 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:604:9-21
48.71 s
[really-safe-money] added mutation ListLit at src/Money/Amount.hs:603:7-8
48.71 s
[really-safe-money] added mutation ListLit at src/Money/Amount.hs:603:7-8
48.71 s
[really-safe-money] added 135 mutations
50.70 s
[really-safe-money] [ 7 of 12] Compiling Money.MultiAmount ( src/Money/MultiAmount.hs, dist/build/Money/MultiAmount.o, dist/build/Money/MultiAmount.dyn_o )
50.73 s
[really-safe-money] mutation: instrumenting Money.MultiAmount
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
50.73 s
[really-safe-money] added mutation Cmp at src/Money/MultiAmount.hs:168:20-45
50.73 s
[really-safe-money] added mutation Cmp at src/Money/MultiAmount.hs:168:20-45
50.73 s
[really-safe-money] added mutation Cmp at src/Money/MultiAmount.hs:168:20-45
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:168:20-45
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:168:20-45
50.73 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:168:20-45
50.73 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAmount.hs:170:24-57
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
50.73 s
[really-safe-money] added mutation Arith at src/Money/MultiAmount.hs:182:15-106
50.73 s
[really-safe-money] added mutation Arith at src/Money/MultiAmount.hs:182:15-106
50.73 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAmount.hs:112:33-39
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:119:12-28
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:119:12-28
50.73 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:119:12-28
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:114:22-37
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:114:22-37
50.73 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAmount.hs:99:28-34
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:106:12-28
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:106:12-28
50.73 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:106:12-28
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:101:22-37
50.73 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:101:22-37
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:73:6-27
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:73:6-27
50.73 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:73:6-27
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:66:13-29
50.73 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:66:13-29
50.73 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:66:13-29
50.73 s
[really-safe-money] added mutation ListLit at src/Money/MultiAmount.hs:63:7-8
50.73 s
[really-safe-money] added mutation ListLit at src/Money/MultiAmount.hs:63:7-8
50.73 s
[really-safe-money] added 35 mutations
51.37 s
[really-safe-money] [ 8 of 12] Compiling Money.AmountOf ( src/Money/AmountOf.hs, dist/build/Money/AmountOf.o, dist/build/Money/AmountOf.dyn_o )
51.39 s
[really-safe-money] mutation: instrumenting Money.AmountOf
51.39 s
[really-safe-money] added mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
51.39 s
[really-safe-money] added mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
51.39 s
[really-safe-money] added mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
51.39 s
[really-safe-money] added mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
51.39 s
[really-safe-money] added 4 mutations
51.62 s
[really-safe-money] [ 9 of 12] Compiling Money.Account ( src/Money/Account.hs, dist/build/Money/Account.o, dist/build/Money/Account.dyn_o )
51.63 s
[really-safe-money] mutation: instrumenting Money.Account
51.63 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:553:7-39
51.63 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:553:7-39
51.63 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:553:7-39
51.63 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:553:7-39
51.63 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:591:7-44
51.63 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:591:7-44
51.64 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:421:32-33
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:451:14-23
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:451:14-23
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:451:14-23
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:451:14-23
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:451:14-23
51.64 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:451:14-23
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:455:14-23
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:455:14-23
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:455:14-23
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:455:14-23
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:455:14-23
51.64 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:455:14-23
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:447:7-136
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:447:7-136
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:447:7-136
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:447:7-136
51.64 s
[really-safe-money] added mutation MaybeOp at src/Money/Account.hs:523:16-25
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:522:19-35
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:522:19-35
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:522:19-35
51.64 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:495:17-18
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:495:12-18
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:495:12-18
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:495:12-18
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:495:12-18
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:495:12-18
51.64 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:495:12-18
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:497:16-41
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:497:16-41
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:497:16-41
51.64 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:503:15-16
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:503:10-16
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:503:10-16
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:503:10-16
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:503:10-16
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:503:10-16
51.64 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:503:10-16
51.64 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:233:19-20
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:233:14-20
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:233:14-20
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:233:14-20
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:233:14-20
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:233:14-20
51.64 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:233:14-20
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:211:11-37
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:211:11-37
51.64 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:197:19-20
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:197:14-20
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:197:14-20
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:197:14-20
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:197:14-20
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:197:14-20
51.64 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:197:14-20
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:171:11-37
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:171:11-37
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:155:11-37
51.64 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:155:11-37
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:123:10-23
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:123:10-23
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:123:10-23
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:123:10-23
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:123:10-23
51.64 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:123:10-23
51.64 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:131:25-26
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:131:20-26
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:131:20-26
51.64 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:131:20-26
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:131:20-26
51.64 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:131:20-26
51.64 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:131:20-26
51.64 s
[really-safe-money] added mutation Arith at src/Money/Account.hs:341:11-18
51.64 s
[really-safe-money] added mutation Arith at src/Money/Account.hs:341:11-18
51.64 s
[really-safe-money] added mutation Arith at src/Money/Account.hs:378:11-18
51.64 s
[really-safe-money] added mutation Arith at src/Money/Account.hs:378:11-18
51.64 s
[really-safe-money] added 87 mutations
52.59 s
[really-safe-money] [10 of 12] Compiling Money.MultiAccount ( src/Money/MultiAccount.hs, dist/build/Money/MultiAccount.o, dist/build/Money/MultiAccount.dyn_o )
52.60 s
[really-safe-money] mutation: instrumenting Money.MultiAccount
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
52.60 s
[really-safe-money] added mutation Arith at src/Money/MultiAccount.hs:192:19-51
52.60 s
[really-safe-money] added mutation Arith at src/Money/MultiAccount.hs:192:19-51
52.60 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAccount.hs:126:45-51
52.60 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAccount.hs:127:45-51
52.60 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:134:12-29
52.60 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:134:12-29
52.60 s
[really-safe-money] added mutation Negate at src/Money/MultiAccount.hs:134:12-29
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:129:23-37
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:129:23-37
52.60 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAccount.hs:112:40-46
52.60 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAccount.hs:113:40-46
52.60 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:120:12-29
52.60 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:120:12-29
52.60 s
[really-safe-money] added mutation Negate at src/Money/MultiAccount.hs:120:12-29
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:115:23-37
52.60 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:115:23-37
52.60 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:78:6-28
52.60 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:78:6-28
52.60 s
[really-safe-money] added mutation Negate at src/Money/MultiAccount.hs:78:6-28
52.60 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:69:13-30
52.60 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:69:13-30
52.60 s
[really-safe-money] added mutation Negate at src/Money/MultiAccount.hs:69:13-30
52.60 s
[really-safe-money] added mutation ListLit at src/Money/MultiAccount.hs:66:7-8
52.60 s
[really-safe-money] added mutation ListLit at src/Money/MultiAccount.hs:66:7-8
52.60 s
[really-safe-money] added 30 mutations
53.11 s
[really-safe-money] [11 of 12] Compiling Money.AccountOf ( src/Money/AccountOf.hs, dist/build/Money/AccountOf.o, dist/build/Money/AccountOf.dyn_o )
53.12 s
[really-safe-money] mutation: instrumenting Money.AccountOf
53.12 s
[really-safe-money] added mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
53.12 s
[really-safe-money] added mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
53.12 s
[really-safe-money] added mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
53.12 s
[really-safe-money] added mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
53.12 s
[really-safe-money] added 4 mutations
53.30 s
[really-safe-money] [12 of 12] Compiling Paths_really_safe_money ( dist/build/autogen/Paths_really_safe_money.hs, dist/build/Paths_really_safe_money.o, dist/build/Paths_really_safe_money.dyn_o )
53.59 s
[really-safe-money] [ 1 of 12] Compiling Numeric.DecimalLiteral ( src/Numeric/DecimalLiteral.hs, dist/build/Numeric/DecimalLiteral.p_o )
53.88 s
[really-safe-money] mutation: instrumenting Numeric.DecimalLiteral
53.94 s
[really-safe-money] added mutation BoolLit at src/Numeric/DecimalLiteral.hs:396:23-27
53.94 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:396:18-27
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:368:10-39
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:368:10-39
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:368:10-39
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:370:30-58
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:370:30-58
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:375:80-82
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:375:80-82
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:375:76-82
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:375:76-82
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:337:21-22
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:337:16-22
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:337:16-22
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:337:16-22
53.95 s
[really-safe-money] added mutation BoolLit at src/Numeric/DecimalLiteral.hs:337:46-51
53.95 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:337:41-51
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:332:11-46
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:332:11-46
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:332:11-46
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:333:11-46
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:333:11-46
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:333:11-46
53.95 s
[really-safe-money] added mutation RemoveAction at src/Numeric/DecimalLiteral.hs:333:3-46
53.95 s
[really-safe-money] added mutation RemoveAction at src/Numeric/DecimalLiteral.hs:332:3-46
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:315:67-68
53.95 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:310:27-33
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:304:42-43
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:299:11-47
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:299:11-47
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:299:11-47
53.95 s
[really-safe-money] added mutation RemoveAction at src/Numeric/DecimalLiteral.hs:299:3-47
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
53.95 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:287:38-40
53.95 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:287:38-40
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:244:14-15
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:244:9-15
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:244:9-15
53.95 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:261:11-22
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:264:13-26
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:264:13-26
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:266:13-19
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:266:13-19
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:267:13-18
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:267:13-18
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:269:41-43
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:269:41-43
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:269:37-43
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:269:37-43
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:269:63-65
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:269:63-65
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:269:59-65
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:269:59-65
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:272:37-42
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:272:37-42
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:252:36-37
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:252:38-39
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:208:9-10
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
53.95 s
[really-safe-money] added mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:208:5-10
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:208:5-10
53.95 s
[really-safe-money] added mutation BoolLit at src/Numeric/DecimalLiteral.hs:208:62-67
53.95 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:208:57-67
53.95 s
[really-safe-money] added mutation ListLit at src/Numeric/DecimalLiteral.hs:186:15-25
53.95 s
[really-safe-money] added mutation ListLit at src/Numeric/DecimalLiteral.hs:186:15-25
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:145:15-30
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:145:15-30
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:152:9-23
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:152:9-23
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:154:23-38
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:154:23-38
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:139:27-29
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:139:27-29
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-29
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-29
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-50
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-50
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:136:39-41
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:136:39-41
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-41
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-41
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-62
53.95 s
[really-safe-money] added mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-62
53.95 s
[really-safe-money] added mutation MaybeOp at src/Numeric/DecimalLiteral.hs:136:29-71
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-30
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-30
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:119:22-30
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:34-42
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:34-42
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:119:34-42
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-42
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-42
53.95 s
[really-safe-money] added mutation LogicOp at src/Numeric/DecimalLiteral.hs:119:22-42
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:119:22-42
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:123:19-34
53.95 s
[really-safe-money] added mutation ConstBool at src/Numeric/DecimalLiteral.hs:123:19-34
53.95 s
[really-safe-money] added mutation Negate at src/Numeric/DecimalLiteral.hs:123:19-34
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:125:29-30
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:127:44-45
53.95 s
[really-safe-money] added mutation IntLit at src/Numeric/DecimalLiteral.hs:130:48-49
53.95 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:112:17-21
53.95 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:112:17-21
53.95 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:86:18-18
53.95 s
[really-safe-money] added mutation RemoveCase at src/Numeric/DecimalLiteral.hs:86:18-18
53.95 s
[really-safe-money] added 141 mutations
55.58 s
[really-safe-money] [ 2 of 12] Compiling Money.QuantisationFactor ( src/Money/QuantisationFactor.hs, dist/build/Money/QuantisationFactor.p_o )
55.59 s
[really-safe-money] mutation: instrumenting Money.QuantisationFactor
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:87:27-28
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:87:12-28
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:87:12-28
55.59 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:87:12-28
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:92:13-14
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:92:13-14
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:93:16-17
55.59 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
55.59 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
55.59 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:93:12-17
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:93:12-17
55.59 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:93:12-17
55.59 s
[really-safe-money] added mutation MaybeOp at src/Money/QuantisationFactor.hs:95:16-22
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:98:27-28
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:98:27-28
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:98:8-28
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:98:8-28
55.59 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:98:8-28
55.59 s
[really-safe-money] added mutation MaybeOp at src/Money/QuantisationFactor.hs:99:12-32
55.59 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
55.59 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
55.59 s
[really-safe-money] added mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:102:6-46
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:102:6-46
55.59 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:102:6-46
55.59 s
[really-safe-money] added mutation MaybeOp at src/Money/QuantisationFactor.hs:103:10-54
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:67:67-68
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:67:67-68
55.59 s
[really-safe-money] added mutation IntLit at src/Money/QuantisationFactor.hs:40:62-63
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:40:57-63
55.59 s
[really-safe-money] added mutation ConstBool at src/Money/QuantisationFactor.hs:40:57-63
55.59 s
[really-safe-money] added mutation Negate at src/Money/QuantisationFactor.hs:40:57-63
55.59 s
[really-safe-money] added mutation ListLit at src/Money/QuantisationFactor.hs:39:7-8
55.59 s
[really-safe-money] added mutation ListLit at src/Money/QuantisationFactor.hs:39:7-8
55.59 s
[really-safe-money] added 35 mutations
56.01 s
[really-safe-money] [ 3 of 12] Compiling Money.Currency ( src/Money/Currency.hs, dist/build/Money/Currency.p_o )
56.02 s
[really-safe-money] mutation: instrumenting Money.Currency
56.02 s
[really-safe-money] added 0 mutations
56.43 s
[really-safe-money] [ 4 of 12] Compiling Money.ConversionRate ( src/Money/ConversionRate.hs, dist/build/Money/ConversionRate.p_o )
56.43 s
[really-safe-money] mutation: instrumenting Money.ConversionRate
56.43 s
[really-safe-money] added mutation Arith at src/Money/ConversionRate.hs:132:3-24
56.43 s
[really-safe-money] added mutation Arith at src/Money/ConversionRate.hs:132:3-24
56.43 s
[really-safe-money] added mutation Arith at src/Money/ConversionRate.hs:127:70-79
56.43 s
[really-safe-money] added mutation Arith at src/Money/ConversionRate.hs:127:70-79
56.43 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:116:45-46
56.44 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:116:45-46
56.44 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:109:27-28
56.44 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:109:27-28
56.44 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:72:25-26
56.44 s
[really-safe-money] added mutation Cmp at src/Money/ConversionRate.hs:72:21-26
56.44 s
[really-safe-money] added mutation Cmp at src/Money/ConversionRate.hs:72:21-26
56.44 s
[really-safe-money] added mutation Cmp at src/Money/ConversionRate.hs:72:21-26
56.44 s
[really-safe-money] added mutation ConstBool at src/Money/ConversionRate.hs:72:21-26
56.44 s
[really-safe-money] added mutation ConstBool at src/Money/ConversionRate.hs:72:21-26
56.44 s
[really-safe-money] added mutation Negate at src/Money/ConversionRate.hs:72:21-26
56.44 s
[really-safe-money] added mutation IntLit at src/Money/ConversionRate.hs:38:56-57
56.44 s
[really-safe-money] added mutation ConstBool at src/Money/ConversionRate.hs:38:41-57
56.44 s
[really-safe-money] added mutation ConstBool at src/Money/ConversionRate.hs:38:41-57
56.44 s
[really-safe-money] added mutation Negate at src/Money/ConversionRate.hs:38:41-57
56.44 s
[really-safe-money] added mutation ListLit at src/Money/ConversionRate.hs:37:7-8
56.44 s
[really-safe-money] added mutation ListLit at src/Money/ConversionRate.hs:37:7-8
56.44 s
[really-safe-money] added 21 mutations
56.74 s
[really-safe-money] [ 5 of 12] Compiling Money.ConversionRateOf ( src/Money/ConversionRateOf.hs, dist/build/Money/ConversionRateOf.p_o )
56.74 s
[really-safe-money] mutation: instrumenting Money.ConversionRateOf
56.74 s
[really-safe-money] added 0 mutations
56.91 s
[really-safe-money] [ 6 of 12] Compiling Money.Amount ( src/Money/Amount.hs, dist/build/Money/Amount.p_o )
56.95 s
[really-safe-money] mutation: instrumenting Money.Amount
56.95 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:801:36-38
56.95 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:801:36-38
56.95 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:801:36-38
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:720:6-40
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:720:6-40
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:721:10-44
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:721:10-44
56.95 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:569:18-19
56.95 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:569:10-19
56.95 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:569:10-19
56.95 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:569:10-19
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:577:39-63
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:577:39-63
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:543:11-88
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:543:11-88
56.95 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:544:10-23
56.95 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:544:10-23
56.95 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:544:10-23
56.95 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:544:10-23
56.95 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:544:10-23
56.95 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:544:10-23
56.95 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:546:14-66
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:517:11-18
56.95 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:517:11-18
56.95 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:518:14-15
56.95 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:518:10-15
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:518:10-15
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:518:10-15
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:518:10-15
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:518:10-15
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:518:10-15
56.96 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:520:14-66
56.96 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:475:11-18
56.96 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:475:11-18
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:476:10-23
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:476:10-23
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:476:10-23
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:476:10-23
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:476:10-23
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:476:10-23
56.96 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:478:14-66
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:388:5-16
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:388:5-16
56.96 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:389:9-10
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:389:5-10
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:389:5-10
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:389:5-10
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:389:5-10
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:389:5-10
56.96 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:392:28-71
56.96 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:392:28-71
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:397:14-31
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:397:14-31
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:397:14-31
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:399:18-83
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:399:18-83
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:399:18-83
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:399:18-83
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:399:18-83
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:399:18-83
56.96 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:320:9-10
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:320:5-10
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:320:5-10
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:320:5-10
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:320:5-10
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:320:5-10
56.96 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:323:26-67
56.96 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:323:26-67
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:327:9-16
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:327:9-16
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:328:9-21
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:328:9-21
56.96 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:332:38-40
56.96 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:332:38-40
56.96 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:332:38-40
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:332:14-40
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:332:14-40
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:332:14-40
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:332:14-40
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:332:14-40
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:332:14-40
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:339:22-39
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:339:22-39
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:339:22-39
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:341:26-91
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:341:26-91
56.96 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:341:26-91
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:341:26-91
56.96 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:341:26-91
56.96 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:341:26-91
56.96 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:290:79-80
56.98 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:494:29-94
56.98 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:494:29-94
56.98 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:494:96-97
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:495:10-23
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:495:10-23
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:495:10-23
56.98 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:495:10-23
56.98 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:495:10-23
56.98 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:495:10-23
56.98 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:497:14-66
56.98 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:250:15-16
56.98 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:660:28-37
56.98 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:661:19-28
56.98 s
[really-safe-money] added mutation IntLit at src/Money/Amount.hs:661:30-31
56.98 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:668:17-30
56.98 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:668:17-30
56.98 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:668:17-30
56.98 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:666:27-44
56.98 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:666:27-44
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:681:12-37
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:681:12-37
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:681:12-37
56.98 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:681:12-37
56.98 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:681:12-37
56.98 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:681:12-37
56.98 s
[really-safe-money] added mutation MaybeOp at src/Money/Amount.hs:683:16-27
56.98 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:762:40-49
56.98 s
[really-safe-money] added mutation Arith at src/Money/Amount.hs:762:40-49
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:806:79-92
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:806:79-92
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:806:79-92
56.98 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:806:79-92
56.98 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:806:79-92
56.98 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:806:79-92
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:607:15-22
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:607:15-22
56.98 s
[really-safe-money] added mutation Cmp at src/Money/Amount.hs:607:15-22
56.98 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:607:15-22
56.98 s
[really-safe-money] added mutation ConstBool at src/Money/Amount.hs:607:15-22
56.98 s
[really-safe-money] added mutation Negate at src/Money/Amount.hs:607:15-22
56.98 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:604:9-21
56.98 s
[really-safe-money] added mutation RemoveCase at src/Money/Amount.hs:604:9-21
56.98 s
[really-safe-money] added mutation ListLit at src/Money/Amount.hs:603:7-8
56.98 s
[really-safe-money] added mutation ListLit at src/Money/Amount.hs:603:7-8
56.98 s
[really-safe-money] added 135 mutations
58.98 s
[really-safe-money] [ 7 of 12] Compiling Money.MultiAmount ( src/Money/MultiAmount.hs, dist/build/Money/MultiAmount.p_o )
59.05 s
[really-safe-money] mutation: instrumenting Money.MultiAmount
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
59.05 s
[really-safe-money] added mutation Cmp at src/Money/MultiAmount.hs:168:20-45
59.05 s
[really-safe-money] added mutation Cmp at src/Money/MultiAmount.hs:168:20-45
59.05 s
[really-safe-money] added mutation Cmp at src/Money/MultiAmount.hs:168:20-45
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:168:20-45
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:168:20-45
59.05 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:168:20-45
59.05 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAmount.hs:170:24-57
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
59.05 s
[really-safe-money] added mutation Arith at src/Money/MultiAmount.hs:182:15-106
59.05 s
[really-safe-money] added mutation Arith at src/Money/MultiAmount.hs:182:15-106
59.05 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAmount.hs:112:33-39
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:119:12-28
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:119:12-28
59.05 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:119:12-28
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:114:22-37
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:114:22-37
59.05 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAmount.hs:99:28-34
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:106:12-28
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:106:12-28
59.05 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:106:12-28
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:101:22-37
59.05 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAmount.hs:101:22-37
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:73:6-27
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:73:6-27
59.05 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:73:6-27
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:66:13-29
59.05 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAmount.hs:66:13-29
59.05 s
[really-safe-money] added mutation Negate at src/Money/MultiAmount.hs:66:13-29
59.05 s
[really-safe-money] added mutation ListLit at src/Money/MultiAmount.hs:63:7-8
59.05 s
[really-safe-money] added mutation ListLit at src/Money/MultiAmount.hs:63:7-8
59.05 s
[really-safe-money] added 35 mutations
59.68 s
[really-safe-money] [ 8 of 12] Compiling Money.AmountOf ( src/Money/AmountOf.hs, dist/build/Money/AmountOf.p_o )
59.70 s
[really-safe-money] mutation: instrumenting Money.AmountOf
59.70 s
[really-safe-money] added mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
59.70 s
[really-safe-money] added mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
59.70 s
[really-safe-money] added mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
59.70 s
[really-safe-money] added mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
59.70 s
[really-safe-money] added 4 mutations
60.02 s
[really-safe-money] [ 9 of 12] Compiling Money.Account ( src/Money/Account.hs, dist/build/Money/Account.p_o )
60.03 s
[really-safe-money] mutation: instrumenting Money.Account
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:553:7-39
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:553:7-39
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:553:7-39
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:553:7-39
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:591:7-44
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:591:7-44
60.03 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:421:32-33
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
60.03 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:421:11-29
60.03 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:451:14-23
60.03 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:451:14-23
60.03 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:451:14-23
60.03 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:451:14-23
60.03 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:451:14-23
60.03 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:451:14-23
60.03 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:455:14-23
60.03 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:455:14-23
60.03 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:455:14-23
60.03 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:455:14-23
60.03 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:455:14-23
60.03 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:455:14-23
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:447:7-136
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:447:7-136
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:447:7-136
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:447:7-136
60.04 s
[really-safe-money] added mutation MaybeOp at src/Money/Account.hs:523:16-25
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:522:19-35
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:522:19-35
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:522:19-35
60.04 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:495:17-18
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:495:12-18
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:495:12-18
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:495:12-18
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:495:12-18
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:495:12-18
60.04 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:495:12-18
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:497:16-41
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:497:16-41
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:497:16-41
60.04 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:503:15-16
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:503:10-16
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:503:10-16
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:503:10-16
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:503:10-16
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:503:10-16
60.04 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:503:10-16
60.04 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:233:19-20
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:233:14-20
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:233:14-20
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:233:14-20
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:233:14-20
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:233:14-20
60.04 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:233:14-20
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:211:11-37
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:211:11-37
60.04 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:197:19-20
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:197:14-20
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:197:14-20
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:197:14-20
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:197:14-20
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:197:14-20
60.04 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:197:14-20
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:171:11-37
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:171:11-37
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:155:11-37
60.04 s
[really-safe-money] added mutation RemoveCase at src/Money/Account.hs:155:11-37
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:123:10-23
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:123:10-23
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:123:10-23
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:123:10-23
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:123:10-23
60.04 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:123:10-23
60.04 s
[really-safe-money] added mutation IntLit at src/Money/Account.hs:131:25-26
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:131:20-26
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:131:20-26
60.04 s
[really-safe-money] added mutation Cmp at src/Money/Account.hs:131:20-26
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:131:20-26
60.04 s
[really-safe-money] added mutation ConstBool at src/Money/Account.hs:131:20-26
60.04 s
[really-safe-money] added mutation Negate at src/Money/Account.hs:131:20-26
60.04 s
[really-safe-money] added mutation Arith at src/Money/Account.hs:341:11-18
60.04 s
[really-safe-money] added mutation Arith at src/Money/Account.hs:341:11-18
60.04 s
[really-safe-money] added mutation Arith at src/Money/Account.hs:378:11-18
60.04 s
[really-safe-money] added mutation Arith at src/Money/Account.hs:378:11-18
60.04 s
[really-safe-money] added 87 mutations
60.89 s
[really-safe-money] [10 of 12] Compiling Money.MultiAccount ( src/Money/MultiAccount.hs, dist/build/Money/MultiAccount.p_o )
60.90 s
[really-safe-money] mutation: instrumenting Money.MultiAccount
60.90 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
60.91 s
[really-safe-money] added mutation Arith at src/Money/MultiAccount.hs:192:19-51
60.91 s
[really-safe-money] added mutation Arith at src/Money/MultiAccount.hs:192:19-51
60.91 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAccount.hs:126:45-51
60.91 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAccount.hs:127:45-51
60.91 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:134:12-29
60.91 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:134:12-29
60.91 s
[really-safe-money] added mutation Negate at src/Money/MultiAccount.hs:134:12-29
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:129:23-37
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:129:23-37
60.91 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAccount.hs:112:40-46
60.91 s
[really-safe-money] added mutation MaybeOp at src/Money/MultiAccount.hs:113:40-46
60.91 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:120:12-29
60.91 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:120:12-29
60.91 s
[really-safe-money] added mutation Negate at src/Money/MultiAccount.hs:120:12-29
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:115:23-37
60.91 s
[really-safe-money] added mutation RemoveCase at src/Money/MultiAccount.hs:115:23-37
60.91 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:78:6-28
60.91 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:78:6-28
60.91 s
[really-safe-money] added mutation Negate at src/Money/MultiAccount.hs:78:6-28
60.91 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:69:13-30
60.91 s
[really-safe-money] added mutation ConstBool at src/Money/MultiAccount.hs:69:13-30
60.91 s
[really-safe-money] added mutation Negate at src/Money/MultiAccount.hs:69:13-30
60.91 s
[really-safe-money] added mutation ListLit at src/Money/MultiAccount.hs:66:7-8
60.91 s
[really-safe-money] added mutation ListLit at src/Money/MultiAccount.hs:66:7-8
60.91 s
[really-safe-money] added 30 mutations
61.44 s
[really-safe-money] [11 of 12] Compiling Money.AccountOf ( src/Money/AccountOf.hs, dist/build/Money/AccountOf.p_o )
61.45 s
[really-safe-money] mutation: instrumenting Money.AccountOf
61.45 s
[really-safe-money] added mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
61.45 s
[really-safe-money] added mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
61.45 s
[really-safe-money] added mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
61.45 s
[really-safe-money] added mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
61.45 s
[really-safe-money] added 4 mutations
61.74 s
[really-safe-money] [12 of 12] Compiling Paths_really_safe_money ( dist/build/autogen/Paths_really_safe_money.hs, dist/build/Paths_really_safe_money.p_o )
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/Account.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/AccountOf.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/Amount.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/AmountOf.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/ConversionRate.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/ConversionRateOf.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/Currency.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/MultiAccount.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/MultiAmount.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/QuantisationFactor.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Numeric/DecimalLiteral.dyn_o'
62.13 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Paths_really_safe_money.dyn_o'
62.90 s
[really-safe-money] mutation-nix: manifest output at /nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest:
62.90 s
[really-safe-money] total 384
62.90 s
[really-safe-money] drwxr-xr-x 2 nixbld nixbld 4096 May 15 06:09 .
62.90 s
[really-safe-money] drwxrwxr-t 238 nobody nixbld 28672 May 15 06:09 ..
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 66992 May 15 06:09 Money.Account.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 5043 May 15 06:09 Money.AccountOf.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 84451 May 15 06:09 Money.Amount.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 4850 May 15 06:09 Money.AmountOf.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 12979 May 15 06:09 Money.ConversionRate.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 2 May 15 06:09 Money.ConversionRateOf.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 2 May 15 06:09 Money.Currency.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 22648 May 15 06:09 Money.MultiAccount.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 25712 May 15 06:09 Money.MultiAmount.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 18786 May 15 06:09 Money.QuantisationFactor.json
62.90 s
[really-safe-money] -rw-r--r-- 1 nixbld nixbld 88354 May 15 06:09 Numeric.DecimalLiteral.json
62.90 s
[really-safe-money] mutation-nix: building remaining components with plugin silenced
62.94 s
[really-safe-money] Preprocessing library for really-safe-money-0.0.0.0...
62.94 s
[really-safe-money] Building library for really-safe-money-0.0.0.0...
64.31 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/Account.dyn_o'
64.31 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/AccountOf.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/Amount.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/AmountOf.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/ConversionRate.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/ConversionRateOf.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/Currency.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/MultiAccount.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/MultiAmount.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Money/QuantisationFactor.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Numeric/DecimalLiteral.dyn_o'
64.35 s
[really-safe-money] Warning: ignoring unrecognised input `dist/build/Paths_really_safe_money.dyn_o'
65.04 s
[really-safe-money] Phase: haddockPhase
65.04 s
[really-safe-money] Phase: installPhase
65.08 s
[really-safe-money] Installing library in /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
65.40 s
[really-safe-money] Phase: fixupPhase
65.42 s
[really-safe-money] shrinking RPATHs of ELF executables and libraries in /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0
65.43 s
[really-safe-money] shrinking /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSreally-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9-ghc9.10.3.so
65.44 s
[really-safe-money] checking for references to /build/ in /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0...
65.47 s
[really-safe-money] patching script interpreter paths in /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0
65.47 s
[really-safe-money] stripping (with command strip and flags -S -p) in /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/lib /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0/bin
65.65 s
[really-safe-money] shrinking RPATHs of ELF executables and libraries in /nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest
65.65 s
[really-safe-money] checking for references to /build/ in /nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest...
65.66 s
[really-safe-money] patching script interpreter paths in /nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest
65.75 s
[post-build-hook] Uploading to cachix cache "sydtest": /nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0
66.17 s
[post-build-hook] Pushing 2 paths (195 are already present) using zstd to cache sydtest ⏳
66.17 s
[post-build-hook]
66.53 s
[post-build-hook] Pushing /nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest (324.41 KiB)
66.56 s
[post-build-hook] Pushing /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0 (14.97 MiB)
68.41 s
[post-build-hook]
68.41 s
[post-build-hook] All done.
68.43 s
[post-build-hook] Uploading to the NixCI staging cache: /nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest /nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0
68.47 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
68.49 s
[post-build-hook] copying 2 paths...
68.49 s
[post-build-hook] copying path '/nix/store/sn29y0wbissvhb26wk2yg4x2mx8z2r07-really-safe-money-0.0.0.0' to 'https://cache.staging.nix-ci.com'...
68.49 s
[post-build-hook] copying path '/nix/store/dav2jlmrqs0701cmj0vd4m6574x81wm1-really-safe-money-0.0.0.0-manifest' to 'https://cache.staging.nix-ci.com'...
71.75 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
71.97 s
[post-build-hook] copying 1 paths...
71.99 s
[post-build-hook] copying path '/nix/store/jansac7q2gwf5kkgf6d6aykfbyq5266n-really-safe-money-0.0.0.0.drv' to 'https://cache.staging.nix-ci.com'...
72.18 s
Progress: 1 of 7 built
72.23 s
Building really-safe-money-autodocodec-source
72.26 s
Building really-safe-money-gen-source
72.44 s
[really-safe-money-autodocodec-source] Phase: setupCompilerEnvironmentPhase
72.44 s
[really-safe-money-autodocodec-source] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3.
72.54 s
[really-safe-money-gen-source] Phase: setupCompilerEnvironmentPhase
72.54 s
[really-safe-money-gen-source] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3.
72.70 s
[really-safe-money-autodocodec-source] Phase: unpackPhase
72.71 s
[really-safe-money-autodocodec-source] unpacking source archive /nix/store/8krpxqimxqvympfqdqxg1jzjg2jrcglb-really-safe-money-autodocodec
72.71 s
[really-safe-money-autodocodec-source] source root is really-safe-money-autodocodec
72.72 s
[really-safe-money-autodocodec-source] Phase: patchPhase
72.73 s
[really-safe-money-autodocodec-source] Phase: compileBuildDriverPhase
72.74 s
[really-safe-money-autodocodec-source] setupCompileFlags: -package-db=/build/tmp.UrFaxrKGOJ/setup-package.conf.d -threaded
72.78 s
[really-safe-money-autodocodec-source] [1 of 2] Compiling Main ( /nix/store/4mdp8nhyfddh7bllbi7xszz7k9955n79-Setup.hs, /build/tmp.UrFaxrKGOJ/Main.o )
72.83 s
[really-safe-money-autodocodec-source] [2 of 2] Linking Setup
72.87 s
[really-safe-money-gen-source] Phase: unpackPhase
72.88 s
[really-safe-money-gen-source] unpacking source archive /nix/store/igm3hbdpcwgfbdx9yjyf6d68w1ifih08-really-safe-money-gen
72.88 s
[really-safe-money-gen-source] source root is really-safe-money-gen
72.89 s
[really-safe-money-gen-source] Phase: patchPhase
72.90 s
[really-safe-money-gen-source] Phase: compileBuildDriverPhase
72.91 s
[really-safe-money-gen-source] setupCompileFlags: -package-db=/build/tmp.xrAqKSkSgE/setup-package.conf.d -threaded
72.95 s
[really-safe-money-gen-source] [1 of 2] Compiling Main ( /nix/store/4mdp8nhyfddh7bllbi7xszz7k9955n79-Setup.hs, /build/tmp.xrAqKSkSgE/Main.o )
73.00 s
[really-safe-money-gen-source] [2 of 2] Linking Setup
74.07 s
[really-safe-money-autodocodec-source] Phase: updateAutotoolsGnuConfigScriptsPhase
74.08 s
[really-safe-money-autodocodec-source] Phase: configurePhase
74.09 s
[really-safe-money-autodocodec-source] configureFlags: --verbose --prefix=/nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/share/doc/really-safe-money-autodocodec-0.0.0.0 --with-gcc=gcc --package-db=/build/tmp.UrFaxrKGOJ/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --disable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib
74.10 s
[really-safe-money-autodocodec-source] Using Parsec parser
74.10 s
[really-safe-money-autodocodec-source] Configuring really-safe-money-autodocodec-0.0.0.0...
74.26 s
[really-safe-money-gen-source] Phase: updateAutotoolsGnuConfigScriptsPhase
74.27 s
[really-safe-money-gen-source] Phase: configurePhase
74.27 s
[really-safe-money-gen-source] configureFlags: --verbose --prefix=/nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/share/doc/really-safe-money-gen-0.0.0.0 --with-gcc=gcc --package-db=/build/tmp.xrAqKSkSgE/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --disable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib
74.28 s
[really-safe-money-gen-source] Using Parsec parser
74.28 s
[really-safe-money-gen-source] Configuring really-safe-money-gen-0.0.0.0...
74.69 s
[really-safe-money-autodocodec-source] Dependency autodocodec: using autodocodec-0.5.0.0
74.69 s
[really-safe-money-autodocodec-source] Dependency base >=4.7 && <5: using base-4.20.2.0
74.69 s
[really-safe-money-autodocodec-source] Dependency really-safe-money: using really-safe-money-0.0.0.0
74.69 s
[really-safe-money-autodocodec-source] Source component graph: component lib
74.69 s
[really-safe-money-autodocodec-source] Configured component graph:
74.69 s
[really-safe-money-autodocodec-source] component really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
74.69 s
[really-safe-money-autodocodec-source] include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y
74.69 s
[really-safe-money-autodocodec-source] include base-4.20.2.0-64da
74.69 s
[really-safe-money-autodocodec-source] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.69 s
[really-safe-money-autodocodec-source] Linked component graph:
74.69 s
[really-safe-money-autodocodec-source] unit really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
74.69 s
[really-safe-money-autodocodec-source] include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y
74.69 s
[really-safe-money-autodocodec-source] include base-4.20.2.0-64da
74.69 s
[really-safe-money-autodocodec-source] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.69 s
[really-safe-money-autodocodec-source] Money.Account.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.Account.Codec,Money.AccountOf.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.AccountOf.Codec,Money.Amount.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.Amount.Codec,Money.AmountOf.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.AmountOf.Codec,Money.QuantisationFactor.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.QuantisationFactor.Codec,Numeric.DecimalLiteral.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Numeric.DecimalLiteral.Codec
74.69 s
[really-safe-money-autodocodec-source] Ready component graph:
74.69 s
[really-safe-money-autodocodec-source] definite really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
74.69 s
[really-safe-money-autodocodec-source] depends autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y
74.69 s
[really-safe-money-autodocodec-source] depends base-4.20.2.0-64da
74.69 s
[really-safe-money-autodocodec-source] depends really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.69 s
[really-safe-money-autodocodec-source] Using Cabal-3.12.1.0 compiled by ghc-9.10
74.69 s
[really-safe-money-autodocodec-source] Using compiler: ghc-9.10.3
74.69 s
[really-safe-money-autodocodec-source] Using install prefix:
74.69 s
[really-safe-money-autodocodec-source] /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0
74.70 s
[really-safe-money-autodocodec-source] Executables installed in:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0/bin
74.70 s
[really-safe-money-autodocodec-source] Libraries installed in:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
74.70 s
[really-safe-money-autodocodec-source] Dynamic Libraries installed in:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6
74.70 s
[really-safe-money-autodocodec-source] Private executables installed in:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0/libexec/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-autodocodec-0.0.0.0
74.70 s
[really-safe-money-autodocodec-source] Data files installed in:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0/share/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-autodocodec-0.0.0.0
74.70 s
[really-safe-money-autodocodec-source] Documentation installed in: /share/doc/really-safe-money-autodocodec-0.0.0.0
74.70 s
[really-safe-money-autodocodec-source] Configuration files installed in:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0/etc
74.70 s
[really-safe-money-autodocodec-source] No alex found
74.70 s
[really-safe-money-autodocodec-source] Using ar found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar
74.70 s
[really-safe-money-autodocodec-source] No c2hs found
74.70 s
[really-safe-money-autodocodec-source] No cpphs found
74.70 s
[really-safe-money-autodocodec-source] No doctest found
74.70 s
[really-safe-money-autodocodec-source] Using gcc version 14.3.0 given by user at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc
74.70 s
[really-safe-money-autodocodec-source] Using ghc version 9.10.3 found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc
74.70 s
[really-safe-money-autodocodec-source] Using ghc-pkg version 9.10.3 found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3
74.70 s
[really-safe-money-autodocodec-source] No ghcjs found
74.70 s
[really-safe-money-autodocodec-source] No ghcjs-pkg found
74.70 s
[really-safe-money-autodocodec-source] No greencard found
74.70 s
[really-safe-money-autodocodec-source] Using haddock version 2.31.1 found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3
74.70 s
[really-safe-money-autodocodec-source] No happy found
74.70 s
[really-safe-money-autodocodec-source] Using haskell-suite found on system at: haskell-suite-dummy-location
74.70 s
[really-safe-money-autodocodec-source] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
74.70 s
[really-safe-money-autodocodec-source] No hmake found
74.70 s
[really-safe-money-autodocodec-source] Using hpc version 0.69 found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3
74.70 s
[really-safe-money-autodocodec-source] Using hsc2hs version 0.68.10 found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3
74.70 s
[really-safe-money-autodocodec-source] Using hscolour version 1.25 found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour
74.70 s
[really-safe-money-autodocodec-source] No jhc found
74.70 s
[really-safe-money-autodocodec-source] Using ld found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld
74.70 s
[really-safe-money-autodocodec-source] No pkg-config found
74.70 s
[really-safe-money-autodocodec-source] Using runghc version 9.10.3 found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3
74.70 s
[really-safe-money-autodocodec-source] Using strip version 2.44 found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip
74.70 s
[really-safe-money-autodocodec-source] Using tar found on system at:
74.70 s
[really-safe-money-autodocodec-source] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar
74.70 s
[really-safe-money-autodocodec-source] No uhc found
74.93 s
[really-safe-money-gen-source] Dependency QuickCheck: using QuickCheck-2.15.0.1
74.93 s
[really-safe-money-gen-source] Dependency base >=4.7 && <5: using base-4.20.2.0
74.93 s
[really-safe-money-gen-source] Dependency genvalidity: using genvalidity-1.1.1.0
74.93 s
[really-safe-money-gen-source] Dependency genvalidity-containers: using genvalidity-containers-1.0.0.2
74.93 s
[really-safe-money-gen-source] Dependency really-safe-money: using really-safe-money-0.0.0.0
74.93 s
[really-safe-money-gen-source] Dependency QuickCheck: using QuickCheck-2.15.0.1
74.93 s
[really-safe-money-gen-source] Dependency base >=4.7 && <5: using base-4.20.2.0
74.93 s
[really-safe-money-gen-source] Dependency criterion: using criterion-1.6.4.0
74.93 s
[really-safe-money-gen-source] Dependency deepseq: using deepseq-1.5.0.0
74.93 s
[really-safe-money-gen-source] Dependency genvalidity: using genvalidity-1.1.1.0
74.93 s
[really-safe-money-gen-source] Dependency genvalidity-criterion: using genvalidity-criterion-1.1.0.0
74.93 s
[really-safe-money-gen-source] Dependency genvalidity-vector: using genvalidity-vector-1.0.0.0
74.93 s
[really-safe-money-gen-source] Dependency really-safe-money: using really-safe-money-0.0.0.0
74.93 s
[really-safe-money-gen-source] Dependency really-safe-money-gen: using really-safe-money-gen-0.0.0.0
74.93 s
[really-safe-money-gen-source] Dependency vector: using vector-0.13.2.0
74.93 s
[really-safe-money-gen-source] Source component graph:
74.93 s
[really-safe-money-gen-source] component lib
74.93 s
[really-safe-money-gen-source] component bench:really-safe-money-bench dependency lib
74.93 s
[really-safe-money-gen-source] Configured component graph:
74.93 s
[really-safe-money-gen-source] component really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53
74.93 s
[really-safe-money-gen-source] include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
74.93 s
[really-safe-money-gen-source] include base-4.20.2.0-64da
74.93 s
[really-safe-money-gen-source] include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
74.93 s
[really-safe-money-gen-source] include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1
74.93 s
[really-safe-money-gen-source] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.93 s
[really-safe-money-gen-source] component really-safe-money-gen-0.0.0.0-LP0fSqTOwvk9RMpsKSu0nN-really-safe-money-bench
74.93 s
[really-safe-money-gen-source] include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
74.93 s
[really-safe-money-gen-source] include base-4.20.2.0-64da
74.93 s
[really-safe-money-gen-source] include criterion-1.6.4.0-ExZW8LB8ON09pSIfu9sGRN
74.93 s
[really-safe-money-gen-source] include deepseq-1.5.0.0-9a2c
74.93 s
[really-safe-money-gen-source] include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
74.93 s
[really-safe-money-gen-source] include genvalidity-criterion-1.1.0.0-9pHw4wnFNz9EtFzK0UU3g3
74.93 s
[really-safe-money-gen-source] include genvalidity-vector-1.0.0.0-6KKiduowklk7hSxSW05Gxi
74.93 s
[really-safe-money-gen-source] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.93 s
[really-safe-money-gen-source] include really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53
74.93 s
[really-safe-money-gen-source] include vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a
74.93 s
[really-safe-money-gen-source] Linked component graph:
74.93 s
[really-safe-money-gen-source] unit really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53
74.93 s
[really-safe-money-gen-source] include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
74.93 s
[really-safe-money-gen-source] include base-4.20.2.0-64da
74.93 s
[really-safe-money-gen-source] include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
74.93 s
[really-safe-money-gen-source] include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1
74.93 s
[really-safe-money-gen-source] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.93 s
[really-safe-money-gen-source] Money.Account.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.Account.Gen,Money.AccountOf.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.AccountOf.Gen,Money.Amount.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.Amount.Gen,Money.AmountOf.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.AmountOf.Gen,Money.ConversionRate.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.ConversionRate.Gen,Money.ConversionRateOf.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.ConversionRateOf.Gen,Money.Currency.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.Currency.Gen,Money.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.Gen,Money.MultiAccount.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.MultiAccount.Gen,Money.MultiAmount.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.MultiAmount.Gen,Money.QuantisationFactor.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Money.QuantisationFactor.Gen,Numeric.DecimalLiteral.Gen=really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53:Numeric.DecimalLiteral.Gen
74.93 s
[really-safe-money-gen-source] unit really-safe-money-gen-0.0.0.0-LP0fSqTOwvk9RMpsKSu0nN-really-safe-money-bench
74.93 s
[really-safe-money-gen-source] include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
74.93 s
[really-safe-money-gen-source] include base-4.20.2.0-64da
74.93 s
[really-safe-money-gen-source] include criterion-1.6.4.0-ExZW8LB8ON09pSIfu9sGRN
74.93 s
[really-safe-money-gen-source] include deepseq-1.5.0.0-9a2c
74.93 s
[really-safe-money-gen-source] include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
74.93 s
[really-safe-money-gen-source] include genvalidity-criterion-1.1.0.0-9pHw4wnFNz9EtFzK0UU3g3
74.93 s
[really-safe-money-gen-source] include genvalidity-vector-1.0.0.0-6KKiduowklk7hSxSW05Gxi
74.93 s
[really-safe-money-gen-source] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.93 s
[really-safe-money-gen-source] include really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53
74.93 s
[really-safe-money-gen-source] include vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a
74.93 s
[really-safe-money-gen-source] Ready component graph:
74.93 s
[really-safe-money-gen-source] definite really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53
74.93 s
[really-safe-money-gen-source] depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
74.93 s
[really-safe-money-gen-source] depends base-4.20.2.0-64da
74.93 s
[really-safe-money-gen-source] depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
74.93 s
[really-safe-money-gen-source] depends genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1
74.93 s
[really-safe-money-gen-source] depends really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.93 s
[really-safe-money-gen-source] definite really-safe-money-gen-0.0.0.0-LP0fSqTOwvk9RMpsKSu0nN-really-safe-money-bench
74.93 s
[really-safe-money-gen-source] depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
74.93 s
[really-safe-money-gen-source] depends base-4.20.2.0-64da
74.93 s
[really-safe-money-gen-source] depends criterion-1.6.4.0-ExZW8LB8ON09pSIfu9sGRN
74.93 s
[really-safe-money-gen-source] depends deepseq-1.5.0.0-9a2c
74.93 s
[really-safe-money-gen-source] depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
74.93 s
[really-safe-money-gen-source] depends genvalidity-criterion-1.1.0.0-9pHw4wnFNz9EtFzK0UU3g3
74.93 s
[really-safe-money-gen-source] depends genvalidity-vector-1.0.0.0-6KKiduowklk7hSxSW05Gxi
74.93 s
[really-safe-money-gen-source] depends really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
74.93 s
[really-safe-money-gen-source] depends really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53
74.93 s
[really-safe-money-gen-source] depends vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a
74.93 s
[really-safe-money-gen-source] Using Cabal-3.12.1.0 compiled by ghc-9.10
74.93 s
[really-safe-money-gen-source] Using compiler: ghc-9.10.3
74.93 s
[really-safe-money-gen-source] Using install prefix:
74.93 s
[really-safe-money-gen-source] /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0
74.93 s
[really-safe-money-gen-source] Executables installed in:
74.93 s
[really-safe-money-gen-source] /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0/bin
74.93 s
[really-safe-money-gen-source] Libraries installed in:
74.93 s
[really-safe-money-gen-source] /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-gen-0.0.0.0-6HAQXS408A94VVAcwfSL53
74.93 s
[really-safe-money-gen-source] Dynamic Libraries installed in:
74.93 s
[really-safe-money-gen-source] /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6
74.93 s
[really-safe-money-gen-source] Private executables installed in:
74.93 s
[really-safe-money-gen-source] /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0/libexec/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-gen-0.0.0.0
74.93 s
[really-safe-money-gen-source] Data files installed in:
74.93 s
[really-safe-money-gen-source] /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0/share/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-gen-0.0.0.0
74.93 s
[really-safe-money-gen-source] Documentation installed in: /share/doc/really-safe-money-gen-0.0.0.0
74.93 s
[really-safe-money-gen-source] Configuration files installed in:
74.93 s
[really-safe-money-gen-source] /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0/etc
74.93 s
[really-safe-money-gen-source] No alex found
74.93 s
[really-safe-money-gen-source] Using ar found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar
74.93 s
[really-safe-money-gen-source] No c2hs found
74.93 s
[really-safe-money-gen-source] No cpphs found
74.93 s
[really-safe-money-gen-source] No doctest found
74.93 s
[really-safe-money-gen-source] Using gcc version 14.3.0 given by user at:
74.93 s
[really-safe-money-gen-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc
74.93 s
[really-safe-money-gen-source] Using ghc version 9.10.3 found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc
74.93 s
[really-safe-money-gen-source] Using ghc-pkg version 9.10.3 found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3
74.93 s
[really-safe-money-gen-source] No ghcjs found
74.93 s
[really-safe-money-gen-source] No ghcjs-pkg found
74.93 s
[really-safe-money-gen-source] No greencard found
74.93 s
[really-safe-money-gen-source] Using haddock version 2.31.1 found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3
74.93 s
[really-safe-money-gen-source] No happy found
74.93 s
[really-safe-money-gen-source] Using haskell-suite found on system at: haskell-suite-dummy-location
74.93 s
[really-safe-money-gen-source] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
74.93 s
[really-safe-money-gen-source] No hmake found
74.93 s
[really-safe-money-gen-source] Using hpc version 0.69 found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3
74.93 s
[really-safe-money-gen-source] Using hsc2hs version 0.68.10 found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3
74.93 s
[really-safe-money-gen-source] Using hscolour version 1.25 found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour
74.93 s
[really-safe-money-gen-source] No jhc found
74.93 s
[really-safe-money-gen-source] Using ld found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld
74.93 s
[really-safe-money-gen-source] No pkg-config found
74.93 s
[really-safe-money-gen-source] Using runghc version 9.10.3 found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3
74.93 s
[really-safe-money-gen-source] Using strip version 2.44 found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip
74.93 s
[really-safe-money-gen-source] Using tar found on system at:
74.93 s
[really-safe-money-gen-source] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar
74.93 s
[really-safe-money-gen-source] No uhc found
74.95 s
[really-safe-money-autodocodec-source] Phase: buildPhase
74.96 s
[really-safe-money-autodocodec-source] Distribution quality errors:
74.96 s
[really-safe-money-autodocodec-source] [no-syn-desc] No 'synopsis' or 'description' field.
74.96 s
[really-safe-money-autodocodec-source] Distribution quality warnings:
74.96 s
[really-safe-money-autodocodec-source] [no-category] No 'category' field.
74.96 s
[really-safe-money-autodocodec-source] [no-maintainer] No 'maintainer' field.
74.96 s
[really-safe-money-autodocodec-source] [all-rights-reserved] The 'license' is AllRightsReserved. Is that really what
74.96 s
[really-safe-money-autodocodec-source] you want?
74.96 s
[really-safe-money-autodocodec-source] [missing-upper-bounds] On library, these packages miss upper bounds:
74.96 s
[really-safe-money-autodocodec-source] - autodocodec
74.96 s
[really-safe-money-autodocodec-source] - really-safe-money
74.96 s
[really-safe-money-autodocodec-source] Please add them. There is more information at https://pvp.haskell.org/
74.96 s
[really-safe-money-autodocodec-source] Note: the public hackage server would reject this package.
74.96 s
[really-safe-money-autodocodec-source] Building source dist for really-safe-money-autodocodec-0.0.0.0...
74.98 s
[really-safe-money-autodocodec-source] Source tarball created: dist/really-safe-money-autodocodec-0.0.0.0.tar.gz
74.98 s
[really-safe-money-autodocodec-source] Phase: haddockPhase
74.99 s
[really-safe-money-autodocodec-source] Phase: installPhase
75.00 s
[really-safe-money-autodocodec-source] Phase: fixupPhase
75.03 s
[post-build-hook] Uploading to cachix cache "sydtest": /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0
75.41 s
[post-build-hook] Pushing 1 paths (0 are already present) using zstd to cache sydtest ⏳
75.41 s
[post-build-hook]
75.75 s
[post-build-hook] Pushing /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0 (5.45 KiB)
76.79 s
[post-build-hook]
76.79 s
[post-build-hook] All done.
76.81 s
[post-build-hook] Uploading to the NixCI staging cache: /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0
76.85 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
76.86 s
[post-build-hook] copying 1 paths...
76.86 s
[post-build-hook] copying path '/nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0' to 'https://cache.staging.nix-ci.com'...
77.14 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
77.36 s
[post-build-hook] copying 1 paths...
77.41 s
[post-build-hook] copying path '/nix/store/ci0f81v6m53hf03x1pk4ad1c2r8d4aa7-really-safe-money-autodocodec-source-0.0.0.0.drv' to 'https://cache.staging.nix-ci.com'...
77.54 s
Progress: 2 of 6 built (1 building)
77.58 s
Building really-safe-money-autodocodec
77.58 s
[really-safe-money-gen-source] Phase: buildPhase
77.58 s
[really-safe-money-gen-source] Distribution quality errors:
77.58 s
[really-safe-money-gen-source] [no-syn-desc] No 'synopsis' or 'description' field.
77.58 s
[really-safe-money-gen-source] Distribution quality warnings:
77.58 s
[really-safe-money-gen-source] [no-category] No 'category' field.
77.58 s
[really-safe-money-gen-source] [no-maintainer] No 'maintainer' field.
77.58 s
[really-safe-money-gen-source] [all-rights-reserved] The 'license' is AllRightsReserved. Is that really what
77.58 s
[really-safe-money-gen-source] you want?
77.58 s
[really-safe-money-gen-source] [missing-upper-bounds] On library, these packages miss upper bounds:
77.58 s
[really-safe-money-gen-source] - QuickCheck
77.58 s
[really-safe-money-gen-source] - genvalidity
77.58 s
[really-safe-money-gen-source] - genvalidity-containers
77.58 s
[really-safe-money-gen-source] - really-safe-money
77.58 s
[really-safe-money-gen-source] Please add them. There is more information at https://pvp.haskell.org/
77.58 s
[really-safe-money-gen-source] Note: the public hackage server would reject this package.
77.58 s
[really-safe-money-gen-source] Building source dist for really-safe-money-gen-0.0.0.0...
77.58 s
[really-safe-money-gen-source] Source tarball created: dist/really-safe-money-gen-0.0.0.0.tar.gz
77.58 s
[really-safe-money-gen-source] Phase: haddockPhase
77.58 s
[really-safe-money-gen-source] Phase: installPhase
77.58 s
[really-safe-money-gen-source] Phase: fixupPhase
77.61 s
[post-build-hook] Uploading to cachix cache "sydtest": /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0
77.98 s
[post-build-hook] Pushing 1 paths (0 are already present) using zstd to cache sydtest ⏳
77.98 s
[post-build-hook]
78.33 s
[post-build-hook] Pushing /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0 (16.64 KiB)
79.35 s
[post-build-hook]
79.35 s
[post-build-hook] All done.
79.42 s
[post-build-hook] Uploading to the NixCI staging cache: /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0
79.58 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
79.62 s
[post-build-hook] copying 1 paths...
79.62 s
[post-build-hook] copying path '/nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0' to 'https://cache.staging.nix-ci.com'...
80.07 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
80.38 s
[post-build-hook] copying 1 paths...
80.39 s
[post-build-hook] copying path '/nix/store/96mvn8aq20fqwa8xj8zbd2qla0a8f07z-really-safe-money-gen-source-0.0.0.0.drv' to 'https://cache.staging.nix-ci.com'...
80.66 s
Progress: 3 of 6 built (1 building)
80.66 s
[really-safe-money-autodocodec] Phase: setupCompilerEnvironmentPhase
80.66 s
[really-safe-money-autodocodec] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3.
80.67 s
[really-safe-money-autodocodec] Phase: unpackPhase
80.67 s
[really-safe-money-autodocodec] unpacking source archive /nix/store/z042hi7nifdgxm1vkd3qb5fg9cwvcwqp-really-safe-money-autodocodec-source-0.0.0.0/really-safe-money-autodocodec-0.0.0.0.tar.gz
80.67 s
[really-safe-money-autodocodec] source root is really-safe-money-autodocodec-0.0.0.0
80.67 s
[really-safe-money-autodocodec] setting SOURCE_DATE_EPOCH to timestamp 1778825373 of file "really-safe-money-autodocodec-0.0.0.0/test/Spec.hs"
80.67 s
[really-safe-money-autodocodec] warning: file "really-safe-money-autodocodec-0.0.0.0/test/Spec.hs" may be generated; SOURCE_DATE_EPOCH may be non-deterministic
80.67 s
[really-safe-money-autodocodec] Phase: patchPhase
80.67 s
[really-safe-money-autodocodec] Phase: compileBuildDriverPhase
80.67 s
[really-safe-money-autodocodec] setupCompileFlags: -package-db=/build/tmp.1LDVciBuwE/setup-package.conf.d -threaded
80.67 s
[really-safe-money-autodocodec] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.1LDVciBuwE/Main.o )
80.67 s
[really-safe-money-autodocodec] [2 of 2] Linking Setup
80.67 s
[really-safe-money-autodocodec] Phase: updateAutotoolsGnuConfigScriptsPhase
80.67 s
[really-safe-money-autodocodec] Phase: configurePhase
80.67 s
[really-safe-money-autodocodec] configureFlags: --verbose --prefix=/nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --with-gcc=gcc --package-db=/build/tmp.1LDVciBuwE/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --disable-static --disable-executable-dynamic --disable-tests --enable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --ghc-options=-fplugin-opt=Test.Syd.Mutation.Plugin:--debug --disable-optimization --ghc-option=-j1 --ghc-option=+RTS --ghc-option=-A32M --ghc-option=-M16g --ghc-option=-RTS --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib
80.67 s
[really-safe-money-autodocodec] Using Parsec parser
80.67 s
[really-safe-money-autodocodec] Configuring really-safe-money-autodocodec-0.0.0.0...
81.91 s
[really-safe-money-autodocodec] Dependency autodocodec: using autodocodec-0.5.0.0
81.91 s
[really-safe-money-autodocodec] Dependency base >=4.7 && <5: using base-4.20.2.0
81.91 s
[really-safe-money-autodocodec] Dependency really-safe-money: using really-safe-money-0.0.0.0
81.91 s
[really-safe-money-autodocodec] Source component graph: component lib
81.91 s
[really-safe-money-autodocodec] Configured component graph:
81.91 s
[really-safe-money-autodocodec] component really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
81.91 s
[really-safe-money-autodocodec] include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y
81.91 s
[really-safe-money-autodocodec] include base-4.20.2.0-64da
81.91 s
[really-safe-money-autodocodec] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
81.91 s
[really-safe-money-autodocodec] Linked component graph:
81.91 s
[really-safe-money-autodocodec] unit really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
81.91 s
[really-safe-money-autodocodec] include autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y
81.92 s
[really-safe-money-autodocodec] include base-4.20.2.0-64da
81.92 s
[really-safe-money-autodocodec] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
81.92 s
[really-safe-money-autodocodec] Money.Account.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.Account.Codec,Money.AccountOf.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.AccountOf.Codec,Money.Amount.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.Amount.Codec,Money.AmountOf.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.AmountOf.Codec,Money.QuantisationFactor.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Money.QuantisationFactor.Codec,Numeric.DecimalLiteral.Codec=really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk:Numeric.DecimalLiteral.Codec
81.92 s
[really-safe-money-autodocodec] Ready component graph:
81.92 s
[really-safe-money-autodocodec] definite really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
81.92 s
[really-safe-money-autodocodec] depends autodocodec-0.5.0.0-1mMvp4WI6JDKv9IH8Klk8Y
81.92 s
[really-safe-money-autodocodec] depends base-4.20.2.0-64da
81.92 s
[really-safe-money-autodocodec] depends really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
81.92 s
[really-safe-money-autodocodec] Using Cabal-3.12.1.0 compiled by ghc-9.10
81.92 s
[really-safe-money-autodocodec] Using compiler: ghc-9.10.3
81.92 s
[really-safe-money-autodocodec] Using install prefix:
81.92 s
[really-safe-money-autodocodec] /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0
81.92 s
[really-safe-money-autodocodec] Executables installed in:
81.92 s
[really-safe-money-autodocodec] /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/bin
81.92 s
[really-safe-money-autodocodec] Libraries installed in:
81.92 s
[really-safe-money-autodocodec] /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
81.92 s
[really-safe-money-autodocodec] Dynamic Libraries installed in:
81.92 s
[really-safe-money-autodocodec] /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6
81.92 s
[really-safe-money-autodocodec] Private executables installed in:
81.92 s
[really-safe-money-autodocodec] /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/libexec/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-autodocodec-0.0.0.0
81.92 s
[really-safe-money-autodocodec] Data files installed in:
81.92 s
[really-safe-money-autodocodec] /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/share/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-autodocodec-0.0.0.0
81.92 s
[really-safe-money-autodocodec] Documentation installed in:
81.92 s
[really-safe-money-autodocodec] /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/share/doc/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-autodocodec-0.0.0.0
81.92 s
[really-safe-money-autodocodec] Configuration files installed in:
81.92 s
[really-safe-money-autodocodec] /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/etc
81.92 s
[really-safe-money-autodocodec] No alex found
81.92 s
[really-safe-money-autodocodec] Using ar found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar
81.92 s
[really-safe-money-autodocodec] No c2hs found
81.92 s
[really-safe-money-autodocodec] No cpphs found
81.92 s
[really-safe-money-autodocodec] No doctest found
81.92 s
[really-safe-money-autodocodec] Using gcc version 14.3.0 given by user at:
81.92 s
[really-safe-money-autodocodec] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc
81.92 s
[really-safe-money-autodocodec] Using ghc version 9.10.3 found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc
81.92 s
[really-safe-money-autodocodec] Using ghc-pkg version 9.10.3 found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3
81.92 s
[really-safe-money-autodocodec] No ghcjs found
81.92 s
[really-safe-money-autodocodec] No ghcjs-pkg found
81.92 s
[really-safe-money-autodocodec] No greencard found
81.92 s
[really-safe-money-autodocodec] Using haddock version 2.31.1 found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3
81.92 s
[really-safe-money-autodocodec] No happy found
81.92 s
[really-safe-money-autodocodec] Using haskell-suite found on system at: haskell-suite-dummy-location
81.92 s
[really-safe-money-autodocodec] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
81.92 s
[really-safe-money-autodocodec] No hmake found
81.92 s
[really-safe-money-autodocodec] Using hpc version 0.69 found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3
81.92 s
[really-safe-money-autodocodec] Using hsc2hs version 0.68.10 found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3
81.92 s
[really-safe-money-autodocodec] Using hscolour version 1.25 found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour
81.92 s
[really-safe-money-autodocodec] No jhc found
81.92 s
[really-safe-money-autodocodec] Using ld found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld
81.92 s
[really-safe-money-autodocodec] No pkg-config found
81.92 s
[really-safe-money-autodocodec] Using runghc version 9.10.3 found on system at:
81.92 s
[really-safe-money-autodocodec] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3
81.92 s
[really-safe-money-autodocodec] Using strip version 2.44 found on system at:
81.93 s
[really-safe-money-autodocodec] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip
81.93 s
[really-safe-money-autodocodec] Using tar found on system at:
81.93 s
[really-safe-money-autodocodec] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar
81.93 s
[really-safe-money-autodocodec] No uhc found
82.47 s
[really-safe-money-autodocodec] Phase: buildPhase
82.48 s
[really-safe-money-autodocodec] mutation-nix: setting MUTATION_MANIFEST_DIR=/nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest
82.63 s
[really-safe-money-autodocodec] Preprocessing library for really-safe-money-autodocodec-0.0.0.0...
82.64 s
[really-safe-money-autodocodec] Building library for really-safe-money-autodocodec-0.0.0.0...
82.91 s
[really-safe-money-autodocodec] [1 of 7] Compiling Money.Account.Codec ( src/Money/Account/Codec.hs, dist/build/Money/Account/Codec.o, dist/build/Money/Account/Codec.dyn_o )
83.04 s
[really-safe-money-autodocodec] mutation: instrumenting Money.Account.Codec
83.08 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Account/Codec.hs:79:11-24
83.08 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Account/Codec.hs:79:11-24
83.08 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Account/Codec.hs:51:33-76
83.08 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Account/Codec.hs:51:33-76
83.08 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Account/Codec.hs:50:11-24
83.09 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Account/Codec.hs:50:11-24
83.09 s
[really-safe-money-autodocodec] added 6 mutations
83.60 s
[really-safe-money-autodocodec] [2 of 7] Compiling Money.AccountOf.Codec ( src/Money/AccountOf/Codec.hs, dist/build/Money/AccountOf/Codec.o, dist/build/Money/AccountOf/Codec.dyn_o )
83.60 s
[really-safe-money-autodocodec] mutation: instrumenting Money.AccountOf.Codec
83.60 s
[really-safe-money-autodocodec] added 0 mutations
83.63 s
[really-safe-money-autodocodec] [3 of 7] Compiling Money.Amount.Codec ( src/Money/Amount/Codec.hs, dist/build/Money/Amount/Codec.o, dist/build/Money/Amount/Codec.dyn_o )
83.63 s
[really-safe-money-autodocodec] mutation: instrumenting Money.Amount.Codec
83.63 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:47:33-75
83.63 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:47:33-75
83.63 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
83.63 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
83.63 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
83.63 s
[really-safe-money-autodocodec] added mutation ConstBool at src/Money/Amount/Codec.hs:49:12-59
83.63 s
[really-safe-money-autodocodec] added mutation ConstBool at src/Money/Amount/Codec.hs:49:12-59
83.63 s
[really-safe-money-autodocodec] added mutation Negate at src/Money/Amount/Codec.hs:49:12-59
83.63 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:50:31-84
83.64 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:50:31-84
83.64 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
83.64 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
83.64 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
83.64 s
[really-safe-money-autodocodec] added mutation ConstBool at src/Money/Amount/Codec.hs:52:16-63
83.64 s
[really-safe-money-autodocodec] added mutation ConstBool at src/Money/Amount/Codec.hs:52:16-63
83.64 s
[really-safe-money-autodocodec] added mutation Negate at src/Money/Amount/Codec.hs:52:16-63
83.64 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:53:35-90
83.64 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:53:35-90
83.64 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Amount/Codec.hs:46:11-86
83.64 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Amount/Codec.hs:46:11-86
83.64 s
[really-safe-money-autodocodec] added 20 mutations
83.79 s
[really-safe-money-autodocodec] [4 of 7] Compiling Money.AmountOf.Codec ( src/Money/AmountOf/Codec.hs, dist/build/Money/AmountOf/Codec.o, dist/build/Money/AmountOf/Codec.dyn_o )
83.79 s
[really-safe-money-autodocodec] mutation: instrumenting Money.AmountOf.Codec
83.79 s
[really-safe-money-autodocodec] added 0 mutations
83.82 s
[really-safe-money-autodocodec] [5 of 7] Compiling Money.QuantisationFactor.Codec ( src/Money/QuantisationFactor/Codec.hs, dist/build/Money/QuantisationFactor/Codec.o, dist/build/Money/QuantisationFactor/Codec.dyn_o )
83.83 s
[really-safe-money-autodocodec] mutation: instrumenting Money.QuantisationFactor.Codec
83.83 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/QuantisationFactor/Codec.hs:41:11-26
83.83 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/QuantisationFactor/Codec.hs:41:11-26
83.83 s
[really-safe-money-autodocodec] added 2 mutations
83.88 s
[really-safe-money-autodocodec] [6 of 7] Compiling Numeric.DecimalLiteral.Codec ( src/Numeric/DecimalLiteral/Codec.hs, dist/build/Numeric/DecimalLiteral/Codec.o, dist/build/Numeric/DecimalLiteral/Codec.dyn_o )
83.89 s
[really-safe-money-autodocodec] mutation: instrumenting Numeric.DecimalLiteral.Codec
83.89 s
[really-safe-money-autodocodec] added mutation ListLit at src/Numeric/DecimalLiteral/Codec.hs:40:33-82
83.89 s
[really-safe-money-autodocodec] added mutation ListLit at src/Numeric/DecimalLiteral/Codec.hs:40:33-82
83.89 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Numeric/DecimalLiteral/Codec.hs:39:11-24
83.89 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Numeric/DecimalLiteral/Codec.hs:39:11-24
83.89 s
[really-safe-money-autodocodec] added 4 mutations
84.09 s
[really-safe-money-autodocodec] [7 of 7] Compiling Paths_really_safe_money_autodocodec ( dist/build/autogen/Paths_really_safe_money_autodocodec.hs, dist/build/Paths_really_safe_money_autodocodec.o, dist/build/Paths_really_safe_money_autodocodec.dyn_o )
85.05 s
[really-safe-money-autodocodec] [1 of 7] Compiling Money.Account.Codec ( src/Money/Account/Codec.hs, dist/build/Money/Account/Codec.p_o )
85.14 s
[really-safe-money-autodocodec] mutation: instrumenting Money.Account.Codec
85.32 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Account/Codec.hs:79:11-24
85.32 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Account/Codec.hs:79:11-24
85.32 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Account/Codec.hs:51:33-76
85.32 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Account/Codec.hs:51:33-76
85.32 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Account/Codec.hs:50:11-24
85.32 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Account/Codec.hs:50:11-24
85.32 s
[really-safe-money-autodocodec] added 6 mutations
86.17 s
[really-safe-money-autodocodec] [2 of 7] Compiling Money.AccountOf.Codec ( src/Money/AccountOf/Codec.hs, dist/build/Money/AccountOf/Codec.p_o )
86.18 s
[really-safe-money-autodocodec] mutation: instrumenting Money.AccountOf.Codec
86.18 s
[really-safe-money-autodocodec] added 0 mutations
86.31 s
[really-safe-money-autodocodec] [3 of 7] Compiling Money.Amount.Codec ( src/Money/Amount/Codec.hs, dist/build/Money/Amount/Codec.p_o )
86.31 s
[really-safe-money-autodocodec] mutation: instrumenting Money.Amount.Codec
86.31 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:47:33-75
86.31 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:47:33-75
86.31 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
86.31 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
86.31 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
86.31 s
[really-safe-money-autodocodec] added mutation ConstBool at src/Money/Amount/Codec.hs:49:12-59
86.32 s
[really-safe-money-autodocodec] added mutation ConstBool at src/Money/Amount/Codec.hs:49:12-59
86.32 s
[really-safe-money-autodocodec] added mutation Negate at src/Money/Amount/Codec.hs:49:12-59
86.32 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:50:31-84
86.32 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:50:31-84
86.32 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
86.32 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
86.32 s
[really-safe-money-autodocodec] added mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
86.32 s
[really-safe-money-autodocodec] added mutation ConstBool at src/Money/Amount/Codec.hs:52:16-63
86.32 s
[really-safe-money-autodocodec] added mutation ConstBool at src/Money/Amount/Codec.hs:52:16-63
86.32 s
[really-safe-money-autodocodec] added mutation Negate at src/Money/Amount/Codec.hs:52:16-63
86.32 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:53:35-90
86.32 s
[really-safe-money-autodocodec] added mutation ListLit at src/Money/Amount/Codec.hs:53:35-90
86.32 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Amount/Codec.hs:46:11-86
86.32 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/Amount/Codec.hs:46:11-86
86.32 s
[really-safe-money-autodocodec] added 20 mutations
86.57 s
[really-safe-money-autodocodec] [4 of 7] Compiling Money.AmountOf.Codec ( src/Money/AmountOf/Codec.hs, dist/build/Money/AmountOf/Codec.p_o )
86.57 s
[really-safe-money-autodocodec] mutation: instrumenting Money.AmountOf.Codec
86.57 s
[really-safe-money-autodocodec] added 0 mutations
86.71 s
[really-safe-money-autodocodec] [5 of 7] Compiling Money.QuantisationFactor.Codec ( src/Money/QuantisationFactor/Codec.hs, dist/build/Money/QuantisationFactor/Codec.p_o )
86.71 s
[really-safe-money-autodocodec] mutation: instrumenting Money.QuantisationFactor.Codec
86.71 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/QuantisationFactor/Codec.hs:41:11-26
86.71 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Money/QuantisationFactor/Codec.hs:41:11-26
86.71 s
[really-safe-money-autodocodec] added 2 mutations
86.86 s
[really-safe-money-autodocodec] [6 of 7] Compiling Numeric.DecimalLiteral.Codec ( src/Numeric/DecimalLiteral/Codec.hs, dist/build/Numeric/DecimalLiteral/Codec.p_o )
86.86 s
[really-safe-money-autodocodec] mutation: instrumenting Numeric.DecimalLiteral.Codec
86.86 s
[really-safe-money-autodocodec] added mutation ListLit at src/Numeric/DecimalLiteral/Codec.hs:40:33-82
86.86 s
[really-safe-money-autodocodec] added mutation ListLit at src/Numeric/DecimalLiteral/Codec.hs:40:33-82
86.86 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Numeric/DecimalLiteral/Codec.hs:39:11-24
86.86 s
[really-safe-money-autodocodec] added mutation RemoveCase at src/Numeric/DecimalLiteral/Codec.hs:39:11-24
86.86 s
[really-safe-money-autodocodec] added 4 mutations
87.03 s
[really-safe-money-autodocodec] [7 of 7] Compiling Paths_really_safe_money_autodocodec ( dist/build/autogen/Paths_really_safe_money_autodocodec.hs, dist/build/Paths_really_safe_money_autodocodec.p_o )
87.42 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/Account/Codec.dyn_o'
87.42 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/AccountOf/Codec.dyn_o'
87.42 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/Amount/Codec.dyn_o'
87.42 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/AmountOf/Codec.dyn_o'
87.42 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/QuantisationFactor/Codec.dyn_o'
87.42 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Numeric/DecimalLiteral/Codec.dyn_o'
87.42 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Paths_really_safe_money_autodocodec.dyn_o'
88.24 s
[really-safe-money-autodocodec] mutation-nix: manifest output at /nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest:
88.29 s
[really-safe-money-autodocodec] total 76
88.29 s
[really-safe-money-autodocodec] drwxr-xr-x 2 nixbld nixbld 4096 May 15 06:09 .
88.29 s
[really-safe-money-autodocodec] drwxrwxr-t 239 nobody nixbld 28672 May 15 06:09 ..
88.29 s
[really-safe-money-autodocodec] -rw-r--r-- 1 nixbld nixbld 4508 May 15 06:09 Money.Account.Codec.json
88.29 s
[really-safe-money-autodocodec] -rw-r--r-- 1 nixbld nixbld 2 May 15 06:09 Money.AccountOf.Codec.json
88.29 s
[really-safe-money-autodocodec] -rw-r--r-- 1 nixbld nixbld 16321 May 15 06:09 Money.Amount.Codec.json
88.29 s
[really-safe-money-autodocodec] -rw-r--r-- 1 nixbld nixbld 2 May 15 06:09 Money.AmountOf.Codec.json
88.29 s
[really-safe-money-autodocodec] -rw-r--r-- 1 nixbld nixbld 1486 May 15 06:09 Money.QuantisationFactor.Codec.json
88.29 s
[really-safe-money-autodocodec] -rw-r--r-- 1 nixbld nixbld 2827 May 15 06:09 Numeric.DecimalLiteral.Codec.json
88.29 s
[really-safe-money-autodocodec] mutation-nix: building remaining components with plugin silenced
88.31 s
[really-safe-money-autodocodec] Preprocessing library for really-safe-money-autodocodec-0.0.0.0...
88.31 s
[really-safe-money-autodocodec] Building library for really-safe-money-autodocodec-0.0.0.0...
89.72 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/Account/Codec.dyn_o'
89.72 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/AccountOf/Codec.dyn_o'
89.72 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/Amount/Codec.dyn_o'
89.72 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/AmountOf/Codec.dyn_o'
89.72 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Money/QuantisationFactor/Codec.dyn_o'
89.72 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Numeric/DecimalLiteral/Codec.dyn_o'
89.72 s
[really-safe-money-autodocodec] Warning: ignoring unrecognised input `dist/build/Paths_really_safe_money_autodocodec.dyn_o'
90.59 s
[really-safe-money-autodocodec] Phase: haddockPhase
90.60 s
[really-safe-money-autodocodec] Phase: installPhase
90.67 s
[really-safe-money-autodocodec] Installing library in /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk
90.87 s
[really-safe-money-autodocodec] Phase: fixupPhase
90.89 s
[really-safe-money-autodocodec] shrinking RPATHs of ELF executables and libraries in /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0
90.89 s
[really-safe-money-autodocodec] shrinking /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSreally-safe-money-autodocodec-0.0.0.0-6uQz3PYxbwUCTmvro4lDZk-ghc9.10.3.so
90.91 s
[really-safe-money-autodocodec] checking for references to /build/ in /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0...
90.93 s
[really-safe-money-autodocodec] patching script interpreter paths in /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0
90.94 s
[really-safe-money-autodocodec] stripping (with command strip and flags -S -p) in /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/lib /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0/bin
90.98 s
[really-safe-money-autodocodec] shrinking RPATHs of ELF executables and libraries in /nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest
90.98 s
[really-safe-money-autodocodec] checking for references to /build/ in /nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest...
90.99 s
[really-safe-money-autodocodec] patching script interpreter paths in /nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest
91.06 s
[post-build-hook] Uploading to cachix cache "sydtest": /nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0
91.61 s
[post-build-hook] Pushing 2 paths (196 are already present) using zstd to cache sydtest ⏳
91.61 s
[post-build-hook]
91.99 s
[post-build-hook] Pushing /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0 (1.60 MiB)
92.03 s
[post-build-hook] Pushing /nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest (25.90 KiB)
93.41 s
[post-build-hook]
93.44 s
[post-build-hook] All done.
93.44 s
[post-build-hook] Uploading to the NixCI staging cache: /nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest /nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0
93.47 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
93.66 s
[post-build-hook] copying 2 paths...
93.66 s
[post-build-hook] copying path '/nix/store/qzy5bm1pllfg2pqnwd4njl9rcifmjgb5-really-safe-money-autodocodec-0.0.0.0-manifest' to 'https://cache.staging.nix-ci.com'...
93.66 s
[post-build-hook] copying path '/nix/store/r8xkjf7b5xd6xpcnxaw5ybca91qkld6i-really-safe-money-autodocodec-0.0.0.0' to 'https://cache.staging.nix-ci.com'...
94.18 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
94.44 s
[post-build-hook] copying 1 paths...
94.45 s
[post-build-hook] copying path '/nix/store/qwlhs7fhsafkj7674xfhydxq4qxhhv9p-really-safe-money-autodocodec-0.0.0.0.drv' to 'https://cache.staging.nix-ci.com'...
94.63 s
Progress: 4 of 6 built
94.68 s
Building really-safe-money-gen
95.03 s
[really-safe-money-gen] Phase: setupCompilerEnvironmentPhase
95.04 s
[really-safe-money-gen] Build with /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3.
95.50 s
[really-safe-money-gen] Phase: unpackPhase
95.50 s
[really-safe-money-gen] unpacking source archive /nix/store/hga9wggcwybag4w71b5ka31g2vxinw7l-really-safe-money-gen-source-0.0.0.0/really-safe-money-gen-0.0.0.0.tar.gz
95.51 s
[really-safe-money-gen] source root is really-safe-money-gen-0.0.0.0
95.52 s
[really-safe-money-gen] setting SOURCE_DATE_EPOCH to timestamp 1778825374 of file "really-safe-money-gen-0.0.0.0/test/Spec.hs"
95.52 s
[really-safe-money-gen] warning: file "really-safe-money-gen-0.0.0.0/test/Spec.hs" may be generated; SOURCE_DATE_EPOCH may be non-deterministic
95.52 s
[really-safe-money-gen] Phase: patchPhase
95.53 s
[really-safe-money-gen] Phase: compileBuildDriverPhase
95.53 s
[really-safe-money-gen] setupCompileFlags: -package-db=/build/tmp.ytD9aMYKlT/setup-package.conf.d -threaded
95.58 s
[really-safe-money-gen] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.ytD9aMYKlT/Main.o )
95.63 s
[really-safe-money-gen] [2 of 2] Linking Setup
96.78 s
[really-safe-money-gen] Phase: updateAutotoolsGnuConfigScriptsPhase
96.79 s
[really-safe-money-gen] Phase: configurePhase
96.80 s
[really-safe-money-gen] configureFlags: --verbose --prefix=/nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc/share/doc/really-safe-money-gen-0.0.0.0 --with-gcc=gcc --package-db=/build/tmp.ytD9aMYKlT/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --enable-tests --disable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --ghc-options=-O2 --ghc-options=-Wall --ghc-options=-Wincomplete-uni-patterns --ghc-options=-Wincomplete-record-updates --ghc-options=-Wpartial-fields --ghc-options=-Widentities --ghc-options=-Wredundant-constraints --ghc-options=-Wcpp-undef --ghc-options=-Werror --extra-lib-dirs=/nix/store/ffyzkisqs4vc4mg28bwwlyqjf8i9ph6b-ncurses-6.5/lib --extra-lib-dirs=/nix/store/n28qgdj8c1q41kf7n4y1jxa6ckp85m3c-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/1b6h99dw7bk4wbn77kbalih42zbc67m1-elfutils-0.194/lib --extra-lib-dirs=/nix/store/hi0ar880110k6jsmmili7dh1gq3cg2a9-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/g09cflpnp4g80q56sj9dng1qzv4v4ybc-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/lib
96.80 s
[really-safe-money-gen] Using Parsec parser
96.80 s
[really-safe-money-gen] Configuring really-safe-money-gen-0.0.0.0...
97.45 s
[really-safe-money-gen] Dependency QuickCheck: using QuickCheck-2.15.0.1
97.45 s
[really-safe-money-gen] Dependency base >=4.7 && <5: using base-4.20.2.0
97.45 s
[really-safe-money-gen] Dependency genvalidity: using genvalidity-1.1.1.0
97.45 s
[really-safe-money-gen] Dependency genvalidity-containers: using genvalidity-containers-1.0.0.2
97.45 s
[really-safe-money-gen] Dependency really-safe-money: using really-safe-money-0.0.0.0
97.45 s
[really-safe-money-gen] Dependency base >=4.7 && <5: using base-4.20.2.0
97.45 s
[really-safe-money-gen] Dependency containers: using containers-0.7
97.45 s
[really-safe-money-gen] Dependency genvalidity-sydtest: using genvalidity-sydtest-1.0.1.0
97.45 s
[really-safe-money-gen] Dependency genvalidity-vector: using genvalidity-vector-1.0.0.0
97.45 s
[really-safe-money-gen] Dependency really-safe-money: using really-safe-money-0.0.0.0
97.45 s
[really-safe-money-gen] Dependency really-safe-money-gen: using really-safe-money-gen-0.0.0.0
97.45 s
[really-safe-money-gen] Dependency sydtest: using sydtest-0.23.0.2
97.45 s
[really-safe-money-gen] Dependency vector: using vector-0.13.2.0
97.45 s
[really-safe-money-gen] Source component graph:
97.45 s
[really-safe-money-gen] component lib
97.45 s
[really-safe-money-gen] component test:really-safe-money-test dependency lib
97.45 s
[really-safe-money-gen] Configured component graph:
97.45 s
[really-safe-money-gen] component really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A
97.45 s
[really-safe-money-gen] include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
97.45 s
[really-safe-money-gen] include base-4.20.2.0-64da
97.45 s
[really-safe-money-gen] include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
97.45 s
[really-safe-money-gen] include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1
97.45 s
[really-safe-money-gen] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
97.45 s
[really-safe-money-gen] component really-safe-money-gen-0.0.0.0-Ls5GL9RPudG7f67os7F74b-really-safe-money-test
97.45 s
[really-safe-money-gen] include base-4.20.2.0-64da
97.45 s
[really-safe-money-gen] include containers-0.7-504a
97.45 s
[really-safe-money-gen] include genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v
97.45 s
[really-safe-money-gen] include genvalidity-vector-1.0.0.0-6KKiduowklk7hSxSW05Gxi
97.45 s
[really-safe-money-gen] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
97.45 s
[really-safe-money-gen] include really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A
97.45 s
[really-safe-money-gen] include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7
97.45 s
[really-safe-money-gen] include vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a
97.45 s
[really-safe-money-gen] Linked component graph:
97.45 s
[really-safe-money-gen] unit really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A
97.45 s
[really-safe-money-gen] include QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
97.45 s
[really-safe-money-gen] include base-4.20.2.0-64da
97.45 s
[really-safe-money-gen] include genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
97.45 s
[really-safe-money-gen] include genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1
97.45 s
[really-safe-money-gen] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
97.45 s
[really-safe-money-gen] Money.Account.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.Account.Gen,Money.AccountOf.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.AccountOf.Gen,Money.Amount.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.Amount.Gen,Money.AmountOf.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.AmountOf.Gen,Money.ConversionRate.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.ConversionRate.Gen,Money.ConversionRateOf.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.ConversionRateOf.Gen,Money.Currency.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.Currency.Gen,Money.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.Gen,Money.MultiAccount.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.MultiAccount.Gen,Money.MultiAmount.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.MultiAmount.Gen,Money.QuantisationFactor.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Money.QuantisationFactor.Gen,Numeric.DecimalLiteral.Gen=really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A:Numeric.DecimalLiteral.Gen
97.45 s
[really-safe-money-gen] unit really-safe-money-gen-0.0.0.0-Ls5GL9RPudG7f67os7F74b-really-safe-money-test
97.45 s
[really-safe-money-gen] include base-4.20.2.0-64da
97.45 s
[really-safe-money-gen] include containers-0.7-504a
97.45 s
[really-safe-money-gen] include genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v
97.45 s
[really-safe-money-gen] include genvalidity-vector-1.0.0.0-6KKiduowklk7hSxSW05Gxi
97.45 s
[really-safe-money-gen] include really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
97.45 s
[really-safe-money-gen] include really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A
97.45 s
[really-safe-money-gen] include sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7
97.45 s
[really-safe-money-gen] include vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a
97.45 s
[really-safe-money-gen] Ready component graph:
97.45 s
[really-safe-money-gen] definite really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A
97.45 s
[really-safe-money-gen] depends QuickCheck-2.15.0.1-8fVC1qSJKj9H9pvMjJXUwU
97.45 s
[really-safe-money-gen] depends base-4.20.2.0-64da
97.45 s
[really-safe-money-gen] depends genvalidity-1.1.1.0-KJOcA1wEUno9vXRiVdno1L
97.45 s
[really-safe-money-gen] depends genvalidity-containers-1.0.0.2-DXaOCEBh8iJ1c8u2LwVlK1
97.45 s
[really-safe-money-gen] depends really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
97.45 s
[really-safe-money-gen] definite really-safe-money-gen-0.0.0.0-Ls5GL9RPudG7f67os7F74b-really-safe-money-test
97.45 s
[really-safe-money-gen] depends base-4.20.2.0-64da
97.45 s
[really-safe-money-gen] depends containers-0.7-504a
97.45 s
[really-safe-money-gen] depends genvalidity-sydtest-1.0.1.0-4MUjvMP5f0h4Td7V6rG94v
97.45 s
[really-safe-money-gen] depends genvalidity-vector-1.0.0.0-6KKiduowklk7hSxSW05Gxi
97.45 s
[really-safe-money-gen] depends really-safe-money-0.0.0.0-KH9ltLBvnn0Cn1rgifGPh9
97.46 s
[really-safe-money-gen] depends really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A
97.46 s
[really-safe-money-gen] depends sydtest-0.23.0.2-2pBpKNR1Siz5MducBHcrJ7
97.46 s
[really-safe-money-gen] depends vector-0.13.2.0-GDUCoiHhVuq2SKPTzzTr3a
97.46 s
[really-safe-money-gen] Using Cabal-3.12.1.0 compiled by ghc-9.10
97.46 s
[really-safe-money-gen] Using compiler: ghc-9.10.3
97.46 s
[really-safe-money-gen] Using install prefix:
97.46 s
[really-safe-money-gen] /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0
97.46 s
[really-safe-money-gen] Executables installed in:
97.46 s
[really-safe-money-gen] /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/bin
97.46 s
[really-safe-money-gen] Libraries installed in:
97.46 s
[really-safe-money-gen] /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A
97.46 s
[really-safe-money-gen] Dynamic Libraries installed in:
97.46 s
[really-safe-money-gen] /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6
97.46 s
[really-safe-money-gen] Private executables installed in:
97.46 s
[really-safe-money-gen] /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/libexec/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-gen-0.0.0.0
97.46 s
[really-safe-money-gen] Data files installed in:
97.46 s
[really-safe-money-gen] /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/share/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-gen-0.0.0.0
97.46 s
[really-safe-money-gen] Documentation installed in:
97.46 s
[really-safe-money-gen] /nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc/share/doc/really-safe-money-gen-0.0.0.0
97.46 s
[really-safe-money-gen] Configuration files installed in:
97.46 s
[really-safe-money-gen] /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/etc
97.46 s
[really-safe-money-gen] No alex found
97.46 s
[really-safe-money-gen] Using ar found on system at:
97.46 s
[really-safe-money-gen] /nix/store/iz5lckcsg66r223si2gck7csk2hihj0m-binutils-wrapper-2.44/bin/ar
97.46 s
[really-safe-money-gen] No c2hs found
97.46 s
[really-safe-money-gen] No cpphs found
97.46 s
[really-safe-money-gen] No doctest found
97.46 s
[really-safe-money-gen] Using gcc version 14.3.0 given by user at:
97.46 s
[really-safe-money-gen] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/gcc
97.46 s
[really-safe-money-gen] Using ghc version 9.10.3 found on system at:
97.46 s
[really-safe-money-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc
97.46 s
[really-safe-money-gen] Using ghc-pkg version 9.10.3 found on system at:
97.46 s
[really-safe-money-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/ghc-pkg-9.10.3
97.46 s
[really-safe-money-gen] No ghcjs found
97.46 s
[really-safe-money-gen] No ghcjs-pkg found
97.46 s
[really-safe-money-gen] No greencard found
97.46 s
[really-safe-money-gen] Using haddock version 2.31.1 found on system at:
97.46 s
[really-safe-money-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/haddock-ghc-9.10.3
97.46 s
[really-safe-money-gen] No happy found
97.46 s
[really-safe-money-gen] Using haskell-suite found on system at: haskell-suite-dummy-location
97.46 s
[really-safe-money-gen] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
97.46 s
[really-safe-money-gen] No hmake found
97.46 s
[really-safe-money-gen] Using hpc version 0.69 found on system at:
97.46 s
[really-safe-money-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hpc-ghc-9.10.3
97.46 s
[really-safe-money-gen] Using hsc2hs version 0.68.10 found on system at:
97.46 s
[really-safe-money-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/hsc2hs-ghc-9.10.3
97.46 s
[really-safe-money-gen] Using hscolour version 1.25 found on system at:
97.46 s
[really-safe-money-gen] /nix/store/f755skyzf4jvfx3crwq9mmh3x4lsaz8i-hscolour-1.25/bin/HsColour
97.46 s
[really-safe-money-gen] No jhc found
97.46 s
[really-safe-money-gen] Using ld found on system at:
97.46 s
[really-safe-money-gen] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/ld
97.46 s
[really-safe-money-gen] No pkg-config found
97.46 s
[really-safe-money-gen] Using runghc version 9.10.3 found on system at:
97.46 s
[really-safe-money-gen] /nix/store/s9jd43rkwc2syl9cvgj6f786avy8bgzy-ghc-9.10.3/bin/runghc-9.10.3
97.46 s
[really-safe-money-gen] Using strip version 2.44 found on system at:
97.46 s
[really-safe-money-gen] /nix/store/8v97ngkcpfzgghwnnr7fsz33p2x22gy9-gcc-wrapper-14.3.0/bin/strip
97.46 s
[really-safe-money-gen] Using tar found on system at:
97.46 s
[really-safe-money-gen] /nix/store/xl6pd2spjajwcpq09fnmnjv5psqmlmma-gnutar-1.35/bin/tar
97.46 s
[really-safe-money-gen] No uhc found
97.85 s
[really-safe-money-gen] Phase: buildPhase
97.91 s
[really-safe-money-gen] Preprocessing library for really-safe-money-gen-0.0.0.0...
97.91 s
[really-safe-money-gen] Building library for really-safe-money-gen-0.0.0.0...
98.00 s
[really-safe-money-gen] [ 1 of 13] Compiling Money.Amount.Gen ( src/Money/Amount/Gen.hs, dist/build/Money/Amount/Gen.o, dist/build/Money/Amount/Gen.dyn_o )
98.32 s
[really-safe-money-gen] [ 2 of 13] Compiling Money.Account.Gen ( src/Money/Account/Gen.hs, dist/build/Money/Account/Gen.o, dist/build/Money/Account/Gen.dyn_o )
98.41 s
[really-safe-money-gen] [ 3 of 13] Compiling Money.AccountOf.Gen ( src/Money/AccountOf/Gen.hs, dist/build/Money/AccountOf/Gen.o, dist/build/Money/AccountOf/Gen.dyn_o )
98.46 s
[really-safe-money-gen] [ 4 of 13] Compiling Money.AmountOf.Gen ( src/Money/AmountOf/Gen.hs, dist/build/Money/AmountOf/Gen.o, dist/build/Money/AmountOf/Gen.dyn_o )
98.46 s
[really-safe-money-gen] [ 5 of 13] Compiling Money.ConversionRate.Gen ( src/Money/ConversionRate/Gen.hs, dist/build/Money/ConversionRate/Gen.o, dist/build/Money/ConversionRate/Gen.dyn_o )
98.46 s
[really-safe-money-gen] [ 6 of 13] Compiling Money.ConversionRateOf.Gen ( src/Money/ConversionRateOf/Gen.hs, dist/build/Money/ConversionRateOf/Gen.o, dist/build/Money/ConversionRateOf/Gen.dyn_o )
98.46 s
[really-safe-money-gen] [ 7 of 13] Compiling Money.QuantisationFactor.Gen ( src/Money/QuantisationFactor/Gen.hs, dist/build/Money/QuantisationFactor/Gen.o, dist/build/Money/QuantisationFactor/Gen.dyn_o )
98.46 s
[really-safe-money-gen] [ 8 of 13] Compiling Money.Currency.Gen ( src/Money/Currency/Gen.hs, dist/build/Money/Currency/Gen.o, dist/build/Money/Currency/Gen.dyn_o )
98.46 s
[really-safe-money-gen] [ 9 of 13] Compiling Money.MultiAmount.Gen ( src/Money/MultiAmount/Gen.hs, dist/build/Money/MultiAmount/Gen.o, dist/build/Money/MultiAmount/Gen.dyn_o )
98.46 s
[really-safe-money-gen] [10 of 13] Compiling Money.MultiAccount.Gen ( src/Money/MultiAccount/Gen.hs, dist/build/Money/MultiAccount/Gen.o, dist/build/Money/MultiAccount/Gen.dyn_o )
98.51 s
[really-safe-money-gen] [11 of 13] Compiling Money.Gen ( src/Money/Gen.hs, dist/build/Money/Gen.o, dist/build/Money/Gen.dyn_o )
98.53 s
[really-safe-money-gen] [12 of 13] Compiling Numeric.DecimalLiteral.Gen ( src/Numeric/DecimalLiteral/Gen.hs, dist/build/Numeric/DecimalLiteral/Gen.o, dist/build/Numeric/DecimalLiteral/Gen.dyn_o )
98.53 s
[really-safe-money-gen] [13 of 13] Compiling Paths_really_safe_money_gen ( dist/build/autogen/Paths_really_safe_money_gen.hs, dist/build/Paths_really_safe_money_gen.o, dist/build/Paths_really_safe_money_gen.dyn_o )
98.74 s
[really-safe-money-gen] [ 1 of 13] Compiling Money.Amount.Gen ( src/Money/Amount/Gen.hs, dist/build/Money/Amount/Gen.p_o )
99.12 s
[really-safe-money-gen] [ 2 of 13] Compiling Money.Account.Gen ( src/Money/Account/Gen.hs, dist/build/Money/Account/Gen.p_o )
99.30 s
[really-safe-money-gen] [ 3 of 13] Compiling Money.AccountOf.Gen ( src/Money/AccountOf/Gen.hs, dist/build/Money/AccountOf/Gen.p_o )
99.43 s
[really-safe-money-gen] [ 4 of 13] Compiling Money.AmountOf.Gen ( src/Money/AmountOf/Gen.hs, dist/build/Money/AmountOf/Gen.p_o )
99.43 s
[really-safe-money-gen] [ 5 of 13] Compiling Money.ConversionRate.Gen ( src/Money/ConversionRate/Gen.hs, dist/build/Money/ConversionRate/Gen.p_o )
99.43 s
[really-safe-money-gen] [ 6 of 13] Compiling Money.ConversionRateOf.Gen ( src/Money/ConversionRateOf/Gen.hs, dist/build/Money/ConversionRateOf/Gen.p_o )
99.43 s
[really-safe-money-gen] [ 7 of 13] Compiling Money.QuantisationFactor.Gen ( src/Money/QuantisationFactor/Gen.hs, dist/build/Money/QuantisationFactor/Gen.p_o )
99.43 s
[really-safe-money-gen] [ 8 of 13] Compiling Money.Currency.Gen ( src/Money/Currency/Gen.hs, dist/build/Money/Currency/Gen.p_o )
99.43 s
[really-safe-money-gen] [ 9 of 13] Compiling Money.MultiAmount.Gen ( src/Money/MultiAmount/Gen.hs, dist/build/Money/MultiAmount/Gen.p_o )
99.43 s
[really-safe-money-gen] [10 of 13] Compiling Money.MultiAccount.Gen ( src/Money/MultiAccount/Gen.hs, dist/build/Money/MultiAccount/Gen.p_o )
99.46 s
[really-safe-money-gen] [11 of 13] Compiling Money.Gen ( src/Money/Gen.hs, dist/build/Money/Gen.p_o )
99.58 s
[really-safe-money-gen] [12 of 13] Compiling Numeric.DecimalLiteral.Gen ( src/Numeric/DecimalLiteral/Gen.hs, dist/build/Numeric/DecimalLiteral/Gen.p_o )
99.58 s
[really-safe-money-gen] [13 of 13] Compiling Paths_really_safe_money_gen ( dist/build/autogen/Paths_really_safe_money_gen.hs, dist/build/Paths_really_safe_money_gen.p_o )
101.62 s
[really-safe-money-gen] Preprocessing test suite 'really-safe-money-test' for really-safe-money-gen-0.0.0.0...
101.65 s
[really-safe-money-gen] Building test suite 'really-safe-money-test' for really-safe-money-gen-0.0.0.0...
102.55 s
[really-safe-money-gen] [ 1 of 14] Compiling Money.AccountSpec ( test/Money/AccountSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/AccountSpec.o )
107.86 s
[really-safe-money-gen] [ 2 of 14] Compiling Money.AmountSpec ( test/Money/AmountSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/AmountSpec.o )
108.14 s
[really-safe-money-gen] [ 3 of 14] Compiling Money.ConversionRateSpec ( test/Money/ConversionRateSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/ConversionRateSpec.o )
108.14 s
[really-safe-money-gen] [ 4 of 14] Compiling Money.Currency.TestUtils ( test/Money/Currency/TestUtils.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/Currency/TestUtils.o )
108.14 s
[really-safe-money-gen] [ 5 of 14] Compiling Money.ConversionRateOfSpec ( test/Money/ConversionRateOfSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/ConversionRateOfSpec.o )
108.14 s
[really-safe-money-gen] [ 6 of 14] Compiling Money.AmountOfSpec ( test/Money/AmountOfSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/AmountOfSpec.o )
108.14 s
[really-safe-money-gen] [ 7 of 14] Compiling Money.AccountOfSpec ( test/Money/AccountOfSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/AccountOfSpec.o )
108.14 s
[really-safe-money-gen] [ 8 of 14] Compiling Money.CurrencySpec ( test/Money/CurrencySpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/CurrencySpec.o )
108.14 s
[really-safe-money-gen] [ 9 of 14] Compiling Money.MultiAccountSpec ( test/Money/MultiAccountSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/MultiAccountSpec.o )
108.14 s
[really-safe-money-gen] [10 of 14] Compiling Money.MultiAmountSpec ( test/Money/MultiAmountSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/MultiAmountSpec.o )
108.14 s
[really-safe-money-gen] [11 of 14] Compiling Money.QuantisationFactorSpec ( test/Money/QuantisationFactorSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Money/QuantisationFactorSpec.o )
108.14 s
[really-safe-money-gen] [12 of 14] Compiling Numeric.DecimalLiteralSpec ( test/Numeric/DecimalLiteralSpec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Numeric/DecimalLiteralSpec.o )
108.14 s
[really-safe-money-gen] [13 of 14] Compiling Main ( test/Spec.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Main.o )
108.20 s
[really-safe-money-gen] [14 of 14] Compiling Paths_really_safe_money_gen ( dist/build/really-safe-money-test/autogen/Paths_really_safe_money_gen.hs, dist/build/really-safe-money-test/really-safe-money-test-tmp/Paths_really_safe_money_gen.o )
108.54 s
[really-safe-money-gen] [15 of 15] Linking dist/build/really-safe-money-test/really-safe-money-test
109.93 s
[really-safe-money-gen] Phase: checkPhase
109.93 s
[really-safe-money-gen] mutation-nix: collecting coverage for suite really-safe-money-gen
118.36 s
[really-safe-money-gen] coverage (3/1610): Numeric\.DecimalLiteralSpec.Natural.toNatural.renders to valid naturals (0 mutations)
118.52 s
[really-safe-money-gen] coverage (22/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 9 % 100 into DecimalLiteral Nothing 9 2 (36 mutations)
118.76 s
[really-safe-money-gen] coverage (7/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational (-6) % 1 into DecimalLiteral (Just False) 6 0 (32 mutations)
119.00 s
[really-safe-money-gen] coverage (15/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral (Just False) 600 2 into rational (-6) % 1 (4 mutations)
119.02 s
[really-safe-money-gen] coverage (1/1610): Numeric\.DecimalLiteralSpec.Natural.fromNatural.renders to valid decimal literals (1 mutations)
119.15 s
[really-safe-money-gen] coverage (17/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 20 4 into rational 1 % 500 (4 mutations)
119.32 s
[really-safe-money-gen] coverage (5/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 400 % 1 into DecimalLiteral Nothing 400 0 (30 mutations)
119.34 s
[really-safe-money-gen] coverage (27/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 240009 % 20000 into DecimalLiteral Nothing 1200045 5 (38 mutations)
119.36 s
[really-safe-money-gen] coverage (13/1610): Numeric\.DecimalLiteralSpec.Rational.fromRational.can parse any rendered rational (43 mutations)
119.44 s
[really-safe-money-gen] coverage (8/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 10 0 into rational 10 % 1 (4 mutations)
119.46 s
[really-safe-money-gen] coverage (25/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 7 % 1 into DecimalLiteral Nothing 7 0 (30 mutations)
119.48 s
[really-safe-money-gen] coverage (23/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral (Just False) 3 0 into rational (-3) % 1 (4 mutations)
119.48 s
[really-safe-money-gen] coverage (10/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational (-1) % 1000 into DecimalLiteral (Just False) 1 3 (38 mutations)
119.53 s
[really-safe-money-gen] coverage (6/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 1 % 500 into DecimalLiteral Nothing 2 3 (36 mutations)
119.53 s
[really-safe-money-gen] coverage (12/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 5 % 1 into DecimalLiteral Nothing 5 0 (30 mutations)
119.58 s
[really-safe-money-gen] coverage (24/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 1 % 1 into DecimalLiteral Nothing 1 0 (30 mutations)
119.59 s
[really-safe-money-gen] coverage (18/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 10 % 1 into DecimalLiteral Nothing 10 0 (30 mutations)
119.60 s
[really-safe-money-gen] coverage (26/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 1 0 into rational 1 % 1 (4 mutations)
119.73 s
[really-safe-money-gen] coverage (2/1610): Numeric\.DecimalLiteralSpec.Natural.fromNatural.can parse any rendered literal (9 mutations)
119.74 s
[really-safe-money-gen] coverage (4/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 9 2 into rational 9 % 100 (4 mutations)
119.78 s
[really-safe-money-gen] coverage (20/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 7000 3 into rational 7 % 1 (4 mutations)
119.80 s
[really-safe-money-gen] coverage (14/1610): Numeric\.DecimalLiteralSpec.Rational.fromRational.renders to valid decimal literals (40 mutations)
119.83 s
[really-safe-money-gen] coverage (9/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 50 1 into rational 5 % 1 (4 mutations)
119.87 s
[really-safe-money-gen] coverage (21/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 2 0 into rational 2 % 1 (4 mutations)
119.91 s
[really-safe-money-gen] coverage (19/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational (-3) % 1 into DecimalLiteral (Just False) 3 0 (32 mutations)
119.92 s
[really-safe-money-gen] coverage (28/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral (Just False) 1 3 into rational (-1) % 1000 (4 mutations)
119.93 s
[really-safe-money-gen] coverage (11/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational (-4) % 5 into DecimalLiteral (Just False) 8 1 (38 mutations)
120.21 s
[really-safe-money-gen] coverage (16/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 400 0 into rational 400 % 1 (4 mutations)
128.26 s
[really-safe-money-gen] coverage (29/1610): Numeric\.DecimalLiteralSpec.Rational.toRational.renders to valid rationals (4 mutations)
128.42 s
[really-safe-money-gen] coverage (38/1610): Numeric\.DecimalLiteralSpec.setMinimumDigits.does not change the value of the literal (15 mutations)
128.52 s
[really-safe-money-gen] coverage (31/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational 2 % 1 into DecimalLiteral Nothing 2 0 (30 mutations)
128.81 s
[really-safe-money-gen] coverage (30/1610): Numeric\.DecimalLiteralSpec.Rational.can turn rational (-3) % 1000 into DecimalLiteral (Just False) 3 3 (38 mutations)
128.91 s
[really-safe-money-gen] coverage (37/1610): Numeric\.DecimalLiteralSpec.Ratio.toRatio.renders to valid rationals (5 mutations)
128.98 s
[really-safe-money-gen] coverage (33/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral (Just False) 8 1 into rational (-4) % 5 (4 mutations)
129.06 s
[really-safe-money-gen] coverage (32/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral Nothing 1200045 5 into rational 240009 % 20000 (4 mutations)
129.10 s
[really-safe-money-gen] coverage (46/1610): Numeric\.DecimalLiteralSpec.Int.fromInt.can parse any rendered literal (24 mutations)
129.38 s
[really-safe-money-gen] coverage (34/1610): Numeric\.DecimalLiteralSpec.Rational.can turn DecimalLiteral (Just False) 300 5 into rational (-3) % 1000 (4 mutations)
129.40 s
[really-safe-money-gen] coverage (47/1610): Numeric\.DecimalLiteralSpec.Int.fromInt.renders to valid decimal literals (10 mutations)
129.40 s
[really-safe-money-gen] coverage (41/1610): Numeric\.DecimalLiteralSpec.GenValid DecimalLiteral.genValid \:\: Gen DecimalLiteral.only generates valid 'DecimalLiteral's (0 mutations)
129.45 s
[really-safe-money-gen] coverage (43/1610): Numeric\.DecimalLiteralSpec.DecimalLiteral\.fromString.can parse any rendered decimal literal (44 mutations)
129.55 s
[really-safe-money-gen] coverage (42/1610): Numeric\.DecimalLiteralSpec.DecimalLiteral\.fromString.fails to parse scientific notation (22 mutations)
129.61 s
[really-safe-money-gen] coverage (48/1610): Numeric\.DecimalLiteralSpec.DecimalLiteral\.fromStringM.does the same as DecimalLiteral\.fromString (12 mutations)
129.62 s
[really-safe-money-gen] coverage (35/1610): Numeric\.DecimalLiteralSpec.Ratio.fromRatio.can parse any rendered rational (36 mutations)
129.62 s
[really-safe-money-gen] coverage (45/1610): Numeric\.DecimalLiteralSpec.Int.toInt.renders to valid words (14 mutations)
129.64 s
[really-safe-money-gen] coverage (39/1610): Numeric\.DecimalLiteralSpec.setMinimumDigits.produces valid literals (12 mutations)
129.74 s
[really-safe-money-gen] coverage (40/1610): Numeric\.DecimalLiteralSpec.setMinimumDigits.produces values with more than the given number of digits (12 mutations)
129.74 s
[really-safe-money-gen] coverage (44/1610): Numeric\.DecimalLiteralSpec.setSignOptional.produces valid values (0 mutations)
129.82 s
[really-safe-money-gen] coverage (49/1610): Numeric\.DecimalLiteralSpec.Word.fromWord.renders to valid decimal literals (1 mutations)
130.00 s
[really-safe-money-gen] coverage (51/1610): Numeric\.DecimalLiteralSpec.Word.toWord.renders to valid words (0 mutations)
130.01 s
[really-safe-money-gen] coverage (50/1610): Numeric\.DecimalLiteralSpec.Word.fromWord.can parse any rendered literal (9 mutations)
130.04 s
[really-safe-money-gen] coverage (55/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 300 5 (3 mutations)
130.08 s
[really-safe-money-gen] coverage (36/1610): Numeric\.DecimalLiteralSpec.Ratio.fromRatio.renders to valid decimal literals (31 mutations)
130.10 s
[really-safe-money-gen] coverage (52/1610): Numeric\.DecimalLiteralSpec.toString.can render any decimal literal (2 mutations)
130.17 s
[really-safe-money-gen] coverage (54/1610): Numeric\.DecimalLiteralSpec.examples.can parse "1" (22 mutations)
130.37 s
[really-safe-money-gen] coverage (53/1610): Numeric\.DecimalLiteralSpec.examples.can parse "+2" (25 mutations)
130.58 s
[really-safe-money-gen] coverage (56/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 50 1 (1 mutations)
138.10 s
[really-safe-money-gen] coverage (58/1610): Numeric\.DecimalLiteralSpec.examples.can parse "5\.0" (31 mutations)
138.12 s
[really-safe-money-gen] coverage (57/1610): Numeric\.DecimalLiteralSpec.examples.can parse "400" (31 mutations)
138.42 s
[really-safe-money-gen] coverage (59/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 8 1 (3 mutations)
138.61 s
[really-safe-money-gen] coverage (60/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 1 3 (3 mutations)
138.70 s
[really-safe-money-gen] coverage (62/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 7000 3 (1 mutations)
138.78 s
[really-safe-money-gen] coverage (64/1610): Numeric\.DecimalLiteralSpec.examples.can parse "12\.00045" (38 mutations)
138.81 s
[really-safe-money-gen] coverage (61/1610): Numeric\.DecimalLiteralSpec.examples.can parse "0\.00300" (36 mutations)
138.98 s
[really-safe-money-gen] coverage (68/1610): Numeric\.DecimalLiteralSpec.examples.can parse "0\.001" (34 mutations)
139.09 s
[really-safe-money-gen] coverage (63/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 20 4 (3 mutations)
139.12 s
[really-safe-money-gen] coverage (65/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 1 0 (1 mutations)
139.23 s
[really-safe-money-gen] coverage (67/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 1200045 5 (1 mutations)
139.24 s
[really-safe-money-gen] coverage (66/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral (Just True) 2 0 (1 mutations)
139.36 s
[really-safe-money-gen] coverage (72/1610): Numeric\.DecimalLiteralSpec.examples.can parse "0\.8" (29 mutations)
139.42 s
[really-safe-money-gen] coverage (70/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 600 2 (1 mutations)
139.45 s
[really-safe-money-gen] coverage (69/1610): Numeric\.DecimalLiteralSpec.examples.can parse "6\.00" (36 mutations)
139.52 s
[really-safe-money-gen] coverage (74/1610): Numeric\.DecimalLiteralSpec.examples.can parse "0\.09" (34 mutations)
139.54 s
[really-safe-money-gen] coverage (71/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 9 2 (3 mutations)
139.65 s
[really-safe-money-gen] coverage (73/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral Nothing 400 0 (1 mutations)
139.71 s
[really-safe-money-gen] coverage (76/1610): Numeric\.DecimalLiteralSpec.examples.can parse "-3" (22 mutations)
139.73 s
[really-safe-money-gen] coverage (75/1610): Numeric\.DecimalLiteralSpec.examples.can parse "7\.000" (36 mutations)
139.84 s
[really-safe-money-gen] coverage (78/1610): Numeric\.DecimalLiteralSpec.examples.can parse "0\.0020" (36 mutations)
139.92 s
[really-safe-money-gen] coverage (82/1610): Numeric\.DecimalLiteralSpec.digits.produces valid numbers of digits (0 mutations)
139.93 s
[really-safe-money-gen] coverage (79/1610): Numeric\.DecimalLiteralSpec.Integer.toInteger.renders to valid words (0 mutations)
140.00 s
[really-safe-money-gen] coverage (77/1610): Numeric\.DecimalLiteralSpec.examples.can render DecimalLiteral (Just False) 3 0 (1 mutations)
140.02 s
[really-safe-money-gen] coverage (81/1610): Numeric\.DecimalLiteralSpec.Integer.fromInteger.can parse any rendered literal (10 mutations)
140.04 s
[really-safe-money-gen] coverage (80/1610): Numeric\.DecimalLiteralSpec.Integer.fromInteger.renders to valid decimal literals (10 mutations)
140.15 s
[really-safe-money-gen] coverage (83/1610): Numeric\.DecimalLiteralSpec.setSignRequired.produces valid values (2 mutations)
140.59 s
[really-safe-money-gen] coverage (84/1610): Money\.ConversionRateSpec.Rational.toRational.produces valid rationals (0 mutations)
148.57 s
[really-safe-money-gen] coverage (86/1610): Money\.ConversionRateSpec.Rational.fromRational.produces valid conversion rates (13 mutations)
148.76 s
[really-safe-money-gen] coverage (85/1610): Money\.ConversionRateSpec.Rational.fromRational.roundtrips with toRational (13 mutations)
149.09 s
[really-safe-money-gen] coverage (89/1610): Money\.ConversionRateSpec.Ratio.toRatio.produces valid ratios (0 mutations)
149.16 s
[really-safe-money-gen] coverage (87/1610): Money\.ConversionRateSpec.Ratio.fromRatio.produces valid conversion rates (6 mutations)
149.16 s
[really-safe-money-gen] coverage (88/1610): Money\.ConversionRateSpec.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
149.43 s
[really-safe-money-gen] coverage (95/1610): Money\.ConversionRateSpec.GenValid ConversionRate.genValid \:\: Gen ConversionRate.only generates valid 'ConversionRate's (6 mutations)
149.46 s
[really-safe-money-gen] coverage (90/1610): Money\.ConversionRateSpec.invert.produces valid rates (8 mutations)
149.82 s
[really-safe-money-gen] coverage (103/1610): Money\.AccountSpec.Eq.says negative 0 equals positive 0 (3 mutations)
149.86 s
[really-safe-money-gen] coverage (98/1610): Money\.AccountSpec.Eq.Eq Account.(/=) \:\: Account -> Account -> Bool.is antireflexive for "valid Account"s (3 mutations)
149.95 s
[really-safe-money-gen] coverage (97/1610): Money\.AccountSpec.Eq.Eq Account.(/=) \:\: Account -> Account -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid Account"s (3 mutations)
149.97 s
[really-safe-money-gen] coverage (109/1610): Money\.AccountSpec.distribute.correctly distributes 5 into 3 (20 mutations)
150.02 s
[really-safe-money-gen] coverage (102/1610): Money\.AccountSpec.Eq.Eq Account.(==) \:\: Account -> Account -> Bool.is reflexive for "valid Account"s (3 mutations)
150.08 s
[really-safe-money-gen] coverage (101/1610): Money\.AccountSpec.Eq.Eq Account.(==) \:\: Account -> Account -> Bool.is symmetric for "valid Account"s (3 mutations)
150.20 s
[really-safe-money-gen] coverage (92/1610): Money\.ConversionRateSpec.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
150.21 s
[really-safe-money-gen] coverage (96/1610): Money\.AccountSpec.Show Account and Read Account.are implemented such that read \. show == id for valid values (3 mutations)
150.24 s
[really-safe-money-gen] coverage (104/1610): Money\.AccountSpec.negate.produces valid amounts (1 mutations)
150.29 s
[really-safe-money-gen] coverage (108/1610): Money\.AccountSpec.convert.converts this USD to CHF correctly (26 mutations)
150.32 s
[really-safe-money-gen] coverage (94/1610): Money\.ConversionRateSpec.compose.produces valid rates (8 mutations)
150.38 s
[really-safe-money-gen] coverage (110/1610): Money\.AccountSpec.distribute.correctly distributes 3 into 3 (18 mutations)
150.39 s
[really-safe-money-gen] coverage (99/1610): Money\.AccountSpec.Eq.Eq Account.(==) \:\: Account -> Account -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid Account"s (3 mutations)
150.56 s
[really-safe-money-gen] coverage (111/1610): Money\.AccountSpec.distribute.Eq (Distribution Account).(==) \:\: (Distribution Account) -> (Distribution Account) -> Bool.is symmetric for "valid (Distribution Account)"s (3 mutations)
150.67 s
[really-safe-money-gen] coverage (106/1610): Money\.AccountSpec.convert.succeeds in converting 1\:1 without rounding if the quantisation factor is the same (29 mutations)
150.69 s
[really-safe-money-gen] coverage (100/1610): Money\.AccountSpec.Eq.Eq Account.(==) \:\: Account -> Account -> Bool.is transitive for "valid Account"s (3 mutations)
151.14 s
[really-safe-money-gen] coverage (112/1610): Money\.AccountSpec.distribute.Eq (Distribution Account).(==) \:\: (Distribution Account) -> (Distribution Account) -> Bool.is transitive for "valid (Distribution Account)"s (3 mutations)
151.14 s
[really-safe-money-gen] coverage (105/1610): Money\.AccountSpec.format.produces valid strings (6 mutations)
151.68 s
[really-safe-money-gen] coverage (107/1610): Money\.AccountSpec.convert.produces valid amounts (27 mutations)
158.28 s
[really-safe-money-gen] coverage (113/1610): Money\.AccountSpec.distribute.Eq (Distribution Account).(==) \:\: (Distribution Account) -> (Distribution Account) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution Account)"s (3 mutations)
158.32 s
[really-safe-money-gen] coverage (114/1610): Money\.AccountSpec.distribute.Eq (Distribution Account).(==) \:\: (Distribution Account) -> (Distribution Account) -> Bool.is reflexive for "valid (Distribution Account)"s (3 mutations)
158.35 s
[really-safe-money-gen] coverage (115/1610): Money\.AccountSpec.distribute.Eq (Distribution Account).(/=) \:\: (Distribution Account) -> (Distribution Account) -> Bool.is antireflexive for "valid (Distribution Account)"s (3 mutations)
158.44 s
[really-safe-money-gen] coverage (116/1610): Money\.AccountSpec.distribute.Eq (Distribution Account).(/=) \:\: (Distribution Account) -> (Distribution Account) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution Account)"s (3 mutations)
158.59 s
[really-safe-money-gen] coverage (118/1610): Money\.AccountSpec.distribute.correctly distributes 10 into 4 (20 mutations)
159.01 s
[really-safe-money-gen] coverage (120/1610): Money\.AccountSpec.distribute.produces valid amounts (36 mutations)
159.23 s
[really-safe-money-gen] coverage (122/1610): Money\.AccountSpec.fromAmount.produces valid accounts (1 mutations)
159.24 s
[really-safe-money-gen] coverage (121/1610): Money\.AccountSpec.abs.produces valid amounts (1 mutations)
159.43 s
[really-safe-money-gen] coverage (128/1610): Money\.AccountSpec.fromMinimalQuantisations.produces valid accounts (14 mutations)
159.48 s
[really-safe-money-gen] coverage (131/1610): Money\.AccountSpec.rate.computes this USD to CHF rate correctly (14 mutations)
159.49 s
[really-safe-money-gen] coverage (135/1610): Money\.AccountSpec.Ord.says 4 is smaller than 5 (2 mutations)
159.51 s
[really-safe-money-gen] coverage (117/1610): Money\.AccountSpec.distribute.produces results that sum up to the greater whole (66 mutations)
159.61 s
[really-safe-money-gen] coverage (127/1610): Money\.AccountSpec.fromMinimalQuantisations.roundtrips with toMinimalQuantisations (16 mutations)
159.61 s
[really-safe-money-gen] coverage (126/1610): Money\.AccountSpec.fromRatio.roundtrips with toRatio (22 mutations)
159.69 s
[really-safe-money-gen] coverage (124/1610): Money\.AccountSpec.fromRational.produces valid rational (27 mutations)
159.70 s
[really-safe-money-gen] coverage (134/1610): Money\.AccountSpec.Ord.says -6 is greater than -7 (2 mutations)
159.79 s
[really-safe-money-gen] coverage (125/1610): Money\.AccountSpec.fromRatio.produces valid rational (20 mutations)
159.86 s
[really-safe-money-gen] coverage (132/1610): Money\.AccountSpec.toDouble.produces valid Doubles when the quantisation factor is nonzero (3 mutations)
159.87 s
[really-safe-money-gen] coverage (133/1610): Money\.AccountSpec.toDouble.produces an infinite or NaN Double with quantisation factor 0 (3 mutations)
160.04 s
[really-safe-money-gen] coverage (130/1610): Money\.AccountSpec.rate.produces valid conversion rates (15 mutations)
160.05 s
[really-safe-money-gen] coverage (123/1610): Money\.AccountSpec.fromRational.roundtrips with toRational (31 mutations)
160.36 s
[really-safe-money-gen] coverage (119/1610): Money\.AccountSpec.distribute.Show (Distribution Account) and Read (Distribution Account).are implemented such that read \. show == id for valid values (3 mutations)
160.44 s
[really-safe-money-gen] coverage (136/1610): Money\.AccountSpec.Ord.says -3 is smaller than 2 (2 mutations)
160.69 s
[really-safe-money-gen] coverage (129/1610): Money\.AccountSpec.rate.computes a rate that can be used to do a conversion without rounding (35 mutations)
160.78 s
[really-safe-money-gen] coverage (137/1610): Money\.AccountSpec.Ord.Ord Account."max \:\: (Account -> Account -> Account)".is equivalent to (\\a b -> if a >= b then a else b) for "valid Account"'s (3 mutations)
161.05 s
[really-safe-money-gen] coverage (138/1610): Money\.AccountSpec.Ord.Ord Account."min \:\: (Account -> Account -> Account)".is equivalent to (\\a b -> if a <= b then a else b) for "valid Account"'s (3 mutations)
167.58 s
[really-safe-money-gen] coverage (141/1610): Money\.AccountSpec.Ord.Ord Account.(<=) \:\: Account -> Account -> Bool.is antisymmetric for "valid Account"'s (3 mutations)
167.64 s
[really-safe-money-gen] coverage (139/1610): Money\.AccountSpec.Ord.Ord Account.(<=) \:\: Account -> Account -> Bool.is transitive for "valid Account"'s (3 mutations)
167.67 s
[really-safe-money-gen] coverage (142/1610): Money\.AccountSpec.Ord.Ord Account.(<=) \:\: Account -> Account -> Bool.is reflexive for "valid Account"'s (3 mutations)
167.72 s
[really-safe-money-gen] coverage (140/1610): Money\.AccountSpec.Ord.Ord Account.(<=) \:\: Account -> Account -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid Account"'s (3 mutations)
167.97 s
[really-safe-money-gen] coverage (143/1610): Money\.AccountSpec.Ord.Ord Account.(>) \:\: Account -> Account -> Bool.is transitive for "valid Account"'s (3 mutations)
168.43 s
[really-safe-money-gen] coverage (144/1610): Money\.AccountSpec.Ord.Ord Account.(>) \:\: Account -> Account -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid Account"'s (3 mutations)
168.56 s
[really-safe-money-gen] coverage (145/1610): Money\.AccountSpec.Ord.Ord Account.(>) \:\: Account -> Account -> Bool.is antireflexive for "valid Account"'s (3 mutations)
168.66 s
[really-safe-money-gen] coverage (146/1610): Money\.AccountSpec.Ord.Ord Account.(<) \:\: Account -> Account -> Bool.is transitive for "valid Account"'s (3 mutations)
168.74 s
[really-safe-money-gen] coverage (149/1610): Money\.AccountSpec.Ord.Ord Account.(>=) \:\: Account -> Account -> Bool.is reflexive for "valid Account"'s (3 mutations)
168.77 s
[really-safe-money-gen] coverage (148/1610): Money\.AccountSpec.Ord.Ord Account.(<) \:\: Account -> Account -> Bool.is antireflexive for "valid Account"'s (3 mutations)
168.80 s
[really-safe-money-gen] coverage (156/1610): Money\.AccountSpec.sum.fails to sum above maxBound even if the result is back below maxBound (10 mutations)
168.84 s
[really-safe-money-gen] coverage (150/1610): Money\.AccountSpec.Ord.Ord Account.(>=) \:\: Account -> Account -> Bool.is antisymmetric for "valid Account"'s (3 mutations)
168.91 s
[really-safe-money-gen] coverage (153/1610): Money\.AccountSpec.toRatio.produces valid Ratios when the quantisation factor is nonzero (1 mutations)
168.92 s
[really-safe-money-gen] coverage (157/1610): Money\.AccountSpec.sum.fails to sum above maxBound (10 mutations)
168.93 s
[really-safe-money-gen] coverage (147/1610): Money\.AccountSpec.Ord.Ord Account.(<) \:\: Account -> Account -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid Account"'s (3 mutations)
169.06 s
[really-safe-money-gen] coverage (152/1610): Money\.AccountSpec.Ord.Ord Account.(>=) \:\: Account -> Account -> Bool.is transitive for "valid Account"'s (3 mutations)
169.26 s
[really-safe-money-gen] coverage (158/1610): Money\.AccountSpec.sum.correctly sums [1,2,3] to 6 (12 mutations)
169.42 s
[really-safe-money-gen] coverage (160/1610): Money\.AccountSpec.toMinimalQuantisations.produces valid accounts (3 mutations)
169.50 s
[really-safe-money-gen] coverage (154/1610): Money\.AccountSpec.fractionRatio.produces valid amounts (22 mutations)
169.52 s
[really-safe-money-gen] coverage (163/1610): Money\.AccountSpec.add.fails for minBound + minBound (8 mutations)
169.85 s
[really-safe-money-gen] coverage (164/1610): Money\.AccountSpec.add.produces valid amounts (27 mutations)
169.88 s
[really-safe-money-gen] coverage (161/1610): Money\.AccountSpec.add.is commutative (27 mutations)
170.07 s
[really-safe-money-gen] coverage (166/1610): Money\.AccountSpec.add.fails for maxBound + 1 (8 mutations)
170.10 s
[really-safe-money-gen] coverage (165/1610): Money\.AccountSpec.add.has a right-identity\: zero (28 mutations)
170.39 s
[really-safe-money-gen] coverage (155/1610): Money\.AccountSpec.sum.produces valid amounts (28 mutations)
170.72 s
[really-safe-money-gen] coverage (159/1610): Money\.AccountSpec.sum.matches what you would get with Integer, if nothing fails (28 mutations)
176.55 s
[really-safe-money-gen] coverage (162/1610): Money\.AccountSpec.add.fails for minBound + (-1) (8 mutations)
176.74 s
[really-safe-money-gen] coverage (167/1610): Money\.AccountSpec.add.fails for maxBound + maxBound (8 mutations)
176.98 s
[really-safe-money-gen] coverage (169/1610): Money\.AccountSpec.add.has a left-identity\: zero (28 mutations)
177.21 s
[really-safe-money-gen] coverage (170/1610): Money\.AccountSpec.add.matches what you would get with Integer, if nothing fails (27 mutations)
177.23 s
[really-safe-money-gen] coverage (168/1610): Money\.AccountSpec.add.is associative when both succeed (27 mutations)
177.51 s
[really-safe-money-gen] coverage (172/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 1 0 into decimalLiteral QuantisationFactor {unQuantisationFactor = 1} (32 mutations)
177.52 s
[really-safe-money-gen] coverage (173/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 500 8 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100000000} (32 mutations)
177.58 s
[really-safe-money-gen] coverage (171/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 3 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100} (32 mutations)
177.75 s
[really-safe-money-gen] coverage (176/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 100 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100} (32 mutations)
177.83 s
[really-safe-money-gen] coverage (175/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100} into DecimalLiteral (Just False) 200 2 (46 mutations)
177.85 s
[really-safe-money-gen] coverage (174/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100} into DecimalLiteral (Just False) 4 2 (46 mutations)
177.88 s
[really-safe-money-gen] coverage (178/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 20} into DecimalLiteral (Just False) 600 2 (46 mutations)
177.91 s
[really-safe-money-gen] coverage (180/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100} into DecimalLiteral (Just True) 3 2 (46 mutations)
177.96 s
[really-safe-money-gen] coverage (177/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 20} into DecimalLiteral (Just True) 500 2 (46 mutations)
178.05 s
[really-safe-money-gen] coverage (181/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 20} into DecimalLiteral (Just True) 10 2 (52 mutations)
178.06 s
[really-safe-money-gen] coverage (179/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 500 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 20} (32 mutations)
178.34 s
[really-safe-money-gen] coverage (182/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100} into DecimalLiteral (Just True) 100 2 (46 mutations)
178.41 s
[really-safe-money-gen] coverage (186/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just False) 4 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100} (32 mutations)
178.52 s
[really-safe-money-gen] coverage (185/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 1} into DecimalLiteral (Just True) 1 0 (40 mutations)
178.99 s
[really-safe-money-gen] coverage (188/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 20} into DecimalLiteral (Just False) 20 2 (52 mutations)
179.02 s
[really-safe-money-gen] coverage (189/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 1} into DecimalLiteral (Just False) 2 0 (40 mutations)
179.14 s
[really-safe-money-gen] coverage (190/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just False) 20 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 20} (32 mutations)
179.42 s
[really-safe-money-gen] coverage (191/1610): Money\.AccountSpec.DecimalLiteral.Account\.fromDecimalLiteral.fails on this amount that is too precise (17 mutations)
179.51 s
[really-safe-money-gen] coverage (192/1610): Money\.AccountSpec.DecimalLiteral.Account\.fromDecimalLiteral.produces valid factors (30 mutations)
180.18 s
[really-safe-money-gen] coverage (151/1610): Money\.AccountSpec.Ord.Ord Account.(>=) \:\: Account -> Account -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid Account"'s (3 mutations)
185.47 s
[really-safe-money-gen] coverage (187/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just False) 600 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 20} (32 mutations)
185.78 s
[really-safe-money-gen] coverage (195/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just False) 2 0 into decimalLiteral QuantisationFactor {unQuantisationFactor = 1} (32 mutations)
185.96 s
[really-safe-money-gen] coverage (197/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just False) 200 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100} (32 mutations)
186.18 s
[really-safe-money-gen] coverage (204/1610): Money\.AccountSpec.multiply.fails for 3 * minBound (8 mutations)
186.25 s
[really-safe-money-gen] coverage (193/1610): Money\.AccountSpec.DecimalLiteral.Account\.fromDecimalLiteral.fails on this amount that is too precise:1 (17 mutations)
186.25 s
[really-safe-money-gen] coverage (203/1610): Money\.AccountSpec.subtract.fails for maxBound - minBound (8 mutations)
186.27 s
[really-safe-money-gen] coverage (198/1610): Money\.AccountSpec.fromDouble.produces valid rational (38 mutations)
186.34 s
[really-safe-money-gen] coverage (201/1610): Money\.AccountSpec.subtract.fails for minBound - 1 (8 mutations)
186.50 s
[really-safe-money-gen] coverage (202/1610): Money\.AccountSpec.subtract.fails for minBound - maxBound (8 mutations)
186.60 s
[really-safe-money-gen] coverage (206/1610): Money\.AccountSpec.multiply.produces valid amounts (20 mutations)
186.62 s
[really-safe-money-gen] coverage (205/1610): Money\.AccountSpec.multiply.is absorbed by 0 (20 mutations)
186.65 s
[really-safe-money-gen] coverage (200/1610): Money\.AccountSpec.subtract.matches what you would get with Integer, if nothing fails (27 mutations)
186.89 s
[really-safe-money-gen] coverage (210/1610): Money\.AccountSpec.multiply.matches what you would get with Integer, if nothing fails (20 mutations)
186.90 s
[really-safe-money-gen] coverage (208/1610): Money\.AccountSpec.multiply.has an identity\: 1 (20 mutations)
187.03 s
[really-safe-money-gen] coverage (199/1610): Money\.AccountSpec.fromDouble.roundtrips with toDouble back to double (40 mutations)
187.07 s
[really-safe-money-gen] coverage (211/1610): Money\.AccountSpec.multiply.fails for 2 * maxbound (8 mutations)
187.14 s
[really-safe-money-gen] coverage (194/1610): Money\.AccountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100000000} into DecimalLiteral (Just True) 500 8 (52 mutations)
187.31 s
[really-safe-money-gen] coverage (196/1610): Money\.AccountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 10 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 20} (32 mutations)
187.43 s
[really-safe-money-gen] coverage (209/1610): Money\.AccountSpec.multiply.is distributive with add when both succeed (44 mutations)
187.63 s
[really-safe-money-gen] coverage (207/1610): Money\.AccountSpec.multiply.succeeds for 3 * 6 (19 mutations)
187.84 s
[really-safe-money-gen] coverage (213/1610): Money\.AccountSpec.fraction.Correctly fractions 101 with 1 % 100 (32 mutations)
188.21 s
[really-safe-money-gen] coverage (212/1610): Money\.AccountSpec.GenValid Account.genValid \:\: Gen Account.only generates valid 'Account's (1 mutations)
188.78 s
[really-safe-money-gen] coverage (216/1610): Money\.AccountSpec.fraction.Correctly fractions 100 with 1 % 100 (32 mutations)
189.05 s
[really-safe-money-gen] coverage (215/1610): Money\.AccountSpec.fraction.Produces a result that can be multiplied back (39 mutations)
194.23 s
[really-safe-money-gen] coverage (223/1610): Money\.MultiAmountSpec.zero.is valid (2 mutations)
194.39 s
[really-safe-money-gen] coverage (218/1610): Money\.AccountSpec.fraction.Produces a result that has been rounded in the right direction when using RoundUp (30 mutations)
194.44 s
[really-safe-money-gen] coverage (220/1610): Money\.AccountSpec.toRational.produces an invalid Rational with quantisation factor 0 (4 mutations)
194.45 s
[really-safe-money-gen] coverage (219/1610): Money\.AccountSpec.toRational.produces valid Rationals when the quantisation factor is nonzero (3 mutations)
194.68 s
[really-safe-money-gen] coverage (217/1610): Money\.AccountSpec.fraction.Produces a result that has been rounded in the right direction when using RoundDown (30 mutations)
194.72 s
[really-safe-money-gen] coverage (226/1610): Money\.MultiAmountSpec.Eq (MultiAmount Currency).(==) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is transitive for "valid (MultiAmount Currency)"s (1 mutations)
194.82 s
[really-safe-money-gen] coverage (225/1610): Money\.MultiAmountSpec.Eq (MultiAmount Currency).(/=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (MultiAmount Currency)"s (1 mutations)
194.84 s
[really-safe-money-gen] coverage (228/1610): Money\.MultiAmountSpec.Eq (MultiAmount Currency).(==) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (MultiAmount Currency)"s (1 mutations)
194.89 s
[really-safe-money-gen] coverage (229/1610): Money\.MultiAmountSpec.Eq (MultiAmount Currency).(==) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is reflexive for "valid (MultiAmount Currency)"s (2 mutations)
194.89 s
[really-safe-money-gen] coverage (224/1610): Money\.MultiAmountSpec.Eq (MultiAmount Currency).(/=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is antireflexive for "valid (MultiAmount Currency)"s (2 mutations)
194.90 s
[really-safe-money-gen] coverage (222/1610): Money\.MultiAmountSpec.Show (MultiAmount Currency) and Read (MultiAmount Currency).are implemented such that read \. show == id for valid values (2 mutations)
195.03 s
[really-safe-money-gen] coverage (221/1610): Money\.MultiAmountSpec.fromAmount.produces valid amounts (15 mutations)
195.18 s
[really-safe-money-gen] coverage (231/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(<) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is antireflexive for "valid (MultiAmount Currency)"'s (2 mutations)
195.21 s
[really-safe-money-gen] coverage (214/1610): Money\.AccountSpec.fraction.produces valid amounts (39 mutations)
195.22 s
[really-safe-money-gen] coverage (227/1610): Money\.MultiAmountSpec.Eq (MultiAmount Currency).(==) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is symmetric for "valid (MultiAmount Currency)"s (1 mutations)
195.66 s
[really-safe-money-gen] coverage (234/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(<=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is reflexive for "valid (MultiAmount Currency)"'s (2 mutations)
195.68 s
[really-safe-money-gen] coverage (232/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(<) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is transitive for "valid (MultiAmount Currency)"'s (2 mutations)
195.83 s
[really-safe-money-gen] coverage (230/1610): Money\.MultiAmountSpec.sum.produces valid amounts (27 mutations)
195.91 s
[really-safe-money-gen] coverage (233/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(<) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (MultiAmount Currency)"'s (2 mutations)
195.91 s
[really-safe-money-gen] coverage (235/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(<=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (MultiAmount Currency)"'s (2 mutations)
196.29 s
[really-safe-money-gen] coverage (237/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(<=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is antisymmetric for "valid (MultiAmount Currency)"'s (2 mutations)
196.63 s
[really-safe-money-gen] coverage (238/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency)."min \:\: (MultiAmount Currency -> MultiAmount Currency -> MultiAmount Currency)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (MultiAmount Currency)"'s (2 mutations)
197.11 s
[really-safe-money-gen] coverage (239/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(>=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is antisymmetric for "valid (MultiAmount Currency)"'s (2 mutations)
197.24 s
[really-safe-money-gen] coverage (240/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(>=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is reflexive for "valid (MultiAmount Currency)"'s (2 mutations)
202.64 s
[really-safe-money-gen] coverage (241/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(>=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is transitive for "valid (MultiAmount Currency)"'s (2 mutations)
202.70 s
[really-safe-money-gen] coverage (244/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(>) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is antireflexive for "valid (MultiAmount Currency)"'s (2 mutations)
202.90 s
[really-safe-money-gen] coverage (243/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency)."max \:\: (MultiAmount Currency -> MultiAmount Currency -> MultiAmount Currency)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (MultiAmount Currency)"'s (2 mutations)
202.94 s
[really-safe-money-gen] coverage (247/1610): Money\.MultiAmountSpec.convertAll.produces the right result in this example (15 mutations)
202.94 s
[really-safe-money-gen] coverage (242/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(>=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (MultiAmount Currency)"'s (2 mutations)
203.04 s
[really-safe-money-gen] coverage (245/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(>) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is transitive for "valid (MultiAmount Currency)"'s (2 mutations)
203.05 s
[really-safe-money-gen] coverage (248/1610): Money\.MultiAmountSpec.convertAll.produces valid results when converting two currencies to one (20 mutations)
203.14 s
[really-safe-money-gen] coverage (249/1610): Money\.MultiAmountSpec.convertAll.does the same as 'convert' when there is only one amount (32 mutations)
203.20 s
[really-safe-money-gen] coverage (246/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(>) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (MultiAmount Currency)"'s (2 mutations)
203.22 s
[really-safe-money-gen] coverage (251/1610): Money\.MultiAmountSpec.add.has a right-identity\: zero (2 mutations)
203.45 s
[really-safe-money-gen] coverage (255/1610): Money\.MultiAmountSpec.addAmount.produces valid amounts (24 mutations)
203.49 s
[really-safe-money-gen] coverage (256/1610): Money\.MultiAmountSpec.subtractAmount.produces valid amounts (29 mutations)
203.67 s
[really-safe-money-gen] coverage (91/1610): Money\.ConversionRateSpec.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
203.92 s
[really-safe-money-gen] coverage (250/1610): Money\.MultiAmountSpec.add.produces valid amounts (27 mutations)
204.01 s
[really-safe-money-gen] coverage (263/1610): Money\.AccountOfSpec.USD.sum.matches what you would get with Integer, if nothing fails (28 mutations)
204.04 s
[really-safe-money-gen] coverage (259/1610): Money\.MultiAmountSpec.subtract.has a right-identity\: zero (2 mutations)
204.08 s
[really-safe-money-gen] coverage (260/1610): Money\.MultiAmountSpec.lookupAmount.produces valid amounts (2 mutations)
204.15 s
[really-safe-money-gen] coverage (257/1610): Money\.MultiAmountSpec.GenValid (MultiAmount Currency).genValid \:\: Gen (MultiAmount Currency).only generates valid '(MultiAmount Currency)'s (13 mutations)
204.15 s
[really-safe-money-gen] coverage (254/1610): Money\.MultiAmountSpec.add.is commutative (16 mutations)
204.19 s
[really-safe-money-gen] coverage (262/1610): Money\.AccountOfSpec.USD.sum.produces valid amounts (28 mutations)
204.47 s
[really-safe-money-gen] coverage (264/1610): Money\.AccountOfSpec.USD.Eq (AccountOf * USD).(/=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AccountOf * USD)"s (3 mutations)
204.66 s
[really-safe-money-gen] coverage (93/1610): Money\.ConversionRateSpec.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
204.76 s
[really-safe-money-gen] coverage (253/1610): Money\.MultiAmountSpec.add.is associative when both succeed (16 mutations)
204.95 s
[really-safe-money-gen] coverage (261/1610): Money\.MultiAmountSpec.lookupAmount.can find an added amount (5 mutations)
205.44 s
[really-safe-money-gen] coverage (265/1610): Money\.AccountOfSpec.USD.Eq (AccountOf * USD).(/=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is antireflexive for "valid (AccountOf * USD)"s (3 mutations)
206.12 s
[really-safe-money-gen] coverage (252/1610): Money\.MultiAmountSpec.add.has a left-identity\: zero (4 mutations)
211.41 s
[really-safe-money-gen] coverage (269/1610): Money\.AccountOfSpec.USD.Eq (AccountOf * USD).(==) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AccountOf * USD)"s (3 mutations)
211.43 s
[really-safe-money-gen] coverage (267/1610): Money\.AccountOfSpec.USD.Eq (AccountOf * USD).(==) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is symmetric for "valid (AccountOf * USD)"s (3 mutations)
211.63 s
[really-safe-money-gen] coverage (268/1610): Money\.AccountOfSpec.USD.Eq (AccountOf * USD).(==) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is transitive for "valid (AccountOf * USD)"s (3 mutations)
211.67 s
[really-safe-money-gen] coverage (272/1610): Money\.AccountOfSpec.USD.add.matches what you would get with Integer, if nothing fails (27 mutations)
211.71 s
[really-safe-money-gen] coverage (273/1610): Money\.AccountOfSpec.USD.add.produces valid amounts (27 mutations)
211.80 s
[really-safe-money-gen] coverage (271/1610): Money\.AccountOfSpec.USD.add.is associative when both succeed (27 mutations)
211.80 s
[really-safe-money-gen] coverage (258/1610): Money\.MultiAmountSpec.subtract.produces valid amounts (28 mutations)
211.84 s
[really-safe-money-gen] coverage (266/1610): Money\.AccountOfSpec.USD.Eq (AccountOf * USD).(==) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is reflexive for "valid (AccountOf * USD)"s (3 mutations)
212.01 s
[really-safe-money-gen] coverage (270/1610): Money\.AccountOfSpec.USD.add.has a right-identity\: zero (28 mutations)
212.04 s
[really-safe-money-gen] coverage (274/1610): Money\.AccountOfSpec.USD.add.is commutative (27 mutations)
212.06 s
[really-safe-money-gen] coverage (276/1610): Money\.AccountOfSpec.USD.fromAmountOf.produces valid AccountOfs (1 mutations)
212.19 s
[really-safe-money-gen] coverage (275/1610): Money\.AccountOfSpec.USD.add.has a left-identity\: zero (28 mutations)
212.53 s
[really-safe-money-gen] coverage (279/1610): Money\.AccountOfSpec.USD.fromAmount.produces valid AccountOfs (1 mutations)
212.69 s
[really-safe-money-gen] coverage (280/1610): Money\.AccountOfSpec.USD.negate.produces valid amounts (1 mutations)
212.75 s
[really-safe-money-gen] coverage (281/1610): Money\.AccountOfSpec.USD.USD.convert.produces valid amounts (27 mutations)
212.76 s
[really-safe-money-gen] coverage (277/1610): Money\.AccountOfSpec.USD.toMinimalQuantisations.produces valid accounts (3 mutations)
212.85 s
[really-safe-money-gen] coverage (283/1610): Money\.AccountOfSpec.USD.Show (AccountOf * USD) and Read (AccountOf * USD).are implemented such that read \. show == id for valid values (3 mutations)
212.88 s
[really-safe-money-gen] coverage (284/1610): Money\.AccountOfSpec.USD.BTC.rate.produces valid amounts (15 mutations)
212.92 s
[really-safe-money-gen] coverage (278/1610): Money\.AccountOfSpec.USD.toDouble.produces valid Doubles when the quantisation factor is nonzero (3 mutations)
212.96 s
[really-safe-money-gen] coverage (282/1610): Money\.AccountOfSpec.USD.USD.rate.produces valid amounts (15 mutations)
213.14 s
[really-safe-money-gen] coverage (288/1610): Money\.AccountOfSpec.USD.ADA.rate.produces valid amounts (15 mutations)
213.36 s
[really-safe-money-gen] coverage (286/1610): Money\.AccountOfSpec.USD.INR.rate.produces valid amounts (15 mutations)
213.81 s
[really-safe-money-gen] coverage (290/1610): Money\.AccountOfSpec.USD.CHF.convert.produces valid amounts (27 mutations)
213.94 s
[really-safe-money-gen] coverage (236/1610): Money\.MultiAmountSpec.Ord (MultiAmount Currency).(<=) \:\: (MultiAmount Currency) -> (MultiAmount Currency) -> Bool.is transitive for "valid (MultiAmount Currency)"'s (2 mutations)
214.32 s
[really-safe-money-gen] coverage (285/1610): Money\.AccountOfSpec.USD.BTC.convert.produces valid amounts (27 mutations)
214.87 s
[really-safe-money-gen] coverage (292/1610): Money\.AccountOfSpec.USD.abs.produces valid amounts (1 mutations)
220.66 s
[really-safe-money-gen] coverage (295/1610): Money\.AccountOfSpec.USD.fromMinimalQuantisations.roundtrips with toMinimalQuantisations (16 mutations)
220.79 s
[really-safe-money-gen] coverage (296/1610): Money\.AccountOfSpec.USD.fromMinimalQuantisations.produces valid accounts (14 mutations)
220.91 s
[really-safe-money-gen] coverage (297/1610): Money\.AccountOfSpec.USD.GenValid (AccountOf * USD).genValid \:\: Gen (AccountOf * USD).only generates valid '(AccountOf * USD)'s (1 mutations)
221.00 s
[really-safe-money-gen] coverage (300/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(>) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AccountOf * USD)"'s (3 mutations)
221.02 s
[really-safe-money-gen] coverage (298/1610): Money\.AccountOfSpec.USD.fromDouble.produces valid rational (38 mutations)
221.07 s
[really-safe-money-gen] coverage (294/1610): Money\.AccountOfSpec.USD.fraction.Produces a result that can be multiplied back (38 mutations)
221.16 s
[really-safe-money-gen] coverage (301/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(>) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is antireflexive for "valid (AccountOf * USD)"'s (3 mutations)
221.19 s
[really-safe-money-gen] coverage (287/1610): Money\.AccountOfSpec.USD.INR.convert.produces valid amounts (27 mutations)
221.22 s
[really-safe-money-gen] coverage (299/1610): Money\.AccountOfSpec.USD.fromDouble.roundtrips with toDouble (40 mutations)
221.37 s
[really-safe-money-gen] coverage (303/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(<) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is transitive for "valid (AccountOf * USD)"'s (3 mutations)
221.43 s
[really-safe-money-gen] coverage (302/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(>) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is transitive for "valid (AccountOf * USD)"'s (3 mutations)
221.52 s
[really-safe-money-gen] coverage (304/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(<) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is antireflexive for "valid (AccountOf * USD)"'s (3 mutations)
221.89 s
[really-safe-money-gen] coverage (305/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(<) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AccountOf * USD)"'s (3 mutations)
222.08 s
[really-safe-money-gen] coverage (291/1610): Money\.AccountOfSpec.USD.CHF.rate.produces valid amounts (15 mutations)
222.11 s
[really-safe-money-gen] coverage (293/1610): Money\.AccountOfSpec.USD.fraction.produces valid amounts (39 mutations)
222.14 s
[really-safe-money-gen] coverage (289/1610): Money\.AccountOfSpec.USD.ADA.convert.produces valid amounts (27 mutations)
222.28 s
[really-safe-money-gen] coverage (308/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(>=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is reflexive for "valid (AccountOf * USD)"'s (3 mutations)
222.32 s
[really-safe-money-gen] coverage (309/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(>=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is transitive for "valid (AccountOf * USD)"'s (3 mutations)
222.37 s
[really-safe-money-gen] coverage (306/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(>=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AccountOf * USD)"'s (3 mutations)
222.43 s
[really-safe-money-gen] coverage (307/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(>=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is antisymmetric for "valid (AccountOf * USD)"'s (3 mutations)
222.74 s
[really-safe-money-gen] coverage (310/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD)."max \:\: (AccountOf * USD -> AccountOf * USD -> AccountOf * USD)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AccountOf * USD)"'s (3 mutations)
222.75 s
[really-safe-money-gen] coverage (311/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(<=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AccountOf * USD)"'s (3 mutations)
223.30 s
[really-safe-money-gen] coverage (313/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(<=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is antisymmetric for "valid (AccountOf * USD)"'s (3 mutations)
223.36 s
[really-safe-money-gen] coverage (312/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(<=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is reflexive for "valid (AccountOf * USD)"'s (3 mutations)
223.73 s
[really-safe-money-gen] coverage (314/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD).(<=) \:\: (AccountOf * USD) -> (AccountOf * USD) -> Bool.is transitive for "valid (AccountOf * USD)"'s (3 mutations)
224.46 s
[really-safe-money-gen] coverage (315/1610): Money\.AccountOfSpec.USD.Ord (AccountOf * USD)."min \:\: (AccountOf * USD -> AccountOf * USD -> AccountOf * USD)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AccountOf * USD)"'s (3 mutations)
230.42 s
[really-safe-money-gen] coverage (316/1610): Money\.AccountOfSpec.USD.distribute.produces results that sum up to the greater whole (64 mutations)
230.59 s
[really-safe-money-gen] coverage (318/1610): Money\.AccountOfSpec.USD.distribute.Eq (Distribution (AccountOf * USD)).(/=) \:\: (Distribution (AccountOf * USD)) -> (Distribution (AccountOf * USD)) -> Bool.is antireflexive for "valid (Distribution (AccountOf * USD))"s (3 mutations)
230.72 s
[really-safe-money-gen] coverage (317/1610): Money\.AccountOfSpec.USD.distribute.Show (Distribution (AccountOf * USD)) and Read (Distribution (AccountOf * USD)).are implemented such that read \. show == id for valid values (3 mutations)
230.74 s
[really-safe-money-gen] coverage (320/1610): Money\.AccountOfSpec.USD.distribute.Eq (Distribution (AccountOf * USD)).(==) \:\: (Distribution (AccountOf * USD)) -> (Distribution (AccountOf * USD)) -> Bool.is reflexive for "valid (Distribution (AccountOf * USD))"s (3 mutations)
230.83 s
[really-safe-money-gen] coverage (321/1610): Money\.AccountOfSpec.USD.distribute.Eq (Distribution (AccountOf * USD)).(==) \:\: (Distribution (AccountOf * USD)) -> (Distribution (AccountOf * USD)) -> Bool.is transitive for "valid (Distribution (AccountOf * USD))"s (3 mutations)
230.83 s
[really-safe-money-gen] coverage (322/1610): Money\.AccountOfSpec.USD.distribute.Eq (Distribution (AccountOf * USD)).(==) \:\: (Distribution (AccountOf * USD)) -> (Distribution (AccountOf * USD)) -> Bool.is symmetric for "valid (Distribution (AccountOf * USD))"s (3 mutations)
230.94 s
[really-safe-money-gen] coverage (324/1610): Money\.AccountOfSpec.USD.distribute.produces valid amounts (34 mutations)
230.94 s
[really-safe-money-gen] coverage (319/1610): Money\.AccountOfSpec.USD.distribute.Eq (Distribution (AccountOf * USD)).(/=) \:\: (Distribution (AccountOf * USD)) -> (Distribution (AccountOf * USD)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AccountOf * USD))"s (3 mutations)
230.96 s
[really-safe-money-gen] coverage (323/1610): Money\.AccountOfSpec.USD.distribute.Eq (Distribution (AccountOf * USD)).(==) \:\: (Distribution (AccountOf * USD)) -> (Distribution (AccountOf * USD)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AccountOf * USD))"s (3 mutations)
231.31 s
[really-safe-money-gen] coverage (325/1610): Money\.AccountOfSpec.USD.format.produces valid strings (6 mutations)
231.49 s
[really-safe-money-gen] coverage (327/1610): Money\.AccountOfSpec.USD.fromRational.produces valid rational (27 mutations)
231.62 s
[really-safe-money-gen] coverage (328/1610): Money\.AccountOfSpec.USD.fromRational.roundtrips with toRational (31 mutations)
231.63 s
[really-safe-money-gen] coverage (326/1610): Money\.AccountOfSpec.USD.subtract.matches what you would get with Integer, if nothing fails (27 mutations)
231.99 s
[really-safe-money-gen] coverage (329/1610): Money\.AccountOfSpec.USD.multiply.is absorbed by 0 (20 mutations)
232.10 s
[really-safe-money-gen] coverage (331/1610): Money\.AccountOfSpec.USD.multiply.produces valid amounts (20 mutations)
232.20 s
[really-safe-money-gen] coverage (330/1610): Money\.AccountOfSpec.USD.multiply.has an identity\: 1 (20 mutations)
232.22 s
[really-safe-money-gen] coverage (333/1610): Money\.AccountOfSpec.USD.multiply.is distributive with add when both succeed (44 mutations)
232.26 s
[really-safe-money-gen] coverage (332/1610): Money\.AccountOfSpec.USD.multiply.matches what you would get with Integer, if nothing fails (20 mutations)
232.34 s
[really-safe-money-gen] coverage (335/1610): Money\.AccountOfSpec.INR.fromAmount.produces valid AccountOfs (1 mutations)
232.34 s
[really-safe-money-gen] coverage (334/1610): Money\.AccountOfSpec.USD.toRational.produces valid Rationals when the quantisation factor is nonzero (3 mutations)
232.75 s
[really-safe-money-gen] coverage (337/1610): Money\.AccountOfSpec.INR.USD.rate.produces valid amounts (15 mutations)
232.91 s
[really-safe-money-gen] coverage (336/1610): Money\.AccountOfSpec.INR.USD.convert.produces valid amounts (27 mutations)
233.64 s
[really-safe-money-gen] coverage (341/1610): Money\.AccountOfSpec.INR.add.is associative when both succeed (27 mutations)
233.64 s
[really-safe-money-gen] coverage (338/1610): Money\.AccountOfSpec.INR.GenValid (AccountOf * INR).genValid \:\: Gen (AccountOf * INR).only generates valid '(AccountOf * INR)'s (1 mutations)
234.15 s
[really-safe-money-gen] coverage (342/1610): Money\.AccountOfSpec.INR.add.has a left-identity\: zero (28 mutations)
234.87 s
[really-safe-money-gen] coverage (343/1610): Money\.AccountOfSpec.INR.add.is commutative (27 mutations)
238.88 s
[really-safe-money-gen] coverage (183/1610): Money\.AccountSpec.DecimalLiteral.Account\.toDecimalLiteral.roundtrips with Account\.fromDecimalLiteral (87 mutations)
240.92 s
[really-safe-money-gen] coverage (344/1610): Money\.AccountOfSpec.INR.add.has a right-identity\: zero (28 mutations)
241.08 s
[really-safe-money-gen] coverage (339/1610): Money\.AccountOfSpec.INR.abs.produces valid amounts (1 mutations)
241.09 s
[really-safe-money-gen] coverage (345/1610): Money\.AccountOfSpec.INR.add.matches what you would get with Integer, if nothing fails (27 mutations)
241.19 s
[really-safe-money-gen] coverage (348/1610): Money\.AccountOfSpec.INR.fraction.Produces a result that can be multiplied back (38 mutations)
241.21 s
[really-safe-money-gen] coverage (346/1610): Money\.AccountOfSpec.INR.subtract.matches what you would get with Integer, if nothing fails (27 mutations)
241.26 s
[really-safe-money-gen] coverage (350/1610): Money\.AccountOfSpec.INR.distribute.Eq (Distribution (AccountOf * INR)).(/=) \:\: (Distribution (AccountOf * INR)) -> (Distribution (AccountOf * INR)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AccountOf * INR))"s (3 mutations)
241.35 s
[really-safe-money-gen] coverage (349/1610): Money\.AccountOfSpec.INR.distribute.produces results that sum up to the greater whole (64 mutations)
241.36 s
[really-safe-money-gen] coverage (340/1610): Money\.AccountOfSpec.INR.add.produces valid amounts (27 mutations)
241.51 s
[really-safe-money-gen] coverage (347/1610): Money\.AccountOfSpec.INR.fraction.produces valid amounts (39 mutations)
241.68 s
[really-safe-money-gen] coverage (351/1610): Money\.AccountOfSpec.INR.distribute.Eq (Distribution (AccountOf * INR)).(/=) \:\: (Distribution (AccountOf * INR)) -> (Distribution (AccountOf * INR)) -> Bool.is antireflexive for "valid (Distribution (AccountOf * INR))"s (3 mutations)
241.72 s
[really-safe-money-gen] coverage (352/1610): Money\.AccountOfSpec.INR.distribute.Eq (Distribution (AccountOf * INR)).(==) \:\: (Distribution (AccountOf * INR)) -> (Distribution (AccountOf * INR)) -> Bool.is transitive for "valid (Distribution (AccountOf * INR))"s (3 mutations)
241.91 s
[really-safe-money-gen] coverage (357/1610): Money\.AccountOfSpec.INR.distribute.produces valid amounts (34 mutations)
242.09 s
[really-safe-money-gen] coverage (354/1610): Money\.AccountOfSpec.INR.distribute.Eq (Distribution (AccountOf * INR)).(==) \:\: (Distribution (AccountOf * INR)) -> (Distribution (AccountOf * INR)) -> Bool.is reflexive for "valid (Distribution (AccountOf * INR))"s (3 mutations)
242.36 s
[really-safe-money-gen] coverage (358/1610): Money\.AccountOfSpec.INR.fromAmountOf.produces valid AccountOfs (1 mutations)
242.41 s
[really-safe-money-gen] coverage (360/1610): Money\.AccountOfSpec.INR.sum.produces valid amounts (28 mutations)
242.48 s
[really-safe-money-gen] coverage (359/1610): Money\.AccountOfSpec.INR.sum.matches what you would get with Integer, if nothing fails (28 mutations)
242.53 s
[really-safe-money-gen] coverage (355/1610): Money\.AccountOfSpec.INR.distribute.Eq (Distribution (AccountOf * INR)).(==) \:\: (Distribution (AccountOf * INR)) -> (Distribution (AccountOf * INR)) -> Bool.is symmetric for "valid (Distribution (AccountOf * INR))"s (3 mutations)
242.54 s
[really-safe-money-gen] coverage (356/1610): Money\.AccountOfSpec.INR.distribute.Show (Distribution (AccountOf * INR)) and Read (Distribution (AccountOf * INR)).are implemented such that read \. show == id for valid values (3 mutations)
242.89 s
[really-safe-money-gen] coverage (353/1610): Money\.AccountOfSpec.INR.distribute.Eq (Distribution (AccountOf * INR)).(==) \:\: (Distribution (AccountOf * INR)) -> (Distribution (AccountOf * INR)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AccountOf * INR))"s (3 mutations)
242.96 s
[really-safe-money-gen] coverage (365/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(>=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is transitive for "valid (AccountOf * INR)"'s (3 mutations)
243.03 s
[really-safe-money-gen] coverage (362/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(>=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is antisymmetric for "valid (AccountOf * INR)"'s (3 mutations)
243.06 s
[really-safe-money-gen] coverage (363/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(>=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AccountOf * INR)"'s (3 mutations)
243.70 s
[really-safe-money-gen] coverage (366/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(<) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is transitive for "valid (AccountOf * INR)"'s (3 mutations)
243.85 s
[really-safe-money-gen] coverage (361/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR)."min \:\: (AccountOf * INR -> AccountOf * INR -> AccountOf * INR)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AccountOf * INR)"'s (3 mutations)
244.20 s
[really-safe-money-gen] coverage (367/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(<) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is antireflexive for "valid (AccountOf * INR)"'s (3 mutations)
245.04 s
[really-safe-money-gen] coverage (368/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(<) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AccountOf * INR)"'s (3 mutations)
245.29 s
[really-safe-money-gen] coverage (184/1610): Money\.AccountSpec.DecimalLiteral.Account\.toDecimalLiteral.produces valid decimal literals (56 mutations)
248.82 s
[really-safe-money-gen] coverage (364/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(>=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is reflexive for "valid (AccountOf * INR)"'s (3 mutations)
250.95 s
[really-safe-money-gen] coverage (369/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR)."max \:\: (AccountOf * INR -> AccountOf * INR -> AccountOf * INR)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AccountOf * INR)"'s (3 mutations)
251.15 s
[really-safe-money-gen] coverage (371/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(>) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AccountOf * INR)"'s (3 mutations)
251.18 s
[really-safe-money-gen] coverage (370/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(>) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is transitive for "valid (AccountOf * INR)"'s (3 mutations)
251.22 s
[really-safe-money-gen] coverage (374/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(<=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is transitive for "valid (AccountOf * INR)"'s (3 mutations)
251.27 s
[really-safe-money-gen] coverage (373/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(<=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is reflexive for "valid (AccountOf * INR)"'s (3 mutations)
251.50 s
[really-safe-money-gen] coverage (372/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(>) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is antireflexive for "valid (AccountOf * INR)"'s (3 mutations)
251.51 s
[really-safe-money-gen] coverage (375/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(<=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is antisymmetric for "valid (AccountOf * INR)"'s (3 mutations)
251.52 s
[really-safe-money-gen] coverage (377/1610): Money\.AccountOfSpec.INR.CHF.rate.produces valid amounts (15 mutations)
251.79 s
[really-safe-money-gen] coverage (378/1610): Money\.AccountOfSpec.INR.CHF.convert.produces valid amounts (27 mutations)
251.86 s
[really-safe-money-gen] coverage (376/1610): Money\.AccountOfSpec.INR.Ord (AccountOf * INR).(<=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AccountOf * INR)"'s (3 mutations)
252.01 s
[really-safe-money-gen] coverage (379/1610): Money\.AccountOfSpec.INR.multiply.is distributive with add when both succeed (44 mutations)
252.32 s
[really-safe-money-gen] coverage (380/1610): Money\.AccountOfSpec.INR.multiply.matches what you would get with Integer, if nothing fails (20 mutations)
252.55 s
[really-safe-money-gen] coverage (381/1610): Money\.AccountOfSpec.INR.multiply.is absorbed by 0 (20 mutations)
252.64 s
[really-safe-money-gen] coverage (382/1610): Money\.AccountOfSpec.INR.multiply.produces valid amounts (20 mutations)
252.87 s
[really-safe-money-gen] coverage (383/1610): Money\.AccountOfSpec.INR.multiply.has an identity\: 1 (20 mutations)
252.91 s
[really-safe-money-gen] coverage (384/1610): Money\.AccountOfSpec.INR.negate.produces valid amounts (1 mutations)
253.06 s
[really-safe-money-gen] coverage (386/1610): Money\.AccountOfSpec.INR.fromMinimalQuantisations.roundtrips with toMinimalQuantisations (16 mutations)
253.24 s
[really-safe-money-gen] coverage (385/1610): Money\.AccountOfSpec.INR.Show (AccountOf * INR) and Read (AccountOf * INR).are implemented such that read \. show == id for valid values (3 mutations)
253.47 s
[really-safe-money-gen] coverage (387/1610): Money\.AccountOfSpec.INR.fromMinimalQuantisations.produces valid accounts (14 mutations)
253.55 s
[really-safe-money-gen] coverage (388/1610): Money\.AccountOfSpec.INR.fromRational.produces valid rational (27 mutations)
253.58 s
[really-safe-money-gen] coverage (390/1610): Money\.AccountOfSpec.INR.toDouble.produces valid Doubles when the quantisation factor is nonzero (3 mutations)
253.76 s
[really-safe-money-gen] coverage (389/1610): Money\.AccountOfSpec.INR.fromRational.roundtrips with toRational (31 mutations)
254.65 s
[really-safe-money-gen] coverage (391/1610): Money\.AccountOfSpec.INR.BTC.rate.produces valid amounts (15 mutations)
254.70 s
[really-safe-money-gen] coverage (393/1610): Money\.AccountOfSpec.INR.toRational.produces valid Rationals when the quantisation factor is nonzero (3 mutations)
255.13 s
[really-safe-money-gen] coverage (394/1610): Money\.AccountOfSpec.INR.fromDouble.roundtrips with toDouble (40 mutations)
256.08 s
[really-safe-money-gen] coverage (395/1610): Money\.AccountOfSpec.INR.fromDouble.produces valid rational (38 mutations)
256.55 s
[really-safe-money-gen] coverage (397/1610): Money\.AccountOfSpec.INR.ADA.rate.produces valid amounts (15 mutations)
259.88 s
[really-safe-money-gen] coverage (398/1610): Money\.AccountOfSpec.INR.format.produces valid strings (6 mutations)
262.13 s
[really-safe-money-gen] coverage (396/1610): Money\.AccountOfSpec.INR.ADA.convert.produces valid amounts (27 mutations)
262.29 s
[really-safe-money-gen] coverage (402/1610): Money\.AccountOfSpec.INR.Eq (AccountOf * INR).(==) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is reflexive for "valid (AccountOf * INR)"s (3 mutations)
262.31 s
[really-safe-money-gen] coverage (404/1610): Money\.AccountOfSpec.INR.Eq (AccountOf * INR).(==) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is transitive for "valid (AccountOf * INR)"s (3 mutations)
262.31 s
[really-safe-money-gen] coverage (392/1610): Money\.AccountOfSpec.INR.BTC.convert.produces valid amounts (27 mutations)
262.36 s
[really-safe-money-gen] coverage (400/1610): Money\.AccountOfSpec.INR.Eq (AccountOf * INR).(/=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AccountOf * INR)"s (3 mutations)
262.41 s
[really-safe-money-gen] coverage (399/1610): Money\.AccountOfSpec.INR.toMinimalQuantisations.produces valid accounts (3 mutations)
262.51 s
[really-safe-money-gen] coverage (405/1610): Money\.AccountOfSpec.INR.Eq (AccountOf * INR).(==) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AccountOf * INR)"s (3 mutations)
262.60 s
[really-safe-money-gen] coverage (403/1610): Money\.AccountOfSpec.INR.Eq (AccountOf * INR).(==) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is symmetric for "valid (AccountOf * INR)"s (3 mutations)
262.72 s
[really-safe-money-gen] coverage (406/1610): Money\.AccountOfSpec.INR.INR.convert.produces valid amounts (27 mutations)
262.74 s
[really-safe-money-gen] coverage (401/1610): Money\.AccountOfSpec.INR.Eq (AccountOf * INR).(/=) \:\: (AccountOf * INR) -> (AccountOf * INR) -> Bool.is antireflexive for "valid (AccountOf * INR)"s (3 mutations)
262.82 s
[really-safe-money-gen] coverage (407/1610): Money\.AccountOfSpec.INR.INR.rate.produces valid amounts (15 mutations)
262.94 s
[really-safe-money-gen] coverage (408/1610): Money\.AccountOfSpec.CHF.fromAmount.produces valid AccountOfs (1 mutations)
263.41 s
[really-safe-money-gen] coverage (409/1610): Money\.AccountOfSpec.CHF.fromMinimalQuantisations.roundtrips with toMinimalQuantisations (16 mutations)
263.43 s
[really-safe-money-gen] coverage (413/1610): Money\.AccountOfSpec.CHF.multiply.is distributive with add when both succeed (44 mutations)
263.77 s
[really-safe-money-gen] coverage (423/1610): Money\.AccountOfSpec.CHF.distribute.Eq (Distribution (AccountOf * CHF)).(==) \:\: (Distribution (AccountOf * CHF)) -> (Distribution (AccountOf * CHF)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AccountOf * CHF))"s (3 mutations)
263.77 s
[really-safe-money-gen] coverage (422/1610): Money\.AccountOfSpec.CHF.distribute.Eq (Distribution (AccountOf * CHF)).(==) \:\: (Distribution (AccountOf * CHF)) -> (Distribution (AccountOf * CHF)) -> Bool.is symmetric for "valid (Distribution (AccountOf * CHF))"s (3 mutations)
263.77 s
[really-safe-money-gen] coverage (418/1610): Money\.AccountOfSpec.CHF.distribute.Eq (Distribution (AccountOf * CHF)).(/=) \:\: (Distribution (AccountOf * CHF)) -> (Distribution (AccountOf * CHF)) -> Bool.is antireflexive for "valid (Distribution (AccountOf * CHF))"s (3 mutations)
263.86 s
[really-safe-money-gen] coverage (416/1610): Money\.AccountOfSpec.CHF.distribute.produces valid amounts (34 mutations)
264.01 s
[really-safe-money-gen] coverage (425/1610): Money\.AccountOfSpec.CHF.sum.matches what you would get with Integer, if nothing fails (28 mutations)
264.05 s
[really-safe-money-gen] coverage (424/1610): Money\.AccountOfSpec.CHF.distribute.Show (Distribution (AccountOf * CHF)) and Read (Distribution (AccountOf * CHF)).are implemented such that read \. show == id for valid values (3 mutations)
264.14 s
[really-safe-money-gen] coverage (417/1610): Money\.AccountOfSpec.CHF.distribute.produces results that sum up to the greater whole (64 mutations)
264.35 s
[really-safe-money-gen] coverage (426/1610): Money\.AccountOfSpec.CHF.sum.produces valid amounts (28 mutations)
264.68 s
[really-safe-money-gen] coverage (427/1610): Money\.AccountOfSpec.CHF.Show (AccountOf * CHF) and Read (AccountOf * CHF).are implemented such that read \. show == id for valid values (3 mutations)
265.02 s
[really-safe-money-gen] coverage (428/1610): Money\.AccountOfSpec.CHF.abs.produces valid amounts (1 mutations)
265.36 s
[really-safe-money-gen] coverage (429/1610): Money\.AccountOfSpec.CHF.USD.rate.produces valid amounts (15 mutations)
266.21 s
[really-safe-money-gen] coverage (430/1610): Money\.AccountOfSpec.CHF.USD.convert.produces valid amounts (27 mutations)
266.40 s
[really-safe-money-gen] coverage (410/1610): Money\.AccountOfSpec.CHF.fromMinimalQuantisations.produces valid accounts (14 mutations)
269.67 s
[really-safe-money-gen] coverage (435/1610): Money\.AccountOfSpec.CHF.fraction.produces valid amounts (39 mutations)
271.98 s
[really-safe-money-gen] coverage (436/1610): Money\.AccountOfSpec.CHF.Eq (AccountOf * CHF).(==) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AccountOf * CHF)"s (3 mutations)
272.01 s
[really-safe-money-gen] coverage (437/1610): Money\.AccountOfSpec.CHF.Eq (AccountOf * CHF).(==) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is transitive for "valid (AccountOf * CHF)"s (3 mutations)
272.01 s
[really-safe-money-gen] coverage (440/1610): Money\.AccountOfSpec.CHF.Eq (AccountOf * CHF).(/=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AccountOf * CHF)"s (3 mutations)
272.14 s
[really-safe-money-gen] coverage (439/1610): Money\.AccountOfSpec.CHF.Eq (AccountOf * CHF).(==) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is symmetric for "valid (AccountOf * CHF)"s (3 mutations)
272.17 s
[really-safe-money-gen] coverage (442/1610): Money\.AccountOfSpec.CHF.toDouble.produces valid Doubles when the quantisation factor is nonzero (3 mutations)
272.19 s
[really-safe-money-gen] coverage (441/1610): Money\.AccountOfSpec.CHF.Eq (AccountOf * CHF).(/=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is antireflexive for "valid (AccountOf * CHF)"s (3 mutations)
272.22 s
[really-safe-money-gen] coverage (444/1610): Money\.AccountOfSpec.CHF.negate.produces valid amounts (1 mutations)
272.42 s
[really-safe-money-gen] coverage (443/1610): Money\.AccountOfSpec.CHF.fromAmountOf.produces valid AccountOfs (1 mutations)
272.49 s
[really-safe-money-gen] coverage (446/1610): Money\.AccountOfSpec.CHF.format.produces valid strings (6 mutations)
272.54 s
[really-safe-money-gen] coverage (445/1610): Money\.AccountOfSpec.CHF.toRational.produces valid Rationals when the quantisation factor is nonzero (3 mutations)
272.57 s
[really-safe-money-gen] coverage (447/1610): Money\.AccountOfSpec.CHF.fromRational.produces valid rational (27 mutations)
272.68 s
[really-safe-money-gen] coverage (448/1610): Money\.AccountOfSpec.CHF.fromRational.roundtrips with toRational (31 mutations)
272.94 s
[really-safe-money-gen] coverage (452/1610): Money\.AccountOfSpec.CHF.ADA.rate.produces valid amounts (15 mutations)
273.12 s
[really-safe-money-gen] coverage (449/1610): Money\.AccountOfSpec.CHF.fromDouble.produces valid rational (38 mutations)
273.15 s
[really-safe-money-gen] coverage (454/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(<) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AccountOf * CHF)"'s (3 mutations)
273.50 s
[really-safe-money-gen] coverage (455/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(<) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is transitive for "valid (AccountOf * CHF)"'s (3 mutations)
273.55 s
[really-safe-money-gen] coverage (453/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF)."min \:\: (AccountOf * CHF -> AccountOf * CHF -> AccountOf * CHF)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AccountOf * CHF)"'s (3 mutations)
273.57 s
[really-safe-money-gen] coverage (456/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(<) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is antireflexive for "valid (AccountOf * CHF)"'s (3 mutations)
273.67 s
[really-safe-money-gen] coverage (459/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(<=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is transitive for "valid (AccountOf * CHF)"'s (3 mutations)
273.72 s
[really-safe-money-gen] coverage (457/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(<=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AccountOf * CHF)"'s (3 mutations)
273.89 s
[really-safe-money-gen] coverage (460/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(<=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is reflexive for "valid (AccountOf * CHF)"'s (3 mutations)
274.07 s
[really-safe-money-gen] coverage (451/1610): Money\.AccountOfSpec.CHF.ADA.convert.produces valid amounts (27 mutations)
274.12 s
[really-safe-money-gen] coverage (461/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF)."max \:\: (AccountOf * CHF -> AccountOf * CHF -> AccountOf * CHF)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AccountOf * CHF)"'s (3 mutations)
274.55 s
[really-safe-money-gen] coverage (462/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(>) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AccountOf * CHF)"'s (3 mutations)
274.95 s
[really-safe-money-gen] coverage (464/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(>) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is transitive for "valid (AccountOf * CHF)"'s (3 mutations)
275.86 s
[really-safe-money-gen] coverage (463/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(>) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is antireflexive for "valid (AccountOf * CHF)"'s (3 mutations)
276.10 s
[really-safe-money-gen] coverage (465/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(>=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AccountOf * CHF)"'s (3 mutations)
279.25 s
[really-safe-money-gen] coverage (466/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(>=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is reflexive for "valid (AccountOf * CHF)"'s (3 mutations)
281.56 s
[really-safe-money-gen] coverage (467/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(>=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is antisymmetric for "valid (AccountOf * CHF)"'s (3 mutations)
281.58 s
[really-safe-money-gen] coverage (468/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(>=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is transitive for "valid (AccountOf * CHF)"'s (3 mutations)
281.63 s
[really-safe-money-gen] coverage (438/1610): Money\.AccountOfSpec.CHF.Eq (AccountOf * CHF).(==) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is reflexive for "valid (AccountOf * CHF)"s (3 mutations)
281.70 s
[really-safe-money-gen] coverage (414/1610): Money\.AccountOfSpec.CHF.multiply.matches what you would get with Integer, if nothing fails (20 mutations)
281.76 s
[really-safe-money-gen] coverage (469/1610): Money\.AccountOfSpec.CHF.GenValid (AccountOf * CHF).genValid \:\: Gen (AccountOf * CHF).only generates valid '(AccountOf * CHF)'s (1 mutations)
281.85 s
[really-safe-money-gen] coverage (480/1610): Money\.AccountOfSpec.CHF.INR.rate.produces valid amounts (15 mutations)
282.05 s
[really-safe-money-gen] coverage (415/1610): Money\.AccountOfSpec.CHF.multiply.has an identity\: 1 (20 mutations)
282.07 s
[really-safe-money-gen] coverage (478/1610): Money\.AccountOfSpec.CHF.add.produces valid amounts (27 mutations)
282.21 s
[really-safe-money-gen] coverage (479/1610): Money\.AccountOfSpec.CHF.INR.convert.produces valid amounts (27 mutations)
282.23 s
[really-safe-money-gen] coverage (419/1610): Money\.AccountOfSpec.CHF.distribute.Eq (Distribution (AccountOf * CHF)).(/=) \:\: (Distribution (AccountOf * CHF)) -> (Distribution (AccountOf * CHF)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AccountOf * CHF))"s (3 mutations)
282.36 s
[really-safe-money-gen] coverage (412/1610): Money\.AccountOfSpec.CHF.multiply.is absorbed by 0 (20 mutations)
282.38 s
[really-safe-money-gen] coverage (481/1610): Money\.AccountOfSpec.ADA.fromMinimalQuantisations.produces valid accounts (14 mutations)
282.73 s
[really-safe-money-gen] coverage (420/1610): Money\.AccountOfSpec.CHF.distribute.Eq (Distribution (AccountOf * CHF)).(==) \:\: (Distribution (AccountOf * CHF)) -> (Distribution (AccountOf * CHF)) -> Bool.is reflexive for "valid (Distribution (AccountOf * CHF))"s (3 mutations)
282.84 s
[really-safe-money-gen] coverage (421/1610): Money\.AccountOfSpec.CHF.distribute.Eq (Distribution (AccountOf * CHF)).(==) \:\: (Distribution (AccountOf * CHF)) -> (Distribution (AccountOf * CHF)) -> Bool.is transitive for "valid (Distribution (AccountOf * CHF))"s (3 mutations)
282.86 s
[really-safe-money-gen] coverage (482/1610): Money\.AccountOfSpec.ADA.fromMinimalQuantisations.roundtrips with toMinimalQuantisations (16 mutations)
283.00 s
[really-safe-money-gen] coverage (450/1610): Money\.AccountOfSpec.CHF.fromDouble.roundtrips with toDouble (40 mutations)
283.34 s
[really-safe-money-gen] coverage (483/1610): Money\.AccountOfSpec.ADA.fromDouble.produces valid rational (38 mutations)
283.38 s
[really-safe-money-gen] coverage (434/1610): Money\.AccountOfSpec.CHF.fraction.Produces a result that can be multiplied back (38 mutations)
283.42 s
[really-safe-money-gen] coverage (411/1610): Money\.AccountOfSpec.CHF.multiply.produces valid amounts (20 mutations)
283.42 s
[really-safe-money-gen] coverage (431/1610): Money\.AccountOfSpec.CHF.BTC.convert.produces valid amounts (27 mutations)
283.60 s
[really-safe-money-gen] coverage (485/1610): Money\.AccountOfSpec.ADA.fromRational.produces valid rational (27 mutations)
283.70 s
[really-safe-money-gen] coverage (484/1610): Money\.AccountOfSpec.ADA.fromDouble.roundtrips with toDouble (40 mutations)
283.83 s
[really-safe-money-gen] coverage (486/1610): Money\.AccountOfSpec.ADA.fromRational.roundtrips with toRational (31 mutations)
284.25 s
[really-safe-money-gen] coverage (432/1610): Money\.AccountOfSpec.CHF.BTC.rate.produces valid amounts (15 mutations)
284.69 s
[really-safe-money-gen] coverage (433/1610): Money\.AccountOfSpec.CHF.toMinimalQuantisations.produces valid accounts (3 mutations)
285.25 s
[really-safe-money-gen] coverage (487/1610): Money\.AccountOfSpec.ADA.Show (AccountOf * ADA) and Read (AccountOf * ADA).are implemented such that read \. show == id for valid values (3 mutations)
285.46 s
[really-safe-money-gen] coverage (489/1610): Money\.AccountOfSpec.ADA.fraction.produces valid amounts (39 mutations)
288.71 s
[really-safe-money-gen] coverage (490/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(<=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is antisymmetric for "valid (AccountOf * ADA)"'s (3 mutations)
290.96 s
[really-safe-money-gen] coverage (491/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(<=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is reflexive for "valid (AccountOf * ADA)"'s (3 mutations)
290.99 s
[really-safe-money-gen] coverage (493/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(<=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AccountOf * ADA)"'s (3 mutations)
291.06 s
[really-safe-money-gen] coverage (492/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(<=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is transitive for "valid (AccountOf * ADA)"'s (3 mutations)
291.26 s
[really-safe-money-gen] coverage (488/1610): Money\.AccountOfSpec.ADA.fraction.Produces a result that can be multiplied back (38 mutations)
291.27 s
[really-safe-money-gen] coverage (495/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(>=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AccountOf * ADA)"'s (3 mutations)
291.44 s
[really-safe-money-gen] coverage (494/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(>=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is antisymmetric for "valid (AccountOf * ADA)"'s (3 mutations)
291.61 s
[really-safe-money-gen] coverage (497/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(>=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is reflexive for "valid (AccountOf * ADA)"'s (3 mutations)
291.65 s
[really-safe-money-gen] coverage (496/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(>=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is transitive for "valid (AccountOf * ADA)"'s (3 mutations)
291.90 s
[really-safe-money-gen] coverage (476/1610): Money\.AccountOfSpec.CHF.add.has a right-identity\: zero (28 mutations)
291.91 s
[really-safe-money-gen] coverage (475/1610): Money\.AccountOfSpec.CHF.add.matches what you would get with Integer, if nothing fails (27 mutations)
292.02 s
[really-safe-money-gen] coverage (477/1610): Money\.AccountOfSpec.CHF.add.is commutative (27 mutations)
292.13 s
[really-safe-money-gen] coverage (471/1610): Money\.AccountOfSpec.CHF.CHF.rate.produces valid amounts (15 mutations)
292.37 s
[really-safe-money-gen] coverage (473/1610): Money\.AccountOfSpec.CHF.add.is associative when both succeed (27 mutations)
292.45 s
[really-safe-money-gen] coverage (472/1610): Money\.AccountOfSpec.CHF.CHF.convert.produces valid amounts (27 mutations)
292.54 s
[really-safe-money-gen] coverage (474/1610): Money\.AccountOfSpec.CHF.add.has a left-identity\: zero (28 mutations)
292.76 s
[really-safe-money-gen] coverage (470/1610): Money\.AccountOfSpec.CHF.subtract.matches what you would get with Integer, if nothing fails (27 mutations)
293.00 s
[really-safe-money-gen] coverage (504/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(<) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is transitive for "valid (AccountOf * ADA)"'s (3 mutations)
293.10 s
[really-safe-money-gen] coverage (506/1610): Money\.AccountOfSpec.ADA.fromAmountOf.produces valid AccountOfs (1 mutations)
293.11 s
[really-safe-money-gen] coverage (507/1610): Money\.AccountOfSpec.ADA.toRational.produces valid Rationals when the quantisation factor is nonzero (3 mutations)
293.13 s
[really-safe-money-gen] coverage (505/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(<) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is antireflexive for "valid (AccountOf * ADA)"'s (3 mutations)
293.35 s
[really-safe-money-gen] coverage (501/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(>) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AccountOf * ADA)"'s (3 mutations)
293.56 s
[really-safe-money-gen] coverage (511/1610): Money\.AccountOfSpec.ADA.distribute.Eq (Distribution (AccountOf * ADA)).(==) \:\: (Distribution (AccountOf * ADA)) -> (Distribution (AccountOf * ADA)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AccountOf * ADA))"s (3 mutations)
293.58 s
[really-safe-money-gen] coverage (508/1610): Money\.AccountOfSpec.ADA.distribute.Eq (Distribution (AccountOf * ADA)).(==) \:\: (Distribution (AccountOf * ADA)) -> (Distribution (AccountOf * ADA)) -> Bool.is reflexive for "valid (Distribution (AccountOf * ADA))"s (3 mutations)
293.90 s
[really-safe-money-gen] coverage (502/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA)."max \:\: (AccountOf * ADA -> AccountOf * ADA -> AccountOf * ADA)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AccountOf * ADA)"'s (3 mutations)
294.44 s
[really-safe-money-gen] coverage (509/1610): Money\.AccountOfSpec.ADA.distribute.Eq (Distribution (AccountOf * ADA)).(==) \:\: (Distribution (AccountOf * ADA)) -> (Distribution (AccountOf * ADA)) -> Bool.is transitive for "valid (Distribution (AccountOf * ADA))"s (3 mutations)
294.98 s
[really-safe-money-gen] coverage (499/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(>) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is antireflexive for "valid (AccountOf * ADA)"'s (3 mutations)
295.23 s
[really-safe-money-gen] coverage (503/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(<) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AccountOf * ADA)"'s (3 mutations)
298.35 s
[really-safe-money-gen] coverage (512/1610): Money\.AccountOfSpec.ADA.distribute.Eq (Distribution (AccountOf * ADA)).(/=) \:\: (Distribution (AccountOf * ADA)) -> (Distribution (AccountOf * ADA)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AccountOf * ADA))"s (3 mutations)
300.71 s
[really-safe-money-gen] coverage (498/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA)."min \:\: (AccountOf * ADA -> AccountOf * ADA -> AccountOf * ADA)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AccountOf * ADA)"'s (3 mutations)
300.76 s
[really-safe-money-gen] coverage (500/1610): Money\.AccountOfSpec.ADA.Ord (AccountOf * ADA).(>) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is transitive for "valid (AccountOf * ADA)"'s (3 mutations)
300.83 s
[really-safe-money-gen] coverage (513/1610): Money\.AccountOfSpec.ADA.distribute.Eq (Distribution (AccountOf * ADA)).(/=) \:\: (Distribution (AccountOf * ADA)) -> (Distribution (AccountOf * ADA)) -> Bool.is antireflexive for "valid (Distribution (AccountOf * ADA))"s (3 mutations)
301.14 s
[really-safe-money-gen] coverage (514/1610): Money\.AccountOfSpec.ADA.distribute.Show (Distribution (AccountOf * ADA)) and Read (Distribution (AccountOf * ADA)).are implemented such that read \. show == id for valid values (3 mutations)
301.18 s
[really-safe-money-gen] coverage (515/1610): Money\.AccountOfSpec.ADA.distribute.produces valid amounts (34 mutations)
301.20 s
[really-safe-money-gen] coverage (516/1610): Money\.AccountOfSpec.ADA.distribute.produces results that sum up to the greater whole (64 mutations)
301.35 s
[really-safe-money-gen] coverage (521/1610): Money\.AccountOfSpec.ADA.Eq (AccountOf * ADA).(==) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is transitive for "valid (AccountOf * ADA)"s (3 mutations)
301.47 s
[really-safe-money-gen] coverage (520/1610): Money\.AccountOfSpec.ADA.Eq (AccountOf * ADA).(==) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is reflexive for "valid (AccountOf * ADA)"s (3 mutations)
301.75 s
[really-safe-money-gen] coverage (522/1610): Money\.AccountOfSpec.ADA.Eq (AccountOf * ADA).(==) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is symmetric for "valid (AccountOf * ADA)"s (3 mutations)
301.84 s
[really-safe-money-gen] coverage (517/1610): Money\.AccountOfSpec.ADA.toDouble.produces valid Doubles when the quantisation factor is nonzero (3 mutations)
301.92 s
[really-safe-money-gen] coverage (524/1610): Money\.AccountOfSpec.ADA.abs.produces valid amounts (1 mutations)
301.92 s
[really-safe-money-gen] coverage (523/1610): Money\.AccountOfSpec.ADA.Eq (AccountOf * ADA).(==) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AccountOf * ADA)"s (3 mutations)
302.28 s
[really-safe-money-gen] coverage (525/1610): Money\.AccountOfSpec.ADA.format.produces valid strings (6 mutations)
302.28 s
[really-safe-money-gen] coverage (526/1610): Money\.AccountOfSpec.ADA.subtract.matches what you would get with Integer, if nothing fails (27 mutations)
302.39 s
[really-safe-money-gen] coverage (528/1610): Money\.AccountOfSpec.ADA.CHF.rate.produces valid amounts (15 mutations)
302.73 s
[really-safe-money-gen] coverage (529/1610): Money\.AccountOfSpec.ADA.CHF.convert.produces valid amounts (27 mutations)
302.82 s
[really-safe-money-gen] coverage (530/1610): Money\.AccountOfSpec.ADA.INR.rate.produces valid amounts (15 mutations)
302.95 s
[really-safe-money-gen] coverage (532/1610): Money\.AccountOfSpec.ADA.fromAmount.produces valid AccountOfs (1 mutations)
303.00 s
[really-safe-money-gen] coverage (536/1610): Money\.AccountOfSpec.ADA.ADA.convert.produces valid amounts (27 mutations)
303.02 s
[really-safe-money-gen] coverage (531/1610): Money\.AccountOfSpec.ADA.INR.convert.produces valid amounts (27 mutations)
303.28 s
[really-safe-money-gen] coverage (537/1610): Money\.AccountOfSpec.ADA.ADA.rate.produces valid amounts (15 mutations)
303.40 s
[really-safe-money-gen] coverage (535/1610): Money\.AccountOfSpec.ADA.toMinimalQuantisations.produces valid accounts (3 mutations)
303.43 s
[really-safe-money-gen] coverage (533/1610): Money\.AccountOfSpec.ADA.sum.matches what you would get with Integer, if nothing fails (28 mutations)
303.66 s
[really-safe-money-gen] coverage (538/1610): Money\.AccountOfSpec.ADA.add.matches what you would get with Integer, if nothing fails (27 mutations)
304.19 s
[really-safe-money-gen] coverage (539/1610): Money\.AccountOfSpec.ADA.add.produces valid amounts (27 mutations)
304.88 s
[really-safe-money-gen] coverage (541/1610): Money\.AccountOfSpec.ADA.add.is associative when both succeed (27 mutations)
305.19 s
[really-safe-money-gen] coverage (534/1610): Money\.AccountOfSpec.ADA.sum.produces valid amounts (28 mutations)
307.84 s
[really-safe-money-gen] coverage (519/1610): Money\.AccountOfSpec.ADA.Eq (AccountOf * ADA).(/=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AccountOf * ADA)"s (3 mutations)
309.99 s
[really-safe-money-gen] coverage (540/1610): Money\.AccountOfSpec.ADA.add.is commutative (27 mutations)
310.09 s
[really-safe-money-gen] coverage (546/1610): Money\.AccountOfSpec.ADA.BTC.rate.produces valid amounts (15 mutations)
310.20 s
[really-safe-money-gen] coverage (527/1610): Money\.AccountOfSpec.ADA.negate.produces valid amounts (1 mutations)
310.35 s
[really-safe-money-gen] coverage (547/1610): Money\.AccountOfSpec.ADA.multiply.produces valid amounts (20 mutations)
310.50 s
[really-safe-money-gen] coverage (548/1610): Money\.AccountOfSpec.ADA.multiply.is distributive with add when both succeed (44 mutations)
310.61 s
[really-safe-money-gen] coverage (549/1610): Money\.AccountOfSpec.ADA.multiply.has an identity\: 1 (20 mutations)
310.66 s
[really-safe-money-gen] coverage (550/1610): Money\.AccountOfSpec.ADA.multiply.matches what you would get with Integer, if nothing fails (20 mutations)
310.76 s
[really-safe-money-gen] coverage (551/1610): Money\.AccountOfSpec.ADA.multiply.is absorbed by 0 (20 mutations)
310.95 s
[really-safe-money-gen] coverage (553/1610): Money\.AccountOfSpec.ADA.USD.rate.produces valid amounts (15 mutations)
310.97 s
[really-safe-money-gen] coverage (552/1610): Money\.AccountOfSpec.ADA.USD.convert.produces valid amounts (27 mutations)
311.11 s
[really-safe-money-gen] coverage (554/1610): Money\.AccountOfSpec.BTC.add.is commutative (27 mutations)
311.13 s
[really-safe-money-gen] coverage (518/1610): Money\.AccountOfSpec.ADA.Eq (AccountOf * ADA).(/=) \:\: (AccountOf * ADA) -> (AccountOf * ADA) -> Bool.is antireflexive for "valid (AccountOf * ADA)"s (3 mutations)
311.50 s
[really-safe-money-gen] coverage (555/1610): Money\.AccountOfSpec.BTC.add.produces valid amounts (27 mutations)
311.56 s
[really-safe-money-gen] coverage (556/1610): Money\.AccountOfSpec.BTC.add.has a left-identity\: zero (28 mutations)
311.60 s
[really-safe-money-gen] coverage (510/1610): Money\.AccountOfSpec.ADA.distribute.Eq (Distribution (AccountOf * ADA)).(==) \:\: (Distribution (AccountOf * ADA)) -> (Distribution (AccountOf * ADA)) -> Bool.is symmetric for "valid (Distribution (AccountOf * ADA))"s (3 mutations)
312.00 s
[really-safe-money-gen] coverage (558/1610): Money\.AccountOfSpec.BTC.add.is associative when both succeed (27 mutations)
312.11 s
[really-safe-money-gen] coverage (559/1610): Money\.AccountOfSpec.BTC.add.matches what you would get with Integer, if nothing fails (27 mutations)
312.17 s
[really-safe-money-gen] coverage (564/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(<=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is antisymmetric for "valid (AccountOf * BTC)"'s (3 mutations)
312.24 s
[really-safe-money-gen] coverage (560/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(>) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AccountOf * BTC)"'s (3 mutations)
312.25 s
[really-safe-money-gen] coverage (561/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(>) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is transitive for "valid (AccountOf * BTC)"'s (3 mutations)
312.50 s
[really-safe-money-gen] coverage (562/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(>) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is antireflexive for "valid (AccountOf * BTC)"'s (3 mutations)
312.57 s
[really-safe-money-gen] coverage (563/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(<=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AccountOf * BTC)"'s (3 mutations)
312.58 s
[really-safe-money-gen] coverage (565/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(<=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is reflexive for "valid (AccountOf * BTC)"'s (3 mutations)
312.83 s
[really-safe-money-gen] coverage (557/1610): Money\.AccountOfSpec.BTC.add.has a right-identity\: zero (28 mutations)
313.35 s
[really-safe-money-gen] coverage (566/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(<=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is transitive for "valid (AccountOf * BTC)"'s (3 mutations)
313.72 s
[really-safe-money-gen] coverage (545/1610): Money\.AccountOfSpec.ADA.BTC.convert.produces valid amounts (27 mutations)
314.21 s
[really-safe-money-gen] coverage (568/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(<) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AccountOf * BTC)"'s (3 mutations)
316.86 s
[really-safe-money-gen] coverage (458/1610): Money\.AccountOfSpec.CHF.Ord (AccountOf * CHF).(<=) \:\: (AccountOf * CHF) -> (AccountOf * CHF) -> Bool.is antisymmetric for "valid (AccountOf * CHF)"'s (3 mutations)
319.02 s
[really-safe-money-gen] coverage (542/1610): Money\.AccountOfSpec.ADA.add.has a left-identity\: zero (28 mutations)
319.05 s
[really-safe-money-gen] coverage (569/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(<) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is antireflexive for "valid (AccountOf * BTC)"'s (3 mutations)
319.26 s
[really-safe-money-gen] coverage (570/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC)."min \:\: (AccountOf * BTC -> AccountOf * BTC -> AccountOf * BTC)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AccountOf * BTC)"'s (3 mutations)
319.40 s
[really-safe-money-gen] coverage (571/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC)."max \:\: (AccountOf * BTC -> AccountOf * BTC -> AccountOf * BTC)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AccountOf * BTC)"'s (3 mutations)
319.43 s
[really-safe-money-gen] coverage (544/1610): Money\.AccountOfSpec.ADA.GenValid (AccountOf * ADA).genValid \:\: Gen (AccountOf * ADA).only generates valid '(AccountOf * ADA)'s (1 mutations)
319.66 s
[really-safe-money-gen] coverage (572/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(>=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is antisymmetric for "valid (AccountOf * BTC)"'s (3 mutations)
319.72 s
[really-safe-money-gen] coverage (573/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(>=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AccountOf * BTC)"'s (3 mutations)
319.78 s
[really-safe-money-gen] coverage (574/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(>=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is transitive for "valid (AccountOf * BTC)"'s (3 mutations)
319.80 s
[really-safe-money-gen] coverage (567/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(<) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is transitive for "valid (AccountOf * BTC)"'s (3 mutations)
320.10 s
[really-safe-money-gen] coverage (575/1610): Money\.AccountOfSpec.BTC.Ord (AccountOf * BTC).(>=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is reflexive for "valid (AccountOf * BTC)"'s (3 mutations)
320.22 s
[really-safe-money-gen] coverage (576/1610): Money\.AccountOfSpec.BTC.BTC.convert.produces valid amounts (27 mutations)
320.25 s
[really-safe-money-gen] coverage (543/1610): Money\.AccountOfSpec.ADA.add.has a right-identity\: zero (28 mutations)
320.44 s
[really-safe-money-gen] coverage (577/1610): Money\.AccountOfSpec.BTC.BTC.rate.produces valid amounts (15 mutations)
320.63 s
[really-safe-money-gen] coverage (579/1610): Money\.AccountOfSpec.BTC.distribute.produces results that sum up to the greater whole (64 mutations)
320.76 s
[really-safe-money-gen] coverage (580/1610): Money\.AccountOfSpec.BTC.distribute.Show (Distribution (AccountOf * BTC)) and Read (Distribution (AccountOf * BTC)).are implemented such that read \. show == id for valid values (3 mutations)
320.94 s
[really-safe-money-gen] coverage (583/1610): Money\.AccountOfSpec.BTC.distribute.Eq (Distribution (AccountOf * BTC)).(==) \:\: (Distribution (AccountOf * BTC)) -> (Distribution (AccountOf * BTC)) -> Bool.is symmetric for "valid (Distribution (AccountOf * BTC))"s (3 mutations)
321.08 s
[really-safe-money-gen] coverage (578/1610): Money\.AccountOfSpec.BTC.distribute.produces valid amounts (34 mutations)
321.12 s
[really-safe-money-gen] coverage (588/1610): Money\.AccountOfSpec.BTC.negate.produces valid amounts (1 mutations)
321.24 s
[really-safe-money-gen] coverage (584/1610): Money\.AccountOfSpec.BTC.distribute.Eq (Distribution (AccountOf * BTC)).(==) \:\: (Distribution (AccountOf * BTC)) -> (Distribution (AccountOf * BTC)) -> Bool.is transitive for "valid (Distribution (AccountOf * BTC))"s (3 mutations)
321.31 s
[really-safe-money-gen] coverage (591/1610): Money\.AccountOfSpec.BTC.multiply.is distributive with add when both succeed (44 mutations)
321.44 s
[really-safe-money-gen] coverage (592/1610): Money\.AccountOfSpec.BTC.multiply.is absorbed by 0 (20 mutations)
321.75 s
[really-safe-money-gen] coverage (582/1610): Money\.AccountOfSpec.BTC.distribute.Eq (Distribution (AccountOf * BTC)).(==) \:\: (Distribution (AccountOf * BTC)) -> (Distribution (AccountOf * BTC)) -> Bool.is reflexive for "valid (Distribution (AccountOf * BTC))"s (3 mutations)
321.84 s
[really-safe-money-gen] coverage (596/1610): Money\.AccountOfSpec.BTC.sum.matches what you would get with Integer, if nothing fails (28 mutations)
321.85 s
[really-safe-money-gen] coverage (595/1610): Money\.AccountOfSpec.BTC.sum.produces valid amounts (28 mutations)
322.50 s
[really-safe-money-gen] coverage (597/1610): Money\.AccountOfSpec.BTC.Eq (AccountOf * BTC).(==) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is reflexive for "valid (AccountOf * BTC)"s (3 mutations)
322.91 s
[really-safe-money-gen] coverage (598/1610): Money\.AccountOfSpec.BTC.Eq (AccountOf * BTC).(==) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is transitive for "valid (AccountOf * BTC)"s (3 mutations)
323.48 s
[really-safe-money-gen] coverage (599/1610): Money\.AccountOfSpec.BTC.Eq (AccountOf * BTC).(==) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AccountOf * BTC)"s (3 mutations)
326.74 s
[really-safe-money-gen] coverage (600/1610): Money\.AccountOfSpec.BTC.Eq (AccountOf * BTC).(==) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is symmetric for "valid (AccountOf * BTC)"s (3 mutations)
328.96 s
[really-safe-money-gen] coverage (601/1610): Money\.AccountOfSpec.BTC.Eq (AccountOf * BTC).(/=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is antireflexive for "valid (AccountOf * BTC)"s (3 mutations)
329.04 s
[really-safe-money-gen] coverage (606/1610): Money\.AccountOfSpec.BTC.subtract.matches what you would get with Integer, if nothing fails (27 mutations)
329.05 s
[really-safe-money-gen] coverage (603/1610): Money\.AccountOfSpec.BTC.format.produces valid strings (6 mutations)
329.20 s
[really-safe-money-gen] coverage (602/1610): Money\.AccountOfSpec.BTC.Eq (AccountOf * BTC).(/=) \:\: (AccountOf * BTC) -> (AccountOf * BTC) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AccountOf * BTC)"s (3 mutations)
329.26 s
[really-safe-money-gen] coverage (610/1610): Money\.AccountOfSpec.BTC.fromRational.roundtrips with toRational (31 mutations)
329.51 s
[really-safe-money-gen] coverage (609/1610): Money\.AccountOfSpec.BTC.fromRational.produces valid rational (27 mutations)
329.55 s
[really-safe-money-gen] coverage (608/1610): Money\.AccountOfSpec.BTC.ADA.rate.produces valid amounts (15 mutations)
329.62 s
[really-safe-money-gen] coverage (612/1610): Money\.AccountOfSpec.BTC.toMinimalQuantisations.produces valid accounts (3 mutations)
329.68 s
[really-safe-money-gen] coverage (607/1610): Money\.AccountOfSpec.BTC.ADA.convert.produces valid amounts (27 mutations)
329.98 s
[really-safe-money-gen] coverage (616/1610): Money\.AccountOfSpec.BTC.INR.convert.produces valid amounts (27 mutations)
330.01 s
[really-safe-money-gen] coverage (613/1610): Money\.AccountOfSpec.BTC.GenValid (AccountOf * BTC).genValid \:\: Gen (AccountOf * BTC).only generates valid '(AccountOf * BTC)'s (1 mutations)
330.03 s
[really-safe-money-gen] coverage (619/1610): Money\.AccountOfSpec.BTC.fraction.produces valid amounts (39 mutations)
330.24 s
[really-safe-money-gen] coverage (618/1610): Money\.AccountOfSpec.BTC.fromDouble.produces valid rational (38 mutations)
330.35 s
[really-safe-money-gen] coverage (615/1610): Money\.AccountOfSpec.BTC.INR.rate.produces valid amounts (15 mutations)
330.69 s
[really-safe-money-gen] coverage (622/1610): Money\.AccountOfSpec.BTC.CHF.convert.produces valid amounts (27 mutations)
330.69 s
[really-safe-money-gen] coverage (620/1610): Money\.AccountOfSpec.BTC.fraction.Produces a result that can be multiplied back (38 mutations)
330.81 s
[really-safe-money-gen] coverage (626/1610): Money\.AccountOfSpec.BTC.abs.produces valid amounts (1 mutations)
330.87 s
[really-safe-money-gen] coverage (625/1610): Money\.AccountOfSpec.BTC.fromAmount.produces valid AccountOfs (1 mutations)
331.02 s
[really-safe-money-gen] coverage (624/1610): Money\.AccountOfSpec.BTC.fromMinimalQuantisations.produces valid accounts (14 mutations)
331.18 s
[really-safe-money-gen] coverage (627/1610): Money\.ConversionRateOfSpec.INR.ADA.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
331.34 s
[really-safe-money-gen] coverage (623/1610): Money\.AccountOfSpec.BTC.fromMinimalQuantisations.roundtrips with toMinimalQuantisations (16 mutations)
331.59 s
[really-safe-money-gen] coverage (628/1610): Money\.ConversionRateOfSpec.INR.ADA.Ratio.fromRatio.produces valid conversion rates (6 mutations)
331.62 s
[really-safe-money-gen] coverage (629/1610): Money\.ConversionRateOfSpec.INR.ADA.Ratio.toRatio.produces valid ratios (0 mutations)
331.66 s
[really-safe-money-gen] coverage (614/1610): Money\.AccountOfSpec.BTC.toRational.produces valid Rationals when the quantisation factor is nonzero (3 mutations)
332.23 s
[really-safe-money-gen] coverage (630/1610): Money\.ConversionRateOfSpec.INR.ADA.GenValid (ConversionRateOf INR ADA).genValid \:\: Gen (ConversionRateOf INR ADA).only generates valid '(ConversionRateOf INR ADA)'s (6 mutations)
332.57 s
[really-safe-money-gen] coverage (631/1610): Money\.ConversionRateOfSpec.INR.ADA.Rational.toRational.produces valid rationals (0 mutations)
333.06 s
[really-safe-money-gen] coverage (632/1610): Money\.ConversionRateOfSpec.INR.ADA.Rational.fromRational.produces valid conversion rates (13 mutations)
336.39 s
[really-safe-money-gen] coverage (633/1610): Money\.ConversionRateOfSpec.INR.ADA.Rational.fromRational.roundtrips with toRational (13 mutations)
338.49 s
[really-safe-money-gen] coverage (634/1610): Money\.ConversionRateOfSpec.INR.ADA.compose.produces valid rates (8 mutations)
338.64 s
[really-safe-money-gen] coverage (594/1610): Money\.AccountOfSpec.BTC.multiply.matches what you would get with Integer, if nothing fails (20 mutations)
338.82 s
[really-safe-money-gen] coverage (605/1610): Money\.AccountOfSpec.BTC.USD.rate.produces valid amounts (15 mutations)
338.97 s
[really-safe-money-gen] coverage (635/1610): Money\.ConversionRateOfSpec.INR.ADA.invert.produces valid rates (8 mutations)
339.14 s
[really-safe-money-gen] coverage (636/1610): Money\.ConversionRateOfSpec.INR.ADA.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
339.21 s
[really-safe-money-gen] coverage (611/1610): Money\.AccountOfSpec.BTC.Show (AccountOf * BTC) and Read (AccountOf * BTC).are implemented such that read \. show == id for valid values (3 mutations)
339.46 s
[really-safe-money-gen] coverage (587/1610): Money\.AccountOfSpec.BTC.toDouble.produces valid Doubles when the quantisation factor is nonzero (3 mutations)
339.71 s
[really-safe-money-gen] coverage (617/1610): Money\.AccountOfSpec.BTC.fromDouble.roundtrips with toDouble (40 mutations)
339.84 s
[really-safe-money-gen] coverage (586/1610): Money\.AccountOfSpec.BTC.distribute.Eq (Distribution (AccountOf * BTC)).(/=) \:\: (Distribution (AccountOf * BTC)) -> (Distribution (AccountOf * BTC)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AccountOf * BTC))"s (3 mutations)
340.30 s
[really-safe-money-gen] coverage (590/1610): Money\.AccountOfSpec.BTC.multiply.produces valid amounts (20 mutations)
340.32 s
[really-safe-money-gen] coverage (581/1610): Money\.AccountOfSpec.BTC.distribute.Eq (Distribution (AccountOf * BTC)).(==) \:\: (Distribution (AccountOf * BTC)) -> (Distribution (AccountOf * BTC)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AccountOf * BTC))"s (3 mutations)
340.32 s
[really-safe-money-gen] coverage (621/1610): Money\.AccountOfSpec.BTC.CHF.rate.produces valid amounts (15 mutations)
340.32 s
[really-safe-money-gen] coverage (593/1610): Money\.AccountOfSpec.BTC.multiply.has an identity\: 1 (20 mutations)
340.39 s
[really-safe-money-gen] coverage (604/1610): Money\.AccountOfSpec.BTC.USD.convert.produces valid amounts (27 mutations)
340.87 s
[really-safe-money-gen] coverage (585/1610): Money\.AccountOfSpec.BTC.distribute.Eq (Distribution (AccountOf * BTC)).(/=) \:\: (Distribution (AccountOf * BTC)) -> (Distribution (AccountOf * BTC)) -> Bool.is antireflexive for "valid (Distribution (AccountOf * BTC))"s (3 mutations)
340.90 s
[really-safe-money-gen] coverage (643/1610): Money\.ConversionRateOfSpec.INR.BTC.compose.produces valid rates (8 mutations)
341.33 s
[really-safe-money-gen] coverage (645/1610): Money\.ConversionRateOfSpec.INR.BTC.Rational.fromRational.roundtrips with toRational (13 mutations)
341.37 s
[really-safe-money-gen] coverage (644/1610): Money\.ConversionRateOfSpec.INR.BTC.Rational.toRational.produces valid rationals (0 mutations)
341.97 s
[really-safe-money-gen] coverage (589/1610): Money\.AccountOfSpec.BTC.fromAmountOf.produces valid AccountOfs (1 mutations)
341.99 s
[really-safe-money-gen] coverage (646/1610): Money\.ConversionRateOfSpec.INR.BTC.Rational.fromRational.produces valid conversion rates (13 mutations)
342.31 s
[really-safe-money-gen] coverage (650/1610): Money\.ConversionRateOfSpec.INR.BTC.GenValid (ConversionRateOf INR BTC).genValid \:\: Gen (ConversionRateOf INR BTC).only generates valid '(ConversionRateOf INR BTC)'s (6 mutations)
342.59 s
[really-safe-money-gen] coverage (657/1610): Money\.ConversionRateOfSpec.INR.CHF.Rational.fromRational.roundtrips with toRational (13 mutations)
342.75 s
[really-safe-money-gen] coverage (648/1610): Money\.ConversionRateOfSpec.INR.BTC.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
343.37 s
[really-safe-money-gen] coverage (640/1610): Money\.ConversionRateOfSpec.INR.BTC.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
343.60 s
[really-safe-money-gen] coverage (653/1610): Money\.ConversionRateOfSpec.INR.CHF.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
343.63 s
[really-safe-money-gen] coverage (654/1610): Money\.ConversionRateOfSpec.INR.CHF.Ratio.toRatio.produces valid ratios (0 mutations)
344.37 s
[really-safe-money-gen] coverage (651/1610): Money\.ConversionRateOfSpec.INR.CHF.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
348.79 s
[really-safe-money-gen] coverage (649/1610): Money\.ConversionRateOfSpec.INR.BTC.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
350.16 s
[really-safe-money-gen] coverage (655/1610): Money\.ConversionRateOfSpec.INR.CHF.Ratio.fromRatio.produces valid conversion rates (6 mutations)
350.51 s
[really-safe-money-gen] coverage (642/1610): Money\.ConversionRateOfSpec.INR.BTC.invert.produces valid rates (8 mutations)
350.71 s
[really-safe-money-gen] coverage (639/1610): Money\.ConversionRateOfSpec.INR.BTC.Ratio.toRatio.produces valid ratios (0 mutations)
350.79 s
[really-safe-money-gen] coverage (647/1610): Money\.ConversionRateOfSpec.INR.BTC.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
350.86 s
[really-safe-money-gen] coverage (658/1610): Money\.ConversionRateOfSpec.INR.CHF.Rational.fromRational.produces valid conversion rates (13 mutations)
350.94 s
[really-safe-money-gen] coverage (652/1610): Money\.ConversionRateOfSpec.INR.CHF.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
351.26 s
[really-safe-money-gen] coverage (641/1610): Money\.ConversionRateOfSpec.INR.BTC.Ratio.fromRatio.produces valid conversion rates (6 mutations)
351.27 s
[really-safe-money-gen] coverage (662/1610): Money\.ConversionRateOfSpec.INR.CHF.GenValid (ConversionRateOf INR CHF).genValid \:\: Gen (ConversionRateOf INR CHF).only generates valid '(ConversionRateOf INR CHF)'s (6 mutations)
351.34 s
[really-safe-money-gen] coverage (656/1610): Money\.ConversionRateOfSpec.INR.CHF.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
351.58 s
[really-safe-money-gen] coverage (670/1610): Money\.ConversionRateOfSpec.INR.USD.Ratio.toRatio.produces valid ratios (0 mutations)
351.61 s
[really-safe-money-gen] coverage (671/1610): Money\.ConversionRateOfSpec.INR.USD.compose.produces valid rates (8 mutations)
351.63 s
[really-safe-money-gen] coverage (637/1610): Money\.ConversionRateOfSpec.INR.ADA.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
351.81 s
[really-safe-money-gen] coverage (669/1610): Money\.ConversionRateOfSpec.INR.USD.Ratio.fromRatio.produces valid conversion rates (6 mutations)
352.25 s
[really-safe-money-gen] coverage (638/1610): Money\.ConversionRateOfSpec.INR.ADA.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
352.60 s
[really-safe-money-gen] coverage (673/1610): Money\.ConversionRateOfSpec.INR.USD.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
352.88 s
[really-safe-money-gen] coverage (675/1610): Money\.ConversionRateOfSpec.INR.INR.Rational.toRational.produces valid rationals (0 mutations)
352.88 s
[really-safe-money-gen] coverage (674/1610): Money\.ConversionRateOfSpec.INR.USD.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
353.09 s
[really-safe-money-gen] coverage (677/1610): Money\.ConversionRateOfSpec.INR.INR.Rational.fromRational.produces valid conversion rates (13 mutations)
353.23 s
[really-safe-money-gen] coverage (672/1610): Money\.ConversionRateOfSpec.INR.USD.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
353.42 s
[really-safe-money-gen] coverage (676/1610): Money\.ConversionRateOfSpec.INR.INR.Rational.fromRational.roundtrips with toRational (13 mutations)
353.64 s
[really-safe-money-gen] coverage (678/1610): Money\.ConversionRateOfSpec.INR.INR.GenValid (ConversionRateOf INR INR).genValid \:\: Gen (ConversionRateOf INR INR).only generates valid '(ConversionRateOf INR INR)'s (6 mutations)
353.78 s
[really-safe-money-gen] coverage (680/1610): Money\.ConversionRateOfSpec.INR.INR.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
354.50 s
[really-safe-money-gen] coverage (683/1610): Money\.ConversionRateOfSpec.INR.INR.invert.produces valid rates (8 mutations)
354.54 s
[really-safe-money-gen] coverage (679/1610): Money\.ConversionRateOfSpec.INR.INR.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
354.62 s
[really-safe-money-gen] coverage (682/1610): Money\.ConversionRateOfSpec.INR.INR.compose.produces valid rates (8 mutations)
354.89 s
[really-safe-money-gen] coverage (684/1610): Money\.ConversionRateOfSpec.INR.INR.Ratio.fromRatio.produces valid conversion rates (6 mutations)
355.00 s
[really-safe-money-gen] coverage (681/1610): Money\.ConversionRateOfSpec.INR.INR.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
359.16 s
[really-safe-money-gen] coverage (685/1610): Money\.ConversionRateOfSpec.INR.INR.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
360.37 s
[really-safe-money-gen] coverage (686/1610): Money\.ConversionRateOfSpec.INR.INR.Ratio.toRatio.produces valid ratios (0 mutations)
360.79 s
[really-safe-money-gen] coverage (687/1610): Money\.ConversionRateOfSpec.ADA.USD.compose.produces valid rates (8 mutations)
361.02 s
[really-safe-money-gen] coverage (667/1610): Money\.ConversionRateOfSpec.INR.USD.invert.produces valid rates (8 mutations)
361.37 s
[really-safe-money-gen] coverage (688/1610): Money\.ConversionRateOfSpec.ADA.USD.Ratio.toRatio.produces valid ratios (0 mutations)
361.42 s
[really-safe-money-gen] coverage (665/1610): Money\.ConversionRateOfSpec.INR.USD.Rational.fromRational.produces valid conversion rates (13 mutations)
361.51 s
[really-safe-money-gen] coverage (661/1610): Money\.ConversionRateOfSpec.INR.CHF.compose.produces valid rates (8 mutations)
361.70 s
[really-safe-money-gen] coverage (666/1610): Money\.ConversionRateOfSpec.INR.USD.Rational.fromRational.roundtrips with toRational (13 mutations)
361.78 s
[really-safe-money-gen] coverage (660/1610): Money\.ConversionRateOfSpec.INR.CHF.invert.produces valid rates (8 mutations)
361.80 s
[really-safe-money-gen] coverage (663/1610): Money\.ConversionRateOfSpec.INR.USD.GenValid (ConversionRateOf INR USD).genValid \:\: Gen (ConversionRateOf INR USD).only generates valid '(ConversionRateOf INR USD)'s (6 mutations)
361.82 s
[really-safe-money-gen] coverage (668/1610): Money\.ConversionRateOfSpec.INR.USD.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
362.08 s
[really-safe-money-gen] coverage (659/1610): Money\.ConversionRateOfSpec.INR.CHF.Rational.toRational.produces valid rationals (0 mutations)
362.15 s
[really-safe-money-gen] coverage (693/1610): Money\.ConversionRateOfSpec.ADA.USD.Rational.fromRational.roundtrips with toRational (13 mutations)
362.23 s
[really-safe-money-gen] coverage (664/1610): Money\.ConversionRateOfSpec.INR.USD.Rational.toRational.produces valid rationals (0 mutations)
362.60 s
[really-safe-money-gen] coverage (694/1610): Money\.ConversionRateOfSpec.ADA.USD.Rational.toRational.produces valid rationals (0 mutations)
362.84 s
[really-safe-money-gen] coverage (695/1610): Money\.ConversionRateOfSpec.ADA.USD.GenValid (ConversionRateOf ADA USD).genValid \:\: Gen (ConversionRateOf ADA USD).only generates valid '(ConversionRateOf ADA USD)'s (6 mutations)
362.96 s
[really-safe-money-gen] coverage (691/1610): Money\.ConversionRateOfSpec.ADA.USD.invert.produces valid rates (8 mutations)
363.06 s
[really-safe-money-gen] coverage (692/1610): Money\.ConversionRateOfSpec.ADA.USD.Rational.fromRational.produces valid conversion rates (13 mutations)
363.31 s
[really-safe-money-gen] coverage (690/1610): Money\.ConversionRateOfSpec.ADA.USD.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
363.52 s
[really-safe-money-gen] coverage (689/1610): Money\.ConversionRateOfSpec.ADA.USD.Ratio.fromRatio.produces valid conversion rates (6 mutations)
364.01 s
[really-safe-money-gen] coverage (700/1610): Money\.ConversionRateOfSpec.ADA.CHF.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
364.27 s
[really-safe-money-gen] coverage (697/1610): Money\.ConversionRateOfSpec.ADA.USD.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
364.54 s
[really-safe-money-gen] coverage (699/1610): Money\.ConversionRateOfSpec.ADA.CHF.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
364.58 s
[really-safe-money-gen] coverage (702/1610): Money\.ConversionRateOfSpec.ADA.CHF.compose.produces valid rates (8 mutations)
364.75 s
[really-safe-money-gen] coverage (706/1610): Money\.ConversionRateOfSpec.ADA.CHF.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
364.96 s
[really-safe-money-gen] coverage (707/1610): Money\.ConversionRateOfSpec.ADA.CHF.Ratio.fromRatio.produces valid conversion rates (6 mutations)
365.08 s
[really-safe-money-gen] coverage (705/1610): Money\.ConversionRateOfSpec.ADA.CHF.Rational.fromRational.produces valid conversion rates (13 mutations)
365.18 s
[really-safe-money-gen] coverage (701/1610): Money\.ConversionRateOfSpec.ADA.CHF.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
369.08 s
[really-safe-money-gen] coverage (698/1610): Money\.ConversionRateOfSpec.ADA.USD.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
369.94 s
[really-safe-money-gen] coverage (704/1610): Money\.ConversionRateOfSpec.ADA.CHF.Rational.fromRational.roundtrips with toRational (13 mutations)
370.51 s
[really-safe-money-gen] coverage (703/1610): Money\.ConversionRateOfSpec.ADA.CHF.Rational.toRational.produces valid rationals (0 mutations)
370.88 s
[really-safe-money-gen] coverage (719/1610): Money\.ConversionRateOfSpec.ADA.ADA.Rational.fromRational.produces valid conversion rates (13 mutations)
370.93 s
[really-safe-money-gen] coverage (696/1610): Money\.ConversionRateOfSpec.ADA.USD.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
371.02 s
[really-safe-money-gen] coverage (718/1610): Money\.ConversionRateOfSpec.ADA.ADA.Rational.fromRational.roundtrips with toRational (13 mutations)
371.07 s
[really-safe-money-gen] coverage (715/1610): Money\.ConversionRateOfSpec.ADA.ADA.Ratio.fromRatio.produces valid conversion rates (6 mutations)
371.28 s
[really-safe-money-gen] coverage (721/1610): Money\.ConversionRateOfSpec.ADA.ADA.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
371.36 s
[really-safe-money-gen] coverage (716/1610): Money\.ConversionRateOfSpec.ADA.ADA.compose.produces valid rates (8 mutations)
371.64 s
[really-safe-money-gen] coverage (714/1610): Money\.ConversionRateOfSpec.ADA.ADA.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
371.68 s
[really-safe-money-gen] coverage (720/1610): Money\.ConversionRateOfSpec.ADA.ADA.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
371.78 s
[really-safe-money-gen] coverage (713/1610): Money\.ConversionRateOfSpec.ADA.ADA.Ratio.toRatio.produces valid ratios (0 mutations)
371.84 s
[really-safe-money-gen] coverage (710/1610): Money\.ConversionRateOfSpec.ADA.CHF.invert.produces valid rates (8 mutations)
371.94 s
[really-safe-money-gen] coverage (722/1610): Money\.ConversionRateOfSpec.ADA.ADA.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
372.14 s
[really-safe-money-gen] coverage (711/1610): Money\.ConversionRateOfSpec.ADA.ADA.GenValid (ConversionRateOf ADA ADA).genValid \:\: Gen (ConversionRateOf ADA ADA).only generates valid '(ConversionRateOf ADA ADA)'s (6 mutations)
372.30 s
[really-safe-money-gen] coverage (717/1610): Money\.ConversionRateOfSpec.ADA.ADA.Rational.toRational.produces valid rationals (0 mutations)
372.45 s
[really-safe-money-gen] coverage (712/1610): Money\.ConversionRateOfSpec.ADA.ADA.invert.produces valid rates (8 mutations)
372.63 s
[really-safe-money-gen] coverage (708/1610): Money\.ConversionRateOfSpec.ADA.CHF.Ratio.toRatio.produces valid ratios (0 mutations)
372.79 s
[really-safe-money-gen] coverage (709/1610): Money\.ConversionRateOfSpec.ADA.CHF.GenValid (ConversionRateOf ADA CHF).genValid \:\: Gen (ConversionRateOf ADA CHF).only generates valid '(ConversionRateOf ADA CHF)'s (6 mutations)
373.16 s
[really-safe-money-gen] coverage (726/1610): Money\.ConversionRateOfSpec.ADA.BTC.GenValid (ConversionRateOf ADA BTC).genValid \:\: Gen (ConversionRateOf ADA BTC).only generates valid '(ConversionRateOf ADA BTC)'s (6 mutations)
373.50 s
[really-safe-money-gen] coverage (728/1610): Money\.ConversionRateOfSpec.ADA.BTC.Rational.toRational.produces valid rationals (0 mutations)
373.99 s
[really-safe-money-gen] coverage (729/1610): Money\.ConversionRateOfSpec.ADA.BTC.Rational.fromRational.roundtrips with toRational (13 mutations)
374.18 s
[really-safe-money-gen] coverage (730/1610): Money\.ConversionRateOfSpec.ADA.BTC.Rational.fromRational.produces valid conversion rates (13 mutations)
374.21 s
[really-safe-money-gen] coverage (731/1610): Money\.ConversionRateOfSpec.ADA.BTC.compose.produces valid rates (8 mutations)
374.44 s
[really-safe-money-gen] coverage (727/1610): Money\.ConversionRateOfSpec.ADA.BTC.invert.produces valid rates (8 mutations)
374.69 s
[really-safe-money-gen] coverage (732/1610): Money\.ConversionRateOfSpec.ADA.BTC.Ratio.toRatio.produces valid ratios (0 mutations)
374.70 s
[really-safe-money-gen] coverage (725/1610): Money\.ConversionRateOfSpec.ADA.BTC.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
374.92 s
[really-safe-money-gen] coverage (735/1610): Money\.ConversionRateOfSpec.ADA.INR.GenValid (ConversionRateOf ADA INR).genValid \:\: Gen (ConversionRateOf ADA INR).only generates valid '(ConversionRateOf ADA INR)'s (6 mutations)
378.77 s
[really-safe-money-gen] coverage (736/1610): Money\.ConversionRateOfSpec.ADA.INR.Rational.fromRational.produces valid conversion rates (13 mutations)
379.66 s
[really-safe-money-gen] coverage (737/1610): Money\.ConversionRateOfSpec.ADA.INR.Rational.fromRational.roundtrips with toRational (13 mutations)
380.28 s
[really-safe-money-gen] coverage (734/1610): Money\.ConversionRateOfSpec.ADA.BTC.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
380.66 s
[really-safe-money-gen] coverage (740/1610): Money\.ConversionRateOfSpec.ADA.INR.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
380.73 s
[really-safe-money-gen] coverage (739/1610): Money\.ConversionRateOfSpec.ADA.INR.Ratio.toRatio.produces valid ratios (0 mutations)
380.80 s
[really-safe-money-gen] coverage (738/1610): Money\.ConversionRateOfSpec.ADA.INR.Rational.toRational.produces valid rationals (0 mutations)
381.04 s
[really-safe-money-gen] coverage (741/1610): Money\.ConversionRateOfSpec.ADA.INR.Ratio.fromRatio.produces valid conversion rates (6 mutations)
381.22 s
[really-safe-money-gen] coverage (724/1610): Money\.ConversionRateOfSpec.ADA.BTC.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
381.51 s
[really-safe-money-gen] coverage (745/1610): Money\.ConversionRateOfSpec.ADA.INR.compose.produces valid rates (8 mutations)
381.54 s
[really-safe-money-gen] coverage (733/1610): Money\.ConversionRateOfSpec.ADA.BTC.Ratio.fromRatio.produces valid conversion rates (6 mutations)
381.61 s
[really-safe-money-gen] coverage (748/1610): Money\.ConversionRateOfSpec.CHF.BTC.Rational.fromRational.roundtrips with toRational (13 mutations)
381.84 s
[really-safe-money-gen] coverage (749/1610): Money\.ConversionRateOfSpec.CHF.BTC.Rational.fromRational.produces valid conversion rates (13 mutations)
381.85 s
[really-safe-money-gen] coverage (742/1610): Money\.ConversionRateOfSpec.ADA.INR.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
382.13 s
[really-safe-money-gen] coverage (723/1610): Money\.ConversionRateOfSpec.ADA.BTC.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
382.13 s
[really-safe-money-gen] coverage (751/1610): Money\.ConversionRateOfSpec.CHF.BTC.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
382.48 s
[really-safe-money-gen] coverage (747/1610): Money\.ConversionRateOfSpec.CHF.BTC.Rational.toRational.produces valid rationals (0 mutations)
382.56 s
[really-safe-money-gen] coverage (750/1610): Money\.ConversionRateOfSpec.CHF.BTC.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
382.83 s
[really-safe-money-gen] coverage (752/1610): Money\.ConversionRateOfSpec.CHF.BTC.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
382.86 s
[really-safe-money-gen] coverage (743/1610): Money\.ConversionRateOfSpec.ADA.INR.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
383.21 s
[really-safe-money-gen] coverage (744/1610): Money\.ConversionRateOfSpec.ADA.INR.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
383.23 s
[really-safe-money-gen] coverage (756/1610): Money\.ConversionRateOfSpec.CHF.BTC.Ratio.toRatio.produces valid ratios (0 mutations)
383.72 s
[really-safe-money-gen] coverage (758/1610): Money\.ConversionRateOfSpec.CHF.BTC.GenValid (ConversionRateOf CHF BTC).genValid \:\: Gen (ConversionRateOf CHF BTC).only generates valid '(ConversionRateOf CHF BTC)'s (6 mutations)
383.90 s
[really-safe-money-gen] coverage (759/1610): Money\.ConversionRateOfSpec.CHF.ADA.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
384.20 s
[really-safe-money-gen] coverage (762/1610): Money\.ConversionRateOfSpec.CHF.ADA.invert.produces valid rates (8 mutations)
384.42 s
[really-safe-money-gen] coverage (763/1610): Money\.ConversionRateOfSpec.CHF.ADA.Ratio.toRatio.produces valid ratios (0 mutations)
384.61 s
[really-safe-money-gen] coverage (760/1610): Money\.ConversionRateOfSpec.CHF.ADA.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
384.67 s
[really-safe-money-gen] coverage (765/1610): Money\.ConversionRateOfSpec.CHF.ADA.Ratio.fromRatio.produces valid conversion rates (6 mutations)
384.80 s
[really-safe-money-gen] coverage (761/1610): Money\.ConversionRateOfSpec.CHF.ADA.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
387.81 s
[really-safe-money-gen] coverage (746/1610): Money\.ConversionRateOfSpec.ADA.INR.invert.produces valid rates (8 mutations)
388.80 s
[really-safe-money-gen] coverage (766/1610): Money\.ConversionRateOfSpec.CHF.ADA.compose.produces valid rates (8 mutations)
389.35 s
[really-safe-money-gen] coverage (770/1610): Money\.ConversionRateOfSpec.CHF.ADA.Rational.fromRational.produces valid conversion rates (13 mutations)
389.40 s
[really-safe-money-gen] coverage (769/1610): Money\.ConversionRateOfSpec.CHF.ADA.Rational.fromRational.roundtrips with toRational (13 mutations)
389.66 s
[really-safe-money-gen] coverage (767/1610): Money\.ConversionRateOfSpec.CHF.ADA.GenValid (ConversionRateOf CHF ADA).genValid \:\: Gen (ConversionRateOf CHF ADA).only generates valid '(ConversionRateOf CHF ADA)'s (6 mutations)
389.68 s
[really-safe-money-gen] coverage (757/1610): Money\.ConversionRateOfSpec.CHF.BTC.invert.produces valid rates (8 mutations)
390.05 s
[really-safe-money-gen] coverage (768/1610): Money\.ConversionRateOfSpec.CHF.ADA.Rational.toRational.produces valid rationals (0 mutations)
390.07 s
[really-safe-money-gen] coverage (755/1610): Money\.ConversionRateOfSpec.CHF.BTC.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
390.28 s
[really-safe-money-gen] coverage (754/1610): Money\.ConversionRateOfSpec.CHF.BTC.Ratio.fromRatio.produces valid conversion rates (6 mutations)
390.60 s
[really-safe-money-gen] coverage (753/1610): Money\.ConversionRateOfSpec.CHF.BTC.compose.produces valid rates (8 mutations)
390.67 s
[really-safe-money-gen] coverage (764/1610): Money\.ConversionRateOfSpec.CHF.ADA.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
391.11 s
[really-safe-money-gen] coverage (777/1610): Money\.ConversionRateOfSpec.CHF.USD.Rational.fromRational.produces valid conversion rates (13 mutations)
391.15 s
[really-safe-money-gen] coverage (776/1610): Money\.ConversionRateOfSpec.CHF.USD.compose.produces valid rates (8 mutations)
391.31 s
[really-safe-money-gen] coverage (774/1610): Money\.ConversionRateOfSpec.CHF.USD.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
391.38 s
[really-safe-money-gen] coverage (773/1610): Money\.ConversionRateOfSpec.CHF.USD.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
391.39 s
[really-safe-money-gen] coverage (778/1610): Money\.ConversionRateOfSpec.CHF.USD.Rational.fromRational.roundtrips with toRational (13 mutations)
391.50 s
[really-safe-money-gen] coverage (779/1610): Money\.ConversionRateOfSpec.CHF.USD.Rational.toRational.produces valid rationals (0 mutations)
391.74 s
[really-safe-money-gen] coverage (781/1610): Money\.ConversionRateOfSpec.CHF.USD.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
391.76 s
[really-safe-money-gen] coverage (782/1610): Money\.ConversionRateOfSpec.CHF.USD.Ratio.toRatio.produces valid ratios (0 mutations)
392.02 s
[really-safe-money-gen] coverage (772/1610): Money\.ConversionRateOfSpec.CHF.USD.GenValid (ConversionRateOf CHF USD).genValid \:\: Gen (ConversionRateOf CHF USD).only generates valid '(ConversionRateOf CHF USD)'s (6 mutations)
392.23 s
[really-safe-money-gen] coverage (783/1610): Money\.ConversionRateOfSpec.CHF.CHF.GenValid (ConversionRateOf CHF CHF).genValid \:\: Gen (ConversionRateOf CHF CHF).only generates valid '(ConversionRateOf CHF CHF)'s (6 mutations)
392.58 s
[really-safe-money-gen] coverage (775/1610): Money\.ConversionRateOfSpec.CHF.USD.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
392.79 s
[really-safe-money-gen] coverage (780/1610): Money\.ConversionRateOfSpec.CHF.USD.Ratio.fromRatio.produces valid conversion rates (6 mutations)
393.26 s
[really-safe-money-gen] coverage (784/1610): Money\.ConversionRateOfSpec.CHF.CHF.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
393.42 s
[really-safe-money-gen] coverage (786/1610): Money\.ConversionRateOfSpec.CHF.CHF.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
393.67 s
[really-safe-money-gen] coverage (787/1610): Money\.ConversionRateOfSpec.CHF.CHF.Rational.toRational.produces valid rationals (0 mutations)
393.71 s
[really-safe-money-gen] coverage (771/1610): Money\.ConversionRateOfSpec.CHF.USD.invert.produces valid rates (8 mutations)
393.75 s
[really-safe-money-gen] coverage (788/1610): Money\.ConversionRateOfSpec.CHF.CHF.Rational.fromRational.produces valid conversion rates (13 mutations)
396.67 s
[really-safe-money-gen] coverage (793/1610): Money\.ConversionRateOfSpec.CHF.CHF.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
397.74 s
[really-safe-money-gen] coverage (792/1610): Money\.ConversionRateOfSpec.CHF.CHF.Ratio.fromRatio.produces valid conversion rates (6 mutations)
398.14 s
[really-safe-money-gen] coverage (791/1610): Money\.ConversionRateOfSpec.CHF.CHF.Ratio.toRatio.produces valid ratios (0 mutations)
398.31 s
[really-safe-money-gen] coverage (795/1610): Money\.ConversionRateOfSpec.CHF.INR.Ratio.toRatio.produces valid ratios (0 mutations)
398.74 s
[really-safe-money-gen] coverage (797/1610): Money\.ConversionRateOfSpec.CHF.INR.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
398.74 s
[really-safe-money-gen] coverage (798/1610): Money\.ConversionRateOfSpec.CHF.INR.compose.produces valid rates (8 mutations)
399.09 s
[really-safe-money-gen] coverage (804/1610): Money\.ConversionRateOfSpec.CHF.INR.Rational.fromRational.roundtrips with toRational (13 mutations)
399.25 s
[really-safe-money-gen] coverage (808/1610): Money\.ConversionRateOfSpec.USD.CHF.invert.produces valid rates (8 mutations)
399.62 s
[really-safe-money-gen] coverage (807/1610): Money\.ConversionRateOfSpec.USD.CHF.GenValid (ConversionRateOf USD CHF).genValid \:\: Gen (ConversionRateOf USD CHF).only generates valid '(ConversionRateOf USD CHF)'s (6 mutations)
400.05 s
[really-safe-money-gen] coverage (796/1610): Money\.ConversionRateOfSpec.CHF.INR.Ratio.fromRatio.produces valid conversion rates (6 mutations)
400.30 s
[really-safe-money-gen] coverage (810/1610): Money\.ConversionRateOfSpec.USD.CHF.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
400.46 s
[really-safe-money-gen] coverage (809/1610): Money\.ConversionRateOfSpec.USD.CHF.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
400.61 s
[really-safe-money-gen] coverage (803/1610): Money\.ConversionRateOfSpec.CHF.INR.GenValid (ConversionRateOf CHF INR).genValid \:\: Gen (ConversionRateOf CHF INR).only generates valid '(ConversionRateOf CHF INR)'s (6 mutations)
400.66 s
[really-safe-money-gen] coverage (812/1610): Money\.ConversionRateOfSpec.USD.CHF.Rational.toRational.produces valid rationals (0 mutations)
400.67 s
[really-safe-money-gen] coverage (814/1610): Money\.ConversionRateOfSpec.USD.CHF.Rational.fromRational.produces valid conversion rates (13 mutations)
400.88 s
[really-safe-money-gen] coverage (813/1610): Money\.ConversionRateOfSpec.USD.CHF.Rational.fromRational.roundtrips with toRational (13 mutations)
400.91 s
[really-safe-money-gen] coverage (818/1610): Money\.ConversionRateOfSpec.USD.CHF.compose.produces valid rates (8 mutations)
401.11 s
[really-safe-money-gen] coverage (811/1610): Money\.ConversionRateOfSpec.USD.CHF.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
401.13 s
[really-safe-money-gen] coverage (815/1610): Money\.ConversionRateOfSpec.USD.CHF.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
401.35 s
[really-safe-money-gen] coverage (817/1610): Money\.ConversionRateOfSpec.USD.CHF.Ratio.toRatio.produces valid ratios (0 mutations)
401.64 s
[really-safe-money-gen] coverage (799/1610): Money\.ConversionRateOfSpec.CHF.INR.invert.produces valid rates (8 mutations)
401.91 s
[really-safe-money-gen] coverage (816/1610): Money\.ConversionRateOfSpec.USD.CHF.Ratio.fromRatio.produces valid conversion rates (6 mutations)
401.97 s
[really-safe-money-gen] coverage (819/1610): Money\.ConversionRateOfSpec.USD.USD.Ratio.toRatio.produces valid ratios (0 mutations)
402.44 s
[really-safe-money-gen] coverage (821/1610): Money\.ConversionRateOfSpec.USD.USD.Ratio.fromRatio.produces valid conversion rates (6 mutations)
402.91 s
[really-safe-money-gen] coverage (820/1610): Money\.ConversionRateOfSpec.USD.USD.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
403.06 s
[really-safe-money-gen] coverage (790/1610): Money\.ConversionRateOfSpec.CHF.CHF.invert.produces valid rates (8 mutations)
403.49 s
[really-safe-money-gen] coverage (822/1610): Money\.ConversionRateOfSpec.USD.USD.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
403.84 s
[really-safe-money-gen] coverage (824/1610): Money\.ConversionRateOfSpec.USD.USD.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
406.49 s
[really-safe-money-gen] coverage (802/1610): Money\.ConversionRateOfSpec.CHF.INR.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
406.96 s
[really-safe-money-gen] coverage (805/1610): Money\.ConversionRateOfSpec.CHF.INR.Rational.fromRational.produces valid conversion rates (13 mutations)
407.45 s
[really-safe-money-gen] coverage (801/1610): Money\.ConversionRateOfSpec.CHF.INR.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
407.54 s
[really-safe-money-gen] coverage (800/1610): Money\.ConversionRateOfSpec.CHF.INR.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
407.96 s
[really-safe-money-gen] coverage (806/1610): Money\.ConversionRateOfSpec.CHF.INR.Rational.toRational.produces valid rationals (0 mutations)
408.21 s
[really-safe-money-gen] coverage (794/1610): Money\.ConversionRateOfSpec.CHF.CHF.compose.produces valid rates (8 mutations)
408.31 s
[really-safe-money-gen] coverage (785/1610): Money\.ConversionRateOfSpec.CHF.CHF.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
408.37 s
[really-safe-money-gen] coverage (826/1610): Money\.ConversionRateOfSpec.USD.USD.Rational.toRational.produces valid rationals (0 mutations)
408.86 s
[really-safe-money-gen] coverage (827/1610): Money\.ConversionRateOfSpec.USD.USD.Rational.fromRational.roundtrips with toRational (13 mutations)
409.15 s
[really-safe-money-gen] coverage (829/1610): Money\.ConversionRateOfSpec.USD.USD.compose.produces valid rates (8 mutations)
409.33 s
[really-safe-money-gen] coverage (830/1610): Money\.ConversionRateOfSpec.USD.USD.GenValid (ConversionRateOf USD USD).genValid \:\: Gen (ConversionRateOf USD USD).only generates valid '(ConversionRateOf USD USD)'s (6 mutations)
409.79 s
[really-safe-money-gen] coverage (832/1610): Money\.ConversionRateOfSpec.USD.INR.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
409.80 s
[really-safe-money-gen] coverage (836/1610): Money\.ConversionRateOfSpec.USD.INR.Rational.fromRational.produces valid conversion rates (13 mutations)
409.91 s
[really-safe-money-gen] coverage (838/1610): Money\.ConversionRateOfSpec.USD.INR.Ratio.toRatio.produces valid ratios (0 mutations)
410.08 s
[really-safe-money-gen] coverage (840/1610): Money\.ConversionRateOfSpec.USD.INR.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
410.13 s
[really-safe-money-gen] coverage (841/1610): Money\.ConversionRateOfSpec.USD.INR.invert.produces valid rates (8 mutations)
410.25 s
[really-safe-money-gen] coverage (831/1610): Money\.ConversionRateOfSpec.USD.INR.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
410.34 s
[really-safe-money-gen] coverage (842/1610): Money\.ConversionRateOfSpec.USD.INR.GenValid (ConversionRateOf USD INR).genValid \:\: Gen (ConversionRateOf USD INR).only generates valid '(ConversionRateOf USD INR)'s (6 mutations)
410.34 s
[really-safe-money-gen] coverage (843/1610): Money\.ConversionRateOfSpec.USD.BTC.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
410.69 s
[really-safe-money-gen] coverage (844/1610): Money\.ConversionRateOfSpec.USD.BTC.Ratio.fromRatio.produces valid conversion rates (6 mutations)
410.72 s
[really-safe-money-gen] coverage (845/1610): Money\.ConversionRateOfSpec.USD.BTC.Ratio.toRatio.produces valid ratios (0 mutations)
411.22 s
[really-safe-money-gen] coverage (846/1610): Money\.ConversionRateOfSpec.USD.BTC.compose.produces valid rates (8 mutations)
411.24 s
[really-safe-money-gen] coverage (835/1610): Money\.ConversionRateOfSpec.USD.INR.Rational.fromRational.roundtrips with toRational (13 mutations)
412.02 s
[really-safe-money-gen] coverage (825/1610): Money\.ConversionRateOfSpec.USD.USD.invert.produces valid rates (8 mutations)
412.05 s
[really-safe-money-gen] coverage (833/1610): Money\.ConversionRateOfSpec.USD.INR.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
412.31 s
[really-safe-money-gen] coverage (828/1610): Money\.ConversionRateOfSpec.USD.USD.Rational.fromRational.produces valid conversion rates (13 mutations)
412.53 s
[really-safe-money-gen] coverage (847/1610): Money\.ConversionRateOfSpec.USD.BTC.Rational.toRational.produces valid rationals (0 mutations)
413.05 s
[really-safe-money-gen] coverage (837/1610): Money\.ConversionRateOfSpec.USD.INR.Rational.toRational.produces valid rationals (0 mutations)
415.82 s
[really-safe-money-gen] coverage (855/1610): Money\.ConversionRateOfSpec.USD.ADA.GenValid (ConversionRateOf USD ADA).genValid \:\: Gen (ConversionRateOf USD ADA).only generates valid '(ConversionRateOf USD ADA)'s (6 mutations)
416.80 s
[really-safe-money-gen] coverage (850/1610): Money\.ConversionRateOfSpec.USD.BTC.GenValid (ConversionRateOf USD BTC).genValid \:\: Gen (ConversionRateOf USD BTC).only generates valid '(ConversionRateOf USD BTC)'s (6 mutations)
416.84 s
[really-safe-money-gen] coverage (852/1610): Money\.ConversionRateOfSpec.USD.BTC.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
417.29 s
[really-safe-money-gen] coverage (849/1610): Money\.ConversionRateOfSpec.USD.BTC.Rational.fromRational.roundtrips with toRational (13 mutations)
417.40 s
[really-safe-money-gen] coverage (853/1610): Money\.ConversionRateOfSpec.USD.BTC.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
417.51 s
[really-safe-money-gen] coverage (839/1610): Money\.ConversionRateOfSpec.USD.INR.Ratio.fromRatio.produces valid conversion rates (6 mutations)
417.75 s
[really-safe-money-gen] coverage (834/1610): Money\.ConversionRateOfSpec.USD.INR.compose.produces valid rates (8 mutations)
417.81 s
[really-safe-money-gen] coverage (848/1610): Money\.ConversionRateOfSpec.USD.BTC.Rational.fromRational.produces valid conversion rates (13 mutations)
418.39 s
[really-safe-money-gen] coverage (823/1610): Money\.ConversionRateOfSpec.USD.USD.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
418.58 s
[really-safe-money-gen] coverage (864/1610): Money\.ConversionRateOfSpec.USD.ADA.Rational.fromRational.produces valid conversion rates (13 mutations)
418.80 s
[really-safe-money-gen] coverage (867/1610): Money\.ConversionRateOfSpec.BTC.ADA.Ratio.toRatio.produces valid ratios (0 mutations)
419.25 s
[really-safe-money-gen] coverage (866/1610): Money\.ConversionRateOfSpec.USD.ADA.Rational.toRational.produces valid rationals (0 mutations)
419.48 s
[really-safe-money-gen] coverage (869/1610): Money\.ConversionRateOfSpec.BTC.ADA.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
419.50 s
[really-safe-money-gen] coverage (871/1610): Money\.ConversionRateOfSpec.BTC.ADA.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
419.61 s
[really-safe-money-gen] coverage (875/1610): Money\.ConversionRateOfSpec.BTC.ADA.GenValid (ConversionRateOf BTC ADA).genValid \:\: Gen (ConversionRateOf BTC ADA).only generates valid '(ConversionRateOf BTC ADA)'s (6 mutations)
419.82 s
[really-safe-money-gen] coverage (870/1610): Money\.ConversionRateOfSpec.BTC.ADA.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
419.92 s
[really-safe-money-gen] coverage (868/1610): Money\.ConversionRateOfSpec.BTC.ADA.Ratio.fromRatio.produces valid conversion rates (6 mutations)
420.05 s
[really-safe-money-gen] coverage (873/1610): Money\.ConversionRateOfSpec.BTC.ADA.compose.produces valid rates (8 mutations)
420.20 s
[really-safe-money-gen] coverage (876/1610): Money\.ConversionRateOfSpec.BTC.ADA.Rational.fromRational.produces valid conversion rates (13 mutations)
420.28 s
[really-safe-money-gen] coverage (874/1610): Money\.ConversionRateOfSpec.BTC.ADA.invert.produces valid rates (8 mutations)
420.37 s
[really-safe-money-gen] coverage (872/1610): Money\.ConversionRateOfSpec.BTC.ADA.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
420.72 s
[really-safe-money-gen] coverage (863/1610): Money\.ConversionRateOfSpec.USD.ADA.Ratio.fromRatio.produces valid conversion rates (6 mutations)
420.82 s
[really-safe-money-gen] coverage (877/1610): Money\.ConversionRateOfSpec.BTC.ADA.Rational.fromRational.roundtrips with toRational (13 mutations)
421.47 s
[really-safe-money-gen] coverage (878/1610): Money\.ConversionRateOfSpec.BTC.ADA.Rational.toRational.produces valid rationals (0 mutations)
421.55 s
[really-safe-money-gen] coverage (883/1610): Money\.ConversionRateOfSpec.BTC.USD.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
422.34 s
[really-safe-money-gen] coverage (882/1610): Money\.ConversionRateOfSpec.BTC.USD.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
422.63 s
[really-safe-money-gen] coverage (881/1610): Money\.ConversionRateOfSpec.BTC.USD.Rational.fromRational.produces valid conversion rates (13 mutations)
422.88 s
[really-safe-money-gen] coverage (884/1610): Money\.ConversionRateOfSpec.BTC.USD.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
425.35 s
[really-safe-money-gen] coverage (880/1610): Money\.ConversionRateOfSpec.BTC.USD.Rational.fromRational.roundtrips with toRational (13 mutations)
426.06 s
[really-safe-money-gen] coverage (885/1610): Money\.ConversionRateOfSpec.BTC.USD.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
426.45 s
[really-safe-money-gen] coverage (886/1610): Money\.ConversionRateOfSpec.BTC.USD.Ratio.fromRatio.produces valid conversion rates (6 mutations)
426.75 s
[really-safe-money-gen] coverage (887/1610): Money\.ConversionRateOfSpec.BTC.USD.Ratio.toRatio.produces valid ratios (0 mutations)
426.87 s
[really-safe-money-gen] coverage (888/1610): Money\.ConversionRateOfSpec.BTC.USD.compose.produces valid rates (8 mutations)
427.23 s
[really-safe-money-gen] coverage (889/1610): Money\.ConversionRateOfSpec.BTC.USD.invert.produces valid rates (8 mutations)
427.45 s
[really-safe-money-gen] coverage (879/1610): Money\.ConversionRateOfSpec.BTC.USD.Rational.toRational.produces valid rationals (0 mutations)
427.46 s
[really-safe-money-gen] coverage (890/1610): Money\.ConversionRateOfSpec.BTC.USD.GenValid (ConversionRateOf BTC USD).genValid \:\: Gen (ConversionRateOf BTC USD).only generates valid '(ConversionRateOf BTC USD)'s (6 mutations)
428.06 s
[really-safe-money-gen] coverage (891/1610): Money\.ConversionRateOfSpec.BTC.INR.compose.produces valid rates (8 mutations)
428.40 s
[really-safe-money-gen] coverage (856/1610): Money\.ConversionRateOfSpec.USD.ADA.compose.produces valid rates (8 mutations)
428.62 s
[really-safe-money-gen] coverage (892/1610): Money\.ConversionRateOfSpec.BTC.INR.GenValid (ConversionRateOf BTC INR).genValid \:\: Gen (ConversionRateOf BTC INR).only generates valid '(ConversionRateOf BTC INR)'s (6 mutations)
429.20 s
[really-safe-money-gen] coverage (789/1610): Money\.ConversionRateOfSpec.CHF.CHF.Rational.fromRational.roundtrips with toRational (13 mutations)
429.29 s
[really-safe-money-gen] coverage (894/1610): Money\.ConversionRateOfSpec.BTC.INR.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
429.41 s
[really-safe-money-gen] coverage (854/1610): Money\.ConversionRateOfSpec.USD.BTC.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
429.61 s
[really-safe-money-gen] coverage (896/1610): Money\.ConversionRateOfSpec.BTC.INR.invert.produces valid rates (8 mutations)
429.66 s
[really-safe-money-gen] coverage (893/1610): Money\.ConversionRateOfSpec.BTC.INR.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
430.07 s
[really-safe-money-gen] coverage (897/1610): Money\.ConversionRateOfSpec.BTC.INR.Rational.fromRational.roundtrips with toRational (13 mutations)
430.13 s
[really-safe-money-gen] coverage (898/1610): Money\.ConversionRateOfSpec.BTC.INR.Rational.fromRational.produces valid conversion rates (13 mutations)
430.39 s
[really-safe-money-gen] coverage (851/1610): Money\.ConversionRateOfSpec.USD.BTC.invert.produces valid rates (8 mutations)
430.46 s
[really-safe-money-gen] coverage (857/1610): Money\.ConversionRateOfSpec.USD.ADA.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
430.56 s
[really-safe-money-gen] coverage (895/1610): Money\.ConversionRateOfSpec.BTC.INR.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
430.65 s
[really-safe-money-gen] coverage (862/1610): Money\.ConversionRateOfSpec.USD.ADA.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
430.76 s
[really-safe-money-gen] coverage (899/1610): Money\.ConversionRateOfSpec.BTC.INR.Rational.toRational.produces valid rationals (0 mutations)
431.15 s
[really-safe-money-gen] coverage (860/1610): Money\.ConversionRateOfSpec.USD.ADA.invert.produces valid rates (8 mutations)
431.28 s
[really-safe-money-gen] coverage (858/1610): Money\.ConversionRateOfSpec.USD.ADA.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
432.05 s
[really-safe-money-gen] coverage (865/1610): Money\.ConversionRateOfSpec.USD.ADA.Rational.fromRational.roundtrips with toRational (13 mutations)
432.36 s
[really-safe-money-gen] coverage (902/1610): Money\.ConversionRateOfSpec.BTC.INR.Ratio.toRatio.produces valid ratios (0 mutations)
432.68 s
[really-safe-money-gen] coverage (861/1610): Money\.ConversionRateOfSpec.USD.ADA.Ratio.toRatio.produces valid ratios (0 mutations)
435.65 s
[really-safe-money-gen] coverage (859/1610): Money\.ConversionRateOfSpec.USD.ADA.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
435.69 s
[really-safe-money-gen] coverage (904/1610): Money\.ConversionRateOfSpec.BTC.CHF.GenValid (ConversionRateOf BTC CHF).genValid \:\: Gen (ConversionRateOf BTC CHF).only generates valid '(ConversionRateOf BTC CHF)'s (6 mutations)
436.00 s
[really-safe-money-gen] coverage (901/1610): Money\.ConversionRateOfSpec.BTC.INR.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
436.36 s
[really-safe-money-gen] coverage (906/1610): Money\.ConversionRateOfSpec.BTC.CHF.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
436.75 s
[really-safe-money-gen] coverage (908/1610): Money\.ConversionRateOfSpec.BTC.CHF.invert.produces valid rates (8 mutations)
436.80 s
[really-safe-money-gen] coverage (903/1610): Money\.ConversionRateOfSpec.BTC.CHF.compose.produces valid rates (8 mutations)
436.92 s
[really-safe-money-gen] coverage (905/1610): Money\.ConversionRateOfSpec.BTC.CHF.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
437.71 s
[really-safe-money-gen] coverage (907/1610): Money\.ConversionRateOfSpec.BTC.CHF.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
437.73 s
[really-safe-money-gen] coverage (900/1610): Money\.ConversionRateOfSpec.BTC.INR.Ratio.fromRatio.produces valid conversion rates (6 mutations)
437.85 s
[really-safe-money-gen] coverage (909/1610): Money\.ConversionRateOfSpec.BTC.CHF.Ratio.toRatio.produces valid ratios (0 mutations)
438.02 s
[really-safe-money-gen] coverage (910/1610): Money\.ConversionRateOfSpec.BTC.CHF.Ratio.fromRatio.produces valid conversion rates (6 mutations)
438.46 s
[really-safe-money-gen] coverage (913/1610): Money\.ConversionRateOfSpec.BTC.CHF.Rational.fromRational.produces valid conversion rates (13 mutations)
438.82 s
[really-safe-money-gen] coverage (911/1610): Money\.ConversionRateOfSpec.BTC.CHF.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
439.00 s
[really-safe-money-gen] coverage (916/1610): Money\.ConversionRateOfSpec.BTC.BTC.Rational.toRational.produces valid rationals (0 mutations)
439.04 s
[really-safe-money-gen] coverage (914/1610): Money\.ConversionRateOfSpec.BTC.CHF.Rational.toRational.produces valid rationals (0 mutations)
439.18 s
[really-safe-money-gen] coverage (919/1610): Money\.ConversionRateOfSpec.BTC.BTC.compose.produces valid rates (8 mutations)
439.49 s
[really-safe-money-gen] coverage (917/1610): Money\.ConversionRateOfSpec.BTC.BTC.Rational.fromRational.produces valid conversion rates (13 mutations)
439.79 s
[really-safe-money-gen] coverage (920/1610): Money\.ConversionRateOfSpec.BTC.BTC.GenValid (ConversionRateOf BTC BTC).genValid \:\: Gen (ConversionRateOf BTC BTC).only generates valid '(ConversionRateOf BTC BTC)'s (6 mutations)
440.15 s
[really-safe-money-gen] coverage (925/1610): Money\.ConversionRateOfSpec.BTC.BTC.Ratio.fromRatio.produces valid conversion rates (6 mutations)
440.22 s
[really-safe-money-gen] coverage (922/1610): Money\.ConversionRateOfSpec.BTC.BTC.DecimalLiteral.fromDecimalLiteral.produces valid conversion rates (16 mutations)
440.33 s
[really-safe-money-gen] coverage (926/1610): Money\.ConversionRateOfSpec.BTC.BTC.Ratio.toRatio.produces valid ratios (0 mutations)
440.36 s
[really-safe-money-gen] coverage (921/1610): Money\.ConversionRateOfSpec.BTC.BTC.DecimalLiteral.toDecimalLiteral.produces valid literals (37 mutations)
440.61 s
[really-safe-money-gen] coverage (923/1610): Money\.ConversionRateOfSpec.BTC.BTC.DecimalLiteral.fromDecimalLiteral.roundtrips with toDecimalLiteral (53 mutations)
440.65 s
[really-safe-money-gen] coverage (927/1610): Money\.QuantisationFactorSpec.fromWord32.produces valid quantisation factors (6 mutations)
440.72 s
[really-safe-money-gen] coverage (924/1610): Money\.ConversionRateOfSpec.BTC.BTC.Ratio.fromRatio.roundtrips with toRatio (6 mutations)
441.54 s
[really-safe-money-gen] coverage (928/1610): Money\.QuantisationFactorSpec.digits.works on 10 (0 mutations)
441.84 s
[really-safe-money-gen] coverage (929/1610): Money\.QuantisationFactorSpec.digits.works on 20 (0 mutations)
442.27 s
[really-safe-money-gen] coverage (930/1610): Money\.QuantisationFactorSpec.digits.works on 100 (0 mutations)
445.30 s
[really-safe-money-gen] coverage (932/1610): Money\.QuantisationFactorSpec.digits.works on 1 (0 mutations)
445.40 s
[really-safe-money-gen] coverage (931/1610): Money\.QuantisationFactorSpec.digits.produces valid numbers of digits (0 mutations)
445.47 s
[really-safe-money-gen] coverage (915/1610): Money\.ConversionRateOfSpec.BTC.BTC.invert.produces valid rates (8 mutations)
445.69 s
[really-safe-money-gen] coverage (918/1610): Money\.ConversionRateOfSpec.BTC.BTC.Rational.fromRational.roundtrips with toRational (13 mutations)
446.16 s
[really-safe-money-gen] coverage (912/1610): Money\.ConversionRateOfSpec.BTC.CHF.Rational.fromRational.roundtrips with toRational (13 mutations)
446.25 s
[really-safe-money-gen] coverage (940/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn quantisation factor 100 into DecimalLiteral Nothing 1 2 (38 mutations)
446.51 s
[really-safe-money-gen] coverage (933/1610): Money\.QuantisationFactorSpec.DecimalLiteral.fromDecimalLiteral.fails to render a non-1 integer (23 mutations)
447.10 s
[really-safe-money-gen] coverage (942/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn DecimalLiteral Nothing 1 3 into quantisation factor 1000 (31 mutations)
447.20 s
[really-safe-money-gen] coverage (943/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn quantisation factor 10 into DecimalLiteral Nothing 1 1 (38 mutations)
447.40 s
[really-safe-money-gen] coverage (944/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn DecimalLiteral Nothing 2 2 into quantisation factor 50 (31 mutations)
447.65 s
[really-safe-money-gen] coverage (945/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn DecimalLiteral Nothing 1 0 into quantisation factor 1 (31 mutations)
448.06 s
[really-safe-money-gen] coverage (946/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn quantisation factor 20 into DecimalLiteral Nothing 5 2 (38 mutations)
448.33 s
[really-safe-money-gen] coverage (947/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn DecimalLiteral Nothing 5 2 into quantisation factor 20 (31 mutations)
448.62 s
[really-safe-money-gen] coverage (948/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn quantisation factor 1 into DecimalLiteral Nothing 1 0 (32 mutations)
448.64 s
[really-safe-money-gen] coverage (949/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn DecimalLiteral Nothing 1 2 into quantisation factor 100 (31 mutations)
448.73 s
[really-safe-money-gen] coverage (950/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn quantisation factor 1000 into DecimalLiteral Nothing 1 3 (38 mutations)
449.19 s
[really-safe-money-gen] coverage (951/1610): Money\.QuantisationFactorSpec.GenValid QuantisationFactor.genValid \:\: Gen QuantisationFactor.only generates valid 'QuantisationFactor's (6 mutations)
449.62 s
[really-safe-money-gen] coverage (953/1610): Money\.MultiAccountSpec.subtractAmount.computes this example correctly (24 mutations)
449.78 s
[really-safe-money-gen] coverage (954/1610): Money\.MultiAccountSpec.subtractAmount.adds a non zero amount (5 mutations)
449.82 s
[really-safe-money-gen] coverage (952/1610): Money\.MultiAccountSpec.subtractAmount.produces valid amounts (44 mutations)
449.89 s
[really-safe-money-gen] coverage (955/1610): Money\.MultiAccountSpec.subtractAmount.removes a zero amount (24 mutations)
449.94 s
[really-safe-money-gen] coverage (941/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn quantisation factor 50 into DecimalLiteral Nothing 2 2 (38 mutations)
449.98 s
[really-safe-money-gen] coverage (939/1610): Money\.QuantisationFactorSpec.DecimalLiteral.can turn DecimalLiteral Nothing 1 1 into quantisation factor 10 (31 mutations)
450.73 s
[really-safe-money-gen] coverage (936/1610): Money\.QuantisationFactorSpec.DecimalLiteral.fromDecimalLiteral.fails to render a 0 (8 mutations)
451.47 s
[really-safe-money-gen] coverage (935/1610): Money\.QuantisationFactorSpec.DecimalLiteral.fromDecimalLiteral.produces valid factors (37 mutations)
452.19 s
[really-safe-money-gen] coverage (956/1610): Money\.MultiAccountSpec.add.has a right-identity\: zero (4 mutations)
455.31 s
[really-safe-money-gen] coverage (958/1610): Money\.MultiAccountSpec.add.produces valid amounts (44 mutations)
455.45 s
[really-safe-money-gen] coverage (960/1610): Money\.MultiAccountSpec.add.has a left-identity\: zero (6 mutations)
455.74 s
[really-safe-money-gen] coverage (963/1610): Money\.MultiAccountSpec.Eq (MultiAccount Currency).(==) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is symmetric for "valid (MultiAccount Currency)"s (1 mutations)
455.81 s
[really-safe-money-gen] coverage (962/1610): Money\.MultiAccountSpec.Eq (MultiAccount Currency).(==) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is reflexive for "valid (MultiAccount Currency)"s (4 mutations)
455.89 s
[really-safe-money-gen] coverage (957/1610): Money\.MultiAccountSpec.add.is commutative (33 mutations)
455.96 s
[really-safe-money-gen] coverage (961/1610): Money\.MultiAccountSpec.GenValid (MultiAccount Currency).genValid \:\: Gen (MultiAccount Currency).only generates valid '(MultiAccount Currency)'s (15 mutations)
456.31 s
[really-safe-money-gen] coverage (964/1610): Money\.MultiAccountSpec.Eq (MultiAccount Currency).(==) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is transitive for "valid (MultiAccount Currency)"s (1 mutations)
456.38 s
[really-safe-money-gen] coverage (965/1610): Money\.MultiAccountSpec.Eq (MultiAccount Currency).(==) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (MultiAccount Currency)"s (1 mutations)
456.57 s
[really-safe-money-gen] coverage (966/1610): Money\.MultiAccountSpec.Eq (MultiAccount Currency).(/=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (MultiAccount Currency)"s (1 mutations)
456.81 s
[really-safe-money-gen] coverage (967/1610): Money\.MultiAccountSpec.Eq (MultiAccount Currency).(/=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is antireflexive for "valid (MultiAccount Currency)"s (4 mutations)
456.94 s
[really-safe-money-gen] coverage (959/1610): Money\.MultiAccountSpec.add.is associative when both succeed (33 mutations)
457.09 s
[really-safe-money-gen] coverage (970/1610): Money\.MultiAccountSpec.zero.is valid (2 mutations)
457.44 s
[really-safe-money-gen] coverage (971/1610): Money\.MultiAccountSpec.fromAccount.produces valid amounts (18 mutations)
457.81 s
[really-safe-money-gen] coverage (972/1610): Money\.MultiAccountSpec.addAccount.produces valid amounts (46 mutations)
457.85 s
[really-safe-money-gen] coverage (968/1610): Money\.MultiAccountSpec.sum.produces valid amounts (44 mutations)
458.22 s
[really-safe-money-gen] coverage (969/1610): Money\.MultiAccountSpec.Show (MultiAccount Currency) and Read (MultiAccount Currency).are implemented such that read \. show == id for valid values (4 mutations)
458.33 s
[really-safe-money-gen] coverage (973/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(>=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is reflexive for "valid (MultiAccount Currency)"'s (4 mutations)
458.38 s
[really-safe-money-gen] coverage (974/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(>=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is transitive for "valid (MultiAccount Currency)"'s (4 mutations)
458.59 s
[really-safe-money-gen] coverage (975/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(>=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is antisymmetric for "valid (MultiAccount Currency)"'s (4 mutations)
458.75 s
[really-safe-money-gen] coverage (976/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(>=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (MultiAccount Currency)"'s (4 mutations)
458.81 s
[really-safe-money-gen] coverage (979/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(>) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is antireflexive for "valid (MultiAccount Currency)"'s (4 mutations)
458.91 s
[really-safe-money-gen] coverage (978/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(>) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (MultiAccount Currency)"'s (4 mutations)
459.19 s
[really-safe-money-gen] coverage (977/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency)."min \:\: (MultiAccount Currency -> MultiAccount Currency -> MultiAccount Currency)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (MultiAccount Currency)"'s (4 mutations)
459.73 s
[really-safe-money-gen] coverage (980/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(>) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is transitive for "valid (MultiAccount Currency)"'s (4 mutations)
460.40 s
[really-safe-money-gen] coverage (982/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(<=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is reflexive for "valid (MultiAccount Currency)"'s (4 mutations)
460.91 s
[really-safe-money-gen] coverage (983/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(<=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is antisymmetric for "valid (MultiAccount Currency)"'s (4 mutations)
464.10 s
[really-safe-money-gen] coverage (984/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(<=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is transitive for "valid (MultiAccount Currency)"'s (4 mutations)
464.16 s
[really-safe-money-gen] coverage (985/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(<) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is transitive for "valid (MultiAccount Currency)"'s (4 mutations)
464.43 s
[really-safe-money-gen] coverage (986/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(<) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is antireflexive for "valid (MultiAccount Currency)"'s (4 mutations)
464.60 s
[really-safe-money-gen] coverage (987/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(<) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (MultiAccount Currency)"'s (4 mutations)
464.83 s
[really-safe-money-gen] coverage (988/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency)."max \:\: (MultiAccount Currency -> MultiAccount Currency -> MultiAccount Currency)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (MultiAccount Currency)"'s (4 mutations)
464.92 s
[really-safe-money-gen] coverage (992/1610): Money\.MultiAccountSpec.addAmount.computes this example correctly (18 mutations)
464.98 s
[really-safe-money-gen] coverage (993/1610): Money\.MultiAccountSpec.addAmount.adds a non zero amount (5 mutations)
465.25 s
[really-safe-money-gen] coverage (991/1610): Money\.MultiAccountSpec.addAmount.produces valid amounts (45 mutations)
465.26 s
[really-safe-money-gen] coverage (989/1610): Money\.MultiAccountSpec.subtract.produces valid amounts (44 mutations)
465.40 s
[really-safe-money-gen] coverage (999/1610): Money\.MultiAccountSpec.convertAll.produces the right result in this example (23 mutations)
465.56 s
[really-safe-money-gen] coverage (981/1610): Money\.MultiAccountSpec.Ord (MultiAccount Currency).(<=) \:\: (MultiAccount Currency) -> (MultiAccount Currency) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (MultiAccount Currency)"'s (4 mutations)
465.63 s
[really-safe-money-gen] coverage (990/1610): Money\.MultiAccountSpec.subtract.has a right-identity\: zero (4 mutations)
465.81 s
[really-safe-money-gen] coverage (1000/1610): Money\.AmountOfSpec.USD.toMinimalQuantisations.produces valid Int64s (0 mutations)
466.37 s
[really-safe-money-gen] coverage (1002/1610): Money\.AmountOfSpec.USD.CHF.rate.produces valid amounts (10 mutations)
466.42 s
[really-safe-money-gen] coverage (1001/1610): Money\.AmountOfSpec.USD.toMinimalQuantisations.roundtrips with fromMinimalQuantisations (0 mutations)
466.72 s
[really-safe-money-gen] coverage (1003/1610): Money\.AmountOfSpec.USD.CHF.convert.produces valid amounts (25 mutations)
466.97 s
[really-safe-money-gen] coverage (997/1610): Money\.MultiAccountSpec.lookupAccount.produces valid amounts (4 mutations)
467.03 s
[really-safe-money-gen] coverage (998/1610): Money\.MultiAccountSpec.convertAll.produces valid results when converting two currencies to one (28 mutations)
467.11 s
[really-safe-money-gen] coverage (996/1610): Money\.MultiAccountSpec.lookupAccount.can find an added amount (7 mutations)
467.47 s
[really-safe-money-gen] coverage (994/1610): Money\.MultiAccountSpec.addAmount.removes a zero amount (24 mutations)
467.59 s
[really-safe-money-gen] coverage (1011/1610): Money\.AmountOfSpec.USD.fromRatio.fails on +Infinity (2 mutations)
467.59 s
[really-safe-money-gen] coverage (995/1610): Money\.MultiAccountSpec.subtractAccount.produces valid amounts (46 mutations)
467.74 s
[really-safe-money-gen] coverage (1013/1610): Money\.AmountOfSpec.USD.add.has a right-identity\: zero (10 mutations)
468.49 s
[really-safe-money-gen] coverage (1015/1610): Money\.AmountOfSpec.USD.add.has a left-identity\: zero (10 mutations)
469.10 s
[really-safe-money-gen] coverage (1016/1610): Money\.AmountOfSpec.USD.add.is commutative (9 mutations)
470.38 s
[really-safe-money-gen] coverage (1017/1610): Money\.AmountOfSpec.USD.add.is associative when both succeed (9 mutations)
476.36 s
[really-safe-money-gen] coverage (1019/1610): Money\.AmountOfSpec.USD.fromRational.roundtrips with toRational (19 mutations)
476.84 s
[really-safe-money-gen] coverage (1018/1610): Money\.AmountOfSpec.USD.fromMinimalQuantisations.produces valid amounts (0 mutations)
476.92 s
[really-safe-money-gen] coverage (1023/1610): Money\.AmountOfSpec.USD.fromRational.fails on NaN (2 mutations)
477.31 s
[really-safe-money-gen] coverage (1021/1610): Money\.AmountOfSpec.USD.fromRational.fails on +Infinity (2 mutations)
477.32 s
[really-safe-money-gen] coverage (1022/1610): Money\.AmountOfSpec.USD.fromRational.produces valid Amounts (19 mutations)
477.48 s
[really-safe-money-gen] coverage (1010/1610): Money\.AmountOfSpec.USD.fromRatio.fails on 7\.123 (13 mutations)
477.58 s
[really-safe-money-gen] coverage (1008/1610): Money\.AmountOfSpec.USD.fromRatio.fails on NaN (2 mutations)
477.97 s
[really-safe-money-gen] coverage (1007/1610): Money\.AmountOfSpec.USD.fromRatio.succeeds on 77 (19 mutations)
478.04 s
[really-safe-money-gen] coverage (1006/1610): Money\.AmountOfSpec.USD.fromRatio.produces valid AmountOfs (19 mutations)
478.36 s
[really-safe-money-gen] coverage (1024/1610): Money\.AmountOfSpec.USD.fromRational.fails on -Infinity (2 mutations)
478.51 s
[really-safe-money-gen] coverage (1005/1610): Money\.AmountOfSpec.USD.fromRatio.roundtrips with toRatio (19 mutations)
478.66 s
[really-safe-money-gen] coverage (1025/1610): Money\.AmountOfSpec.USD.fromRational.succeeds on 1 (19 mutations)
479.73 s
[really-safe-money-gen] coverage (1012/1610): Money\.AmountOfSpec.USD.add.matches what you would get with Integer, if nothing fails (9 mutations)
479.99 s
[really-safe-money-gen] coverage (934/1610): Money\.QuantisationFactorSpec.DecimalLiteral.fromDecimalLiteral.fails to render negative fractionals (17 mutations)
480.15 s
[really-safe-money-gen] coverage (1004/1610): Money\.AmountOfSpec.USD.fromRatio.succeeds on 1 (19 mutations)
480.48 s
[really-safe-money-gen] coverage (1014/1610): Money\.AmountOfSpec.USD.add.produces valid amounts (9 mutations)
480.48 s
[really-safe-money-gen] coverage (1026/1610): Money\.AmountOfSpec.USD.fromRational.succeeds on 0 (19 mutations)
480.86 s
[really-safe-money-gen] coverage (1009/1610): Money\.AmountOfSpec.USD.fromRatio.succeeds on 0 (20 mutations)
480.99 s
[really-safe-money-gen] coverage (1020/1610): Money\.AmountOfSpec.USD.fromRational.fails on -1 (8 mutations)
481.58 s
[really-safe-money-gen] coverage (1032/1610): Money\.AmountOfSpec.USD.BTC.rate.produces valid amounts (10 mutations)
481.71 s
[really-safe-money-gen] coverage (1036/1610): Money\.AmountOfSpec.USD.fromDouble.fails on +Infinity (10 mutations)
482.10 s
[really-safe-money-gen] coverage (1031/1610): Money\.AmountOfSpec.USD.BTC.convert.produces valid amounts (25 mutations)
482.65 s
[really-safe-money-gen] coverage (1030/1610): Money\.AmountOfSpec.USD.Show (AmountOf * USD) and Read (AmountOf * USD).are implemented such that read \. show == id for valid values (1 mutations)
482.89 s
[really-safe-money-gen] coverage (1028/1610): Money\.AmountOfSpec.USD.GenValid (AmountOf * USD).genValid \:\: Gen (AmountOf * USD).only generates valid '(AmountOf * USD)'s (0 mutations)
483.88 s
[really-safe-money-gen] coverage (1039/1610): Money\.AmountOfSpec.USD.fromDouble.fails on -1 (6 mutations)
485.74 s
[really-safe-money-gen] coverage (1037/1610): Money\.AmountOfSpec.USD.fromDouble.fails on -Infinity (6 mutations)
491.52 s
[really-safe-money-gen] coverage (1040/1610): Money\.AmountOfSpec.USD.fraction.produces valid amounts (17 mutations)
491.96 s
[really-safe-money-gen] coverage (1042/1610): Money\.AmountOfSpec.USD.INR.rate.produces valid amounts (10 mutations)
492.48 s
[really-safe-money-gen] coverage (1041/1610): Money\.AmountOfSpec.USD.INR.convert.produces valid amounts (25 mutations)
493.32 s
[really-safe-money-gen] coverage (1045/1610): Money\.AmountOfSpec.USD.sum.produces valid amounts (10 mutations)
493.52 s
[really-safe-money-gen] coverage (1043/1610): Money\.AmountOfSpec.USD.USD.rate.produces valid amounts (10 mutations)
493.95 s
[really-safe-money-gen] coverage (1046/1610): Money\.AmountOfSpec.USD.sum.matches what you would get with Integer, if nothing fails (10 mutations)
494.12 s
[really-safe-money-gen] coverage (1029/1610): Money\.AmountOfSpec.USD.zero.is valid (1 mutations)
494.14 s
[really-safe-money-gen] coverage (1047/1610): Money\.AmountOfSpec.USD.subtract.matches what you would get with Integer, if nothing fails (10 mutations)
494.57 s
[really-safe-money-gen] coverage (1048/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(<) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is antireflexive for "valid (AmountOf * USD)"'s (0 mutations)
494.86 s
[really-safe-money-gen] coverage (1051/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(>) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is antireflexive for "valid (AmountOf * USD)"'s (0 mutations)
494.96 s
[really-safe-money-gen] coverage (1049/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(<) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is transitive for "valid (AmountOf * USD)"'s (0 mutations)
495.64 s
[really-safe-money-gen] coverage (1052/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(>) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is transitive for "valid (AmountOf * USD)"'s (0 mutations)
495.70 s
[really-safe-money-gen] coverage (1035/1610): Money\.AmountOfSpec.USD.fromDouble.succeeds on 1 (30 mutations)
496.17 s
[really-safe-money-gen] coverage (1034/1610): Money\.AmountOfSpec.USD.fromDouble.succeeds on 0 (30 mutations)
496.41 s
[really-safe-money-gen] coverage (1055/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(<=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is reflexive for "valid (AmountOf * USD)"'s (0 mutations)
496.73 s
[really-safe-money-gen] coverage (1038/1610): Money\.AmountOfSpec.USD.fromDouble.fails on NaN (8 mutations)
496.84 s
[really-safe-money-gen] coverage (1057/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(<=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AmountOf * USD)"'s (0 mutations)
496.90 s
[really-safe-money-gen] coverage (1027/1610): Money\.AmountOfSpec.USD.toRational.produces valid Rationals (0 mutations)
497.10 s
[really-safe-money-gen] coverage (1054/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(<=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is transitive for "valid (AmountOf * USD)"'s (0 mutations)
497.62 s
[really-safe-money-gen] coverage (1060/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(>=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AmountOf * USD)"'s (0 mutations)
498.24 s
[really-safe-money-gen] coverage (1059/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD)."max \:\: (AmountOf * USD -> AmountOf * USD -> AmountOf * USD)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AmountOf * USD)"'s (0 mutations)
499.09 s
[really-safe-money-gen] coverage (1033/1610): Money\.AmountOfSpec.USD.fromDouble.produces valid amounts (30 mutations)
499.15 s
[really-safe-money-gen] coverage (1061/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(>=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is antisymmetric for "valid (AmountOf * USD)"'s (0 mutations)
499.83 s
[really-safe-money-gen] coverage (1062/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(>=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is reflexive for "valid (AmountOf * USD)"'s (0 mutations)
500.30 s
[really-safe-money-gen] coverage (1063/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(>=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is transitive for "valid (AmountOf * USD)"'s (0 mutations)
502.20 s
[really-safe-money-gen] coverage (1044/1610): Money\.AmountOfSpec.USD.USD.convert.produces valid amounts (25 mutations)
507.43 s
[really-safe-money-gen] coverage (1065/1610): Money\.AmountOfSpec.USD.format.produces valid strings (3 mutations)
508.29 s
[really-safe-money-gen] coverage (1064/1610): Money\.AmountOfSpec.USD.toRatio.produces valid Rationals when the quantisation factor is nonzero (0 mutations)
509.45 s
[really-safe-money-gen] coverage (1058/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD)."min \:\: (AmountOf * USD -> AmountOf * USD -> AmountOf * USD)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AmountOf * USD)"'s (0 mutations)
509.71 s
[really-safe-money-gen] coverage (1066/1610): Money\.AmountOfSpec.USD.multiply.matches what you would get with Integer, if nothing fails (9 mutations)
509.99 s
[really-safe-money-gen] coverage (1067/1610): Money\.AmountOfSpec.USD.multiply.is absorbed by 0 (10 mutations)
510.39 s
[really-safe-money-gen] coverage (938/1610): Money\.QuantisationFactorSpec.DecimalLiteral.toDecimalLiteral.produces valid literals (40 mutations)
510.57 s
[really-safe-money-gen] coverage (1056/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(<=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is antisymmetric for "valid (AmountOf * USD)"'s (0 mutations)
510.98 s
[really-safe-money-gen] coverage (1053/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(>) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AmountOf * USD)"'s (0 mutations)
511.13 s
[really-safe-money-gen] coverage (1050/1610): Money\.AmountOfSpec.USD.Ord (AmountOf * USD).(<) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AmountOf * USD)"'s (0 mutations)
511.18 s
[really-safe-money-gen] coverage (1075/1610): Money\.AmountOfSpec.USD.distribute.Eq (Distribution (AmountOf * USD)).(/=) \:\: (Distribution (AmountOf * USD)) -> (Distribution (AmountOf * USD)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AmountOf * USD))"s (1 mutations)
511.29 s
[really-safe-money-gen] coverage (1079/1610): Money\.AmountOfSpec.USD.distribute.Eq (Distribution (AmountOf * USD)).(==) \:\: (Distribution (AmountOf * USD)) -> (Distribution (AmountOf * USD)) -> Bool.is symmetric for "valid (Distribution (AmountOf * USD))"s (1 mutations)
511.37 s
[really-safe-money-gen] coverage (937/1610): Money\.QuantisationFactorSpec.DecimalLiteral.toDecimalLiteral.roundtrips with fromDecimalLiteral (70 mutations)
511.39 s
[really-safe-money-gen] coverage (1078/1610): Money\.AmountOfSpec.USD.distribute.Eq (Distribution (AmountOf * USD)).(==) \:\: (Distribution (AmountOf * USD)) -> (Distribution (AmountOf * USD)) -> Bool.is reflexive for "valid (Distribution (AmountOf * USD))"s (1 mutations)
511.48 s
[really-safe-money-gen] coverage (1077/1610): Money\.AmountOfSpec.USD.distribute.Eq (Distribution (AmountOf * USD)).(==) \:\: (Distribution (AmountOf * USD)) -> (Distribution (AmountOf * USD)) -> Bool.is transitive for "valid (Distribution (AmountOf * USD))"s (1 mutations)
512.60 s
[really-safe-money-gen] coverage (1080/1610): Money\.AmountOfSpec.USD.distribute.Eq (Distribution (AmountOf * USD)).(==) \:\: (Distribution (AmountOf * USD)) -> (Distribution (AmountOf * USD)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AmountOf * USD))"s (1 mutations)
513.20 s
[really-safe-money-gen] coverage (1071/1610): Money\.AmountOfSpec.USD.toDouble.produces valid Doubles (0 mutations)
513.20 s
[really-safe-money-gen] coverage (1068/1610): Money\.AmountOfSpec.USD.multiply.is distributive with add when both succeed (17 mutations)
513.22 s
[really-safe-money-gen] coverage (1069/1610): Money\.AmountOfSpec.USD.multiply.has an identity\: 1 (9 mutations)
513.77 s
[really-safe-money-gen] coverage (1076/1610): Money\.AmountOfSpec.USD.distribute.Eq (Distribution (AmountOf * USD)).(/=) \:\: (Distribution (AmountOf * USD)) -> (Distribution (AmountOf * USD)) -> Bool.is antireflexive for "valid (Distribution (AmountOf * USD))"s (1 mutations)
514.32 s
[really-safe-money-gen] coverage (1074/1610): Money\.AmountOfSpec.USD.distribute.produces results that sum up to the greater whole (29 mutations)
514.81 s
[really-safe-money-gen] coverage (1083/1610): Money\.AmountOfSpec.USD.Eq (AmountOf * USD).(==) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AmountOf * USD)"s (0 mutations)
514.81 s
[really-safe-money-gen] coverage (1086/1610): Money\.AmountOfSpec.USD.Eq (AmountOf * USD).(==) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is transitive for "valid (AmountOf * USD)"s (0 mutations)
515.51 s
[really-safe-money-gen] coverage (1082/1610): Money\.AmountOfSpec.USD.ADA.rate.produces valid amounts (10 mutations)
515.57 s
[really-safe-money-gen] coverage (1081/1610): Money\.AmountOfSpec.USD.ADA.convert.produces valid amounts (25 mutations)
516.89 s
[really-safe-money-gen] coverage (1084/1610): Money\.AmountOfSpec.USD.Eq (AmountOf * USD).(==) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is symmetric for "valid (AmountOf * USD)"s (0 mutations)
517.33 s
[really-safe-money-gen] coverage (1085/1610): Money\.AmountOfSpec.USD.Eq (AmountOf * USD).(==) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is reflexive for "valid (AmountOf * USD)"s (0 mutations)
517.83 s
[really-safe-money-gen] coverage (1073/1610): Money\.AmountOfSpec.USD.distribute.produces valid amounts (21 mutations)
520.47 s
[really-safe-money-gen] coverage (1070/1610): Money\.AmountOfSpec.USD.multiply.produces valid amounts (9 mutations)
524.44 s
[really-safe-money-gen] coverage (1094/1610): Money\.AmountOfSpec.ADA.Eq (AmountOf * ADA).(==) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is reflexive for "valid (AmountOf * ADA)"s (0 mutations)
526.21 s
[really-safe-money-gen] coverage (1089/1610): Money\.AmountOfSpec.ADA.BTC.convert.produces valid amounts (25 mutations)
527.33 s
[really-safe-money-gen] coverage (1095/1610): Money\.AmountOfSpec.ADA.Eq (AmountOf * ADA).(/=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is antireflexive for "valid (AmountOf * ADA)"s (0 mutations)
527.85 s
[really-safe-money-gen] coverage (1092/1610): Money\.AmountOfSpec.ADA.Eq (AmountOf * ADA).(==) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is symmetric for "valid (AmountOf * ADA)"s (0 mutations)
527.90 s
[really-safe-money-gen] coverage (1090/1610): Money\.AmountOfSpec.ADA.BTC.rate.produces valid amounts (10 mutations)
528.07 s
[really-safe-money-gen] coverage (1096/1610): Money\.AmountOfSpec.ADA.Eq (AmountOf * ADA).(/=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AmountOf * ADA)"s (0 mutations)
528.17 s
[really-safe-money-gen] coverage (1098/1610): Money\.AmountOfSpec.ADA.Show (AmountOf * ADA) and Read (AmountOf * ADA).are implemented such that read \. show == id for valid values (1 mutations)
529.07 s
[really-safe-money-gen] coverage (1093/1610): Money\.AmountOfSpec.ADA.Eq (AmountOf * ADA).(==) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AmountOf * ADA)"s (0 mutations)
529.21 s
[really-safe-money-gen] coverage (1097/1610): Money\.AmountOfSpec.ADA.zero.is valid (1 mutations)
529.22 s
[really-safe-money-gen] coverage (1091/1610): Money\.AmountOfSpec.ADA.Eq (AmountOf * ADA).(==) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is transitive for "valid (AmountOf * ADA)"s (0 mutations)
529.73 s
[really-safe-money-gen] coverage (1087/1610): Money\.AmountOfSpec.USD.Eq (AmountOf * USD).(/=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AmountOf * USD)"s (0 mutations)
529.73 s
[really-safe-money-gen] coverage (1088/1610): Money\.AmountOfSpec.USD.Eq (AmountOf * USD).(/=) \:\: (AmountOf * USD) -> (AmountOf * USD) -> Bool.is antireflexive for "valid (AmountOf * USD)"s (0 mutations)
529.85 s
[really-safe-money-gen] coverage (1072/1610): Money\.AmountOfSpec.USD.distribute.Show (Distribution (AmountOf * USD)) and Read (Distribution (AmountOf * USD)).are implemented such that read \. show == id for valid values (1 mutations)
530.26 s
[really-safe-money-gen] coverage (1102/1610): Money\.AmountOfSpec.ADA.fromRatio.roundtrips with toRatio (19 mutations)
530.46 s
[really-safe-money-gen] coverage (1105/1610): Money\.AmountOfSpec.ADA.fromRatio.succeeds on 1 (19 mutations)
531.04 s
[really-safe-money-gen] coverage (1109/1610): Money\.AmountOfSpec.ADA.fromRational.fails on NaN (2 mutations)
531.07 s
[really-safe-money-gen] coverage (1108/1610): Money\.AmountOfSpec.ADA.fromRatio.fails on 7\.123 (13 mutations)
531.12 s
[really-safe-money-gen] coverage (1107/1610): Money\.AmountOfSpec.ADA.fromRatio.succeeds on 77 (19 mutations)
531.13 s
[really-safe-money-gen] coverage (1110/1610): Money\.AmountOfSpec.ADA.fromRational.succeeds on 1 (19 mutations)
531.45 s
[really-safe-money-gen] coverage (1112/1610): Money\.AmountOfSpec.ADA.fromRational.fails on -1 (8 mutations)
531.93 s
[really-safe-money-gen] coverage (1101/1610): Money\.AmountOfSpec.ADA.fromRatio.produces valid AmountOfs (19 mutations)
532.37 s
[really-safe-money-gen] coverage (1113/1610): Money\.AmountOfSpec.ADA.fromRational.fails on -Infinity (2 mutations)
533.28 s
[really-safe-money-gen] coverage (1115/1610): Money\.AmountOfSpec.ADA.fromRational.produces valid Amounts (19 mutations)
533.71 s
[really-safe-money-gen] coverage (1114/1610): Money\.AmountOfSpec.ADA.fromRational.fails on +Infinity (2 mutations)
533.86 s
[really-safe-money-gen] coverage (1116/1610): Money\.AmountOfSpec.ADA.fromRational.succeeds on 0 (19 mutations)
534.70 s
[really-safe-money-gen] coverage (1118/1610): Money\.AmountOfSpec.ADA.sum.produces valid amounts (10 mutations)
535.33 s
[really-safe-money-gen] coverage (1117/1610): Money\.AmountOfSpec.ADA.sum.matches what you would get with Integer, if nothing fails (10 mutations)
537.13 s
[really-safe-money-gen] coverage (1100/1610): Money\.AmountOfSpec.ADA.toRational.produces valid Rationals (0 mutations)
541.51 s
[really-safe-money-gen] coverage (1103/1610): Money\.AmountOfSpec.ADA.fromRatio.succeeds on 0 (20 mutations)
542.74 s
[really-safe-money-gen] coverage (1106/1610): Money\.AmountOfSpec.ADA.fromRatio.fails on NaN (2 mutations)
543.25 s
[really-safe-money-gen] coverage (1104/1610): Money\.AmountOfSpec.ADA.fromRatio.fails on +Infinity (2 mutations)
543.71 s
[really-safe-money-gen] coverage (1099/1610): Money\.AmountOfSpec.ADA.toRatio.produces valid Rationals when the quantisation factor is nonzero (0 mutations)
544.12 s
[really-safe-money-gen] coverage (1111/1610): Money\.AmountOfSpec.ADA.fromRational.roundtrips with toRational (19 mutations)
544.20 s
[really-safe-money-gen] coverage (1122/1610): Money\.AmountOfSpec.ADA.add.has a right-identity\: zero (10 mutations)
544.93 s
[really-safe-money-gen] coverage (1119/1610): Money\.AmountOfSpec.ADA.toDouble.produces valid Doubles (0 mutations)
544.97 s
[really-safe-money-gen] coverage (1123/1610): Money\.AmountOfSpec.ADA.add.is associative when both succeed (9 mutations)
545.41 s
[really-safe-money-gen] coverage (1126/1610): Money\.AmountOfSpec.ADA.USD.rate.produces valid amounts (10 mutations)
545.63 s
[really-safe-money-gen] coverage (1124/1610): Money\.AmountOfSpec.ADA.add.produces valid amounts (9 mutations)
546.05 s
[really-safe-money-gen] coverage (1129/1610): Money\.AmountOfSpec.ADA.distribute.Show (Distribution (AmountOf * ADA)) and Read (Distribution (AmountOf * ADA)).are implemented such that read \. show == id for valid values (1 mutations)
546.23 s
[really-safe-money-gen] coverage (1125/1610): Money\.AmountOfSpec.ADA.add.is commutative (9 mutations)
546.64 s
[really-safe-money-gen] coverage (1128/1610): Money\.AmountOfSpec.ADA.fromMinimalQuantisations.produces valid amounts (0 mutations)
546.86 s
[really-safe-money-gen] coverage (1131/1610): Money\.AmountOfSpec.ADA.distribute.Eq (Distribution (AmountOf * ADA)).(/=) \:\: (Distribution (AmountOf * ADA)) -> (Distribution (AmountOf * ADA)) -> Bool.is antireflexive for "valid (Distribution (AmountOf * ADA))"s (1 mutations)
546.96 s
[really-safe-money-gen] coverage (1136/1610): Money\.AmountOfSpec.ADA.distribute.Eq (Distribution (AmountOf * ADA)).(==) \:\: (Distribution (AmountOf * ADA)) -> (Distribution (AmountOf * ADA)) -> Bool.is symmetric for "valid (Distribution (AmountOf * ADA))"s (1 mutations)
547.14 s
[really-safe-money-gen] coverage (1130/1610): Money\.AmountOfSpec.ADA.distribute.produces results that sum up to the greater whole (29 mutations)
547.20 s
[really-safe-money-gen] coverage (1138/1610): Money\.AmountOfSpec.ADA.toMinimalQuantisations.roundtrips with fromMinimalQuantisations (0 mutations)
547.84 s
[really-safe-money-gen] coverage (1137/1610): Money\.AmountOfSpec.ADA.distribute.produces valid amounts (21 mutations)
547.95 s
[really-safe-money-gen] coverage (1135/1610): Money\.AmountOfSpec.ADA.distribute.Eq (Distribution (AmountOf * ADA)).(==) \:\: (Distribution (AmountOf * ADA)) -> (Distribution (AmountOf * ADA)) -> Bool.is transitive for "valid (Distribution (AmountOf * ADA))"s (1 mutations)
548.02 s
[really-safe-money-gen] coverage (1142/1610): Money\.AmountOfSpec.ADA.format.produces valid strings (3 mutations)
548.33 s
[really-safe-money-gen] coverage (1139/1610): Money\.AmountOfSpec.ADA.toMinimalQuantisations.produces valid Int64s (0 mutations)
548.96 s
[really-safe-money-gen] coverage (1140/1610): Money\.AmountOfSpec.ADA.CHF.convert.produces valid amounts (25 mutations)
550.09 s
[really-safe-money-gen] coverage (1143/1610): Money\.AmountOfSpec.ADA.GenValid (AmountOf * ADA).genValid \:\: Gen (AmountOf * ADA).only generates valid '(AmountOf * ADA)'s (0 mutations)
551.17 s
[really-safe-money-gen] coverage (1144/1610): Money\.AmountOfSpec.ADA.ADA.rate.produces valid amounts (10 mutations)
551.20 s
[really-safe-money-gen] coverage (1145/1610): Money\.AmountOfSpec.ADA.ADA.convert.produces valid amounts (25 mutations)
551.63 s
[really-safe-money-gen] coverage (1146/1610): Money\.AmountOfSpec.ADA.fraction.produces valid amounts (17 mutations)
553.01 s
[really-safe-money-gen] coverage (1147/1610): Money\.AmountOfSpec.ADA.INR.rate.produces valid amounts (10 mutations)
554.27 s
[really-safe-money-gen] coverage (1148/1610): Money\.AmountOfSpec.ADA.INR.convert.produces valid amounts (25 mutations)
558.96 s
[really-safe-money-gen] coverage (1149/1610): Money\.AmountOfSpec.ADA.multiply.produces valid amounts (9 mutations)
559.79 s
[really-safe-money-gen] coverage (1150/1610): Money\.AmountOfSpec.ADA.multiply.is absorbed by 0 (10 mutations)
560.36 s
[really-safe-money-gen] coverage (1151/1610): Money\.AmountOfSpec.ADA.multiply.matches what you would get with Integer, if nothing fails (9 mutations)
560.81 s
[really-safe-money-gen] coverage (1153/1610): Money\.AmountOfSpec.ADA.multiply.has an identity\: 1 (9 mutations)
560.81 s
[really-safe-money-gen] coverage (1152/1610): Money\.AmountOfSpec.ADA.multiply.is distributive with add when both succeed (17 mutations)
561.43 s
[really-safe-money-gen] coverage (1154/1610): Money\.AmountOfSpec.ADA.fromDouble.succeeds on 0 (30 mutations)
562.27 s
[really-safe-money-gen] coverage (1157/1610): Money\.AmountOfSpec.ADA.fromDouble.fails on NaN (8 mutations)
562.27 s
[really-safe-money-gen] coverage (1155/1610): Money\.AmountOfSpec.ADA.fromDouble.fails on +Infinity (10 mutations)
562.71 s
[really-safe-money-gen] coverage (1156/1610): Money\.AmountOfSpec.ADA.fromDouble.succeeds on 1 (30 mutations)
562.98 s
[really-safe-money-gen] coverage (1158/1610): Money\.AmountOfSpec.ADA.fromDouble.fails on -Infinity (6 mutations)
563.41 s
[really-safe-money-gen] coverage (1160/1610): Money\.AmountOfSpec.ADA.fromDouble.fails on -1 (6 mutations)
563.67 s
[really-safe-money-gen] coverage (1161/1610): Money\.AmountOfSpec.ADA.subtract.matches what you would get with Integer, if nothing fails (10 mutations)
563.85 s
[really-safe-money-gen] coverage (1127/1610): Money\.AmountOfSpec.ADA.USD.convert.produces valid amounts (25 mutations)
563.93 s
[really-safe-money-gen] coverage (1159/1610): Money\.AmountOfSpec.ADA.fromDouble.produces valid amounts (30 mutations)
564.39 s
[really-safe-money-gen] coverage (1121/1610): Money\.AmountOfSpec.ADA.add.has a left-identity\: zero (10 mutations)
564.39 s
[really-safe-money-gen] coverage (1162/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(>) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is antireflexive for "valid (AmountOf * ADA)"'s (0 mutations)
564.83 s
[really-safe-money-gen] coverage (1133/1610): Money\.AmountOfSpec.ADA.distribute.Eq (Distribution (AmountOf * ADA)).(==) \:\: (Distribution (AmountOf * ADA)) -> (Distribution (AmountOf * ADA)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AmountOf * ADA))"s (1 mutations)
565.27 s
[really-safe-money-gen] coverage (1132/1610): Money\.AmountOfSpec.ADA.distribute.Eq (Distribution (AmountOf * ADA)).(/=) \:\: (Distribution (AmountOf * ADA)) -> (Distribution (AmountOf * ADA)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AmountOf * ADA))"s (1 mutations)
565.51 s
[really-safe-money-gen] coverage (1168/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(<=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is transitive for "valid (AmountOf * ADA)"'s (0 mutations)
565.82 s
[really-safe-money-gen] coverage (1134/1610): Money\.AmountOfSpec.ADA.distribute.Eq (Distribution (AmountOf * ADA)).(==) \:\: (Distribution (AmountOf * ADA)) -> (Distribution (AmountOf * ADA)) -> Bool.is reflexive for "valid (Distribution (AmountOf * ADA))"s (1 mutations)
565.89 s
[really-safe-money-gen] coverage (1163/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(>) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is transitive for "valid (AmountOf * ADA)"'s (0 mutations)
566.19 s
[really-safe-money-gen] coverage (1141/1610): Money\.AmountOfSpec.ADA.CHF.rate.produces valid amounts (10 mutations)
567.02 s
[really-safe-money-gen] coverage (1166/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA)."min \:\: (AmountOf * ADA -> AmountOf * ADA -> AmountOf * ADA)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AmountOf * ADA)"'s (0 mutations)
567.51 s
[really-safe-money-gen] coverage (1167/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(<=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AmountOf * ADA)"'s (0 mutations)
568.31 s
[really-safe-money-gen] coverage (1120/1610): Money\.AmountOfSpec.ADA.add.matches what you would get with Integer, if nothing fails (9 mutations)
568.76 s
[really-safe-money-gen] coverage (1177/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(<) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is antireflexive for "valid (AmountOf * ADA)"'s (0 mutations)
570.36 s
[really-safe-money-gen] coverage (1174/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(>=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is antisymmetric for "valid (AmountOf * ADA)"'s (0 mutations)
571.55 s
[really-safe-money-gen] coverage (1176/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(<) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is transitive for "valid (AmountOf * ADA)"'s (0 mutations)
576.52 s
[really-safe-money-gen] coverage (1173/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(>=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is transitive for "valid (AmountOf * ADA)"'s (0 mutations)
577.00 s
[really-safe-money-gen] coverage (1171/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(>=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AmountOf * ADA)"'s (0 mutations)
577.65 s
[really-safe-money-gen] coverage (1172/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(>=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is reflexive for "valid (AmountOf * ADA)"'s (0 mutations)
578.23 s
[really-safe-money-gen] coverage (1180/1610): Money\.AmountOfSpec.INR.distribute.produces results that sum up to the greater whole (29 mutations)
578.41 s
[really-safe-money-gen] coverage (1182/1610): Money\.AmountOfSpec.INR.distribute.Show (Distribution (AmountOf * INR)) and Read (Distribution (AmountOf * INR)).are implemented such that read \. show == id for valid values (1 mutations)
578.73 s
[really-safe-money-gen] coverage (1181/1610): Money\.AmountOfSpec.INR.distribute.produces valid amounts (21 mutations)
579.34 s
[really-safe-money-gen] coverage (1179/1610): Money\.AmountOfSpec.INR.toDouble.produces valid Doubles (0 mutations)
579.77 s
[really-safe-money-gen] coverage (1183/1610): Money\.AmountOfSpec.INR.distribute.Eq (Distribution (AmountOf * INR)).(==) \:\: (Distribution (AmountOf * INR)) -> (Distribution (AmountOf * INR)) -> Bool.is reflexive for "valid (Distribution (AmountOf * INR))"s (1 mutations)
579.91 s
[really-safe-money-gen] coverage (1185/1610): Money\.AmountOfSpec.INR.distribute.Eq (Distribution (AmountOf * INR)).(==) \:\: (Distribution (AmountOf * INR)) -> (Distribution (AmountOf * INR)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AmountOf * INR))"s (1 mutations)
580.82 s
[really-safe-money-gen] coverage (1186/1610): Money\.AmountOfSpec.INR.distribute.Eq (Distribution (AmountOf * INR)).(==) \:\: (Distribution (AmountOf * INR)) -> (Distribution (AmountOf * INR)) -> Bool.is transitive for "valid (Distribution (AmountOf * INR))"s (1 mutations)
581.00 s
[really-safe-money-gen] coverage (1169/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(<=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is reflexive for "valid (AmountOf * ADA)"'s (0 mutations)
581.08 s
[really-safe-money-gen] coverage (1187/1610): Money\.AmountOfSpec.INR.distribute.Eq (Distribution (AmountOf * INR)).(/=) \:\: (Distribution (AmountOf * INR)) -> (Distribution (AmountOf * INR)) -> Bool.is antireflexive for "valid (Distribution (AmountOf * INR))"s (1 mutations)
581.22 s
[really-safe-money-gen] coverage (1178/1610): Money\.AmountOfSpec.INR.subtract.matches what you would get with Integer, if nothing fails (10 mutations)
581.67 s
[really-safe-money-gen] coverage (1170/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(<=) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is antisymmetric for "valid (AmountOf * ADA)"'s (0 mutations)
581.95 s
[really-safe-money-gen] coverage (1175/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(<) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AmountOf * ADA)"'s (0 mutations)
582.05 s
[really-safe-money-gen] coverage (1164/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA).(>) \:\: (AmountOf * ADA) -> (AmountOf * ADA) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AmountOf * ADA)"'s (0 mutations)
582.79 s
[really-safe-money-gen] coverage (1191/1610): Money\.AmountOfSpec.INR.fraction.produces valid amounts (17 mutations)
582.83 s
[really-safe-money-gen] coverage (1165/1610): Money\.AmountOfSpec.ADA.Ord (AmountOf * ADA)."max \:\: (AmountOf * ADA -> AmountOf * ADA -> AmountOf * ADA)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AmountOf * ADA)"'s (0 mutations)
583.10 s
[really-safe-money-gen] coverage (1189/1610): Money\.AmountOfSpec.INR.zero.is valid (1 mutations)
583.53 s
[really-safe-money-gen] coverage (1190/1610): Money\.AmountOfSpec.INR.fromMinimalQuantisations.produces valid amounts (0 mutations)
583.64 s
[really-safe-money-gen] coverage (1188/1610): Money\.AmountOfSpec.INR.distribute.Eq (Distribution (AmountOf * INR)).(/=) \:\: (Distribution (AmountOf * INR)) -> (Distribution (AmountOf * INR)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AmountOf * INR))"s (1 mutations)
584.34 s
[really-safe-money-gen] coverage (1203/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(>) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AmountOf * INR)"'s (0 mutations)
584.58 s
[really-safe-money-gen] coverage (1184/1610): Money\.AmountOfSpec.INR.distribute.Eq (Distribution (AmountOf * INR)).(==) \:\: (Distribution (AmountOf * INR)) -> (Distribution (AmountOf * INR)) -> Bool.is symmetric for "valid (Distribution (AmountOf * INR))"s (1 mutations)
585.67 s
[really-safe-money-gen] coverage (1205/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(<=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is transitive for "valid (AmountOf * INR)"'s (0 mutations)
585.88 s
[really-safe-money-gen] coverage (1204/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(>) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is antireflexive for "valid (AmountOf * INR)"'s (0 mutations)
586.01 s
[really-safe-money-gen] coverage (1206/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(<=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AmountOf * INR)"'s (0 mutations)
588.02 s
[really-safe-money-gen] coverage (1207/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(<=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is reflexive for "valid (AmountOf * INR)"'s (0 mutations)
588.96 s
[really-safe-money-gen] coverage (1208/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(<=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is antisymmetric for "valid (AmountOf * INR)"'s (0 mutations)
593.22 s
[really-safe-money-gen] coverage (1225/1610): Money\.AmountOfSpec.INR.toMinimalQuantisations.produces valid Int64s (0 mutations)
594.24 s
[really-safe-money-gen] coverage (1226/1610): Money\.AmountOfSpec.INR.fromRational.succeeds on 0 (19 mutations)
594.95 s
[really-safe-money-gen] coverage (1228/1610): Money\.AmountOfSpec.INR.fromRational.roundtrips with toRational (19 mutations)
595.24 s
[really-safe-money-gen] coverage (1215/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(<) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is antireflexive for "valid (AmountOf * INR)"'s (0 mutations)
595.40 s
[really-safe-money-gen] coverage (1227/1610): Money\.AmountOfSpec.INR.fromRational.fails on -Infinity (2 mutations)
595.59 s
[really-safe-money-gen] coverage (1211/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(>=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is transitive for "valid (AmountOf * INR)"'s (0 mutations)
596.10 s
[really-safe-money-gen] coverage (1230/1610): Money\.AmountOfSpec.INR.fromRational.fails on NaN (2 mutations)
596.18 s
[really-safe-money-gen] coverage (1229/1610): Money\.AmountOfSpec.INR.fromRational.fails on +Infinity (2 mutations)
596.61 s
[really-safe-money-gen] coverage (1223/1610): Money\.AmountOfSpec.INR.multiply.is distributive with add when both succeed (17 mutations)
597.21 s
[really-safe-money-gen] coverage (1233/1610): Money\.AmountOfSpec.INR.fromRational.fails on -1 (8 mutations)
597.99 s
[really-safe-money-gen] coverage (1224/1610): Money\.AmountOfSpec.INR.toMinimalQuantisations.roundtrips with fromMinimalQuantisations (0 mutations)
598.28 s
[really-safe-money-gen] coverage (1196/1610): Money\.AmountOfSpec.INR.fromDouble.fails on NaN (8 mutations)
598.33 s
[really-safe-money-gen] coverage (1198/1610): Money\.AmountOfSpec.INR.fromDouble.fails on -1 (6 mutations)
598.46 s
[really-safe-money-gen] coverage (1234/1610): Money\.AmountOfSpec.INR.add.is commutative (9 mutations)
598.70 s
[really-safe-money-gen] coverage (1209/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(>=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AmountOf * INR)"'s (0 mutations)
599.36 s
[really-safe-money-gen] coverage (1238/1610): Money\.AmountOfSpec.INR.add.has a right-identity\: zero (10 mutations)
599.45 s
[really-safe-money-gen] coverage (1235/1610): Money\.AmountOfSpec.INR.add.is associative when both succeed (9 mutations)
599.89 s
[really-safe-money-gen] coverage (1237/1610): Money\.AmountOfSpec.INR.add.has a left-identity\: zero (10 mutations)
600.20 s
[really-safe-money-gen] coverage (1236/1610): Money\.AmountOfSpec.INR.add.matches what you would get with Integer, if nothing fails (9 mutations)
600.38 s
[really-safe-money-gen] coverage (1199/1610): Money\.AmountOfSpec.INR.fromDouble.succeeds on 0 (30 mutations)
600.92 s
[really-safe-money-gen] coverage (1245/1610): Money\.AmountOfSpec.INR.format.produces valid strings (3 mutations)
601.32 s
[really-safe-money-gen] coverage (1246/1610): Money\.AmountOfSpec.INR.INR.rate.produces valid amounts (10 mutations)
601.36 s
[really-safe-money-gen] coverage (1240/1610): Money\.AmountOfSpec.INR.toRatio.produces valid Rationals when the quantisation factor is nonzero (0 mutations)
601.44 s
[really-safe-money-gen] coverage (1239/1610): Money\.AmountOfSpec.INR.add.produces valid amounts (9 mutations)
602.47 s
[really-safe-money-gen] coverage (1250/1610): Money\.AmountOfSpec.INR.fromRatio.fails on NaN (2 mutations)
603.55 s
[really-safe-money-gen] coverage (1249/1610): Money\.AmountOfSpec.INR.BTC.convert.produces valid amounts (25 mutations)
608.15 s
[really-safe-money-gen] coverage (1251/1610): Money\.AmountOfSpec.INR.fromRatio.fails on +Infinity (2 mutations)
608.69 s
[really-safe-money-gen] coverage (1252/1610): Money\.AmountOfSpec.INR.fromRatio.succeeds on 1 (19 mutations)
615.92 s
[really-safe-money-gen] coverage (1253/1610): Money\.AmountOfSpec.INR.fromRatio.succeeds on 0 (20 mutations)
616.18 s
[really-safe-money-gen] coverage (1254/1610): Money\.AmountOfSpec.INR.fromRatio.roundtrips with toRatio (19 mutations)
618.50 s
[really-safe-money-gen] coverage (1255/1610): Money\.AmountOfSpec.INR.fromRatio.produces valid AmountOfs (19 mutations)
618.97 s
[really-safe-money-gen] coverage (1257/1610): Money\.AmountOfSpec.INR.fromRatio.succeeds on 77 (19 mutations)
619.47 s
[really-safe-money-gen] coverage (1261/1610): Money\.AmountOfSpec.INR.Eq (AmountOf * INR).(==) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is reflexive for "valid (AmountOf * INR)"s (0 mutations)
619.70 s
[really-safe-money-gen] coverage (1256/1610): Money\.AmountOfSpec.INR.fromRatio.fails on 7\.123 (13 mutations)
620.20 s
[really-safe-money-gen] coverage (1258/1610): Money\.AmountOfSpec.INR.GenValid (AmountOf * INR).genValid \:\: Gen (AmountOf * INR).only generates valid '(AmountOf * INR)'s (0 mutations)
620.20 s
[really-safe-money-gen] coverage (1276/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC)."min \:\: (AmountOf * BTC -> AmountOf * BTC -> AmountOf * BTC)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AmountOf * BTC)"'s (0 mutations)
620.94 s
[really-safe-money-gen] coverage (1262/1610): Money\.AmountOfSpec.INR.Eq (AmountOf * INR).(==) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AmountOf * INR)"s (0 mutations)
620.97 s
[really-safe-money-gen] coverage (1264/1610): Money\.AmountOfSpec.INR.Eq (AmountOf * INR).(/=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is antireflexive for "valid (AmountOf * INR)"s (0 mutations)
621.11 s
[really-safe-money-gen] coverage (1259/1610): Money\.AmountOfSpec.INR.Eq (AmountOf * INR).(==) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is symmetric for "valid (AmountOf * INR)"s (0 mutations)
621.19 s
[really-safe-money-gen] coverage (1265/1610): Money\.AmountOfSpec.INR.USD.convert.produces valid amounts (25 mutations)
621.90 s
[really-safe-money-gen] coverage (1263/1610): Money\.AmountOfSpec.INR.Eq (AmountOf * INR).(/=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AmountOf * INR)"s (0 mutations)
622.69 s
[really-safe-money-gen] coverage (1260/1610): Money\.AmountOfSpec.INR.Eq (AmountOf * INR).(==) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is transitive for "valid (AmountOf * INR)"s (0 mutations)
623.21 s
[really-safe-money-gen] coverage (1268/1610): Money\.AmountOfSpec.BTC.toMinimalQuantisations.roundtrips with fromMinimalQuantisations (0 mutations)
623.22 s
[really-safe-money-gen] coverage (1267/1610): Money\.AmountOfSpec.BTC.format.produces valid strings (3 mutations)
624.41 s
[really-safe-money-gen] coverage (1266/1610): Money\.AmountOfSpec.INR.USD.rate.produces valid amounts (10 mutations)
625.77 s
[really-safe-money-gen] coverage (1270/1610): Money\.AmountOfSpec.BTC.INR.rate.produces valid amounts (10 mutations)
625.97 s
[really-safe-money-gen] coverage (1269/1610): Money\.AmountOfSpec.BTC.toMinimalQuantisations.produces valid Int64s (0 mutations)
627.05 s
[really-safe-money-gen] coverage (1271/1610): Money\.AmountOfSpec.BTC.INR.convert.produces valid amounts (25 mutations)
627.76 s
[really-safe-money-gen] coverage (1273/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(<=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is transitive for "valid (AmountOf * BTC)"'s (0 mutations)
627.82 s
[really-safe-money-gen] coverage (1210/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(>=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is reflexive for "valid (AmountOf * INR)"'s (0 mutations)
628.33 s
[really-safe-money-gen] coverage (1272/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(<=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AmountOf * BTC)"'s (0 mutations)
629.69 s
[really-safe-money-gen] coverage (1192/1610): Money\.AmountOfSpec.INR.ADA.rate.produces valid amounts (10 mutations)
630.22 s
[really-safe-money-gen] coverage (1274/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(<=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is reflexive for "valid (AmountOf * BTC)"'s (0 mutations)
630.28 s
[really-safe-money-gen] coverage (1275/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(<=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is antisymmetric for "valid (AmountOf * BTC)"'s (0 mutations)
632.08 s
[really-safe-money-gen] coverage (1195/1610): Money\.AmountOfSpec.INR.fromDouble.succeeds on 1 (30 mutations)
633.19 s
[really-safe-money-gen] coverage (1277/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(>=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is antisymmetric for "valid (AmountOf * BTC)"'s (0 mutations)
641.93 s
[really-safe-money-gen] coverage (1286/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(>) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is transitive for "valid (AmountOf * BTC)"'s (0 mutations)
642.43 s
[really-safe-money-gen] coverage (1281/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC)."max \:\: (AmountOf * BTC -> AmountOf * BTC -> AmountOf * BTC)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AmountOf * BTC)"'s (0 mutations)
643.40 s
[really-safe-money-gen] coverage (1202/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(>) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is transitive for "valid (AmountOf * INR)"'s (0 mutations)
643.49 s
[really-safe-money-gen] coverage (1279/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(>=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AmountOf * BTC)"'s (0 mutations)
643.50 s
[really-safe-money-gen] coverage (1280/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(>=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is transitive for "valid (AmountOf * BTC)"'s (0 mutations)
643.53 s
[really-safe-money-gen] coverage (1283/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(<) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is antireflexive for "valid (AmountOf * BTC)"'s (0 mutations)
643.61 s
[really-safe-money-gen] coverage (1197/1610): Money\.AmountOfSpec.INR.fromDouble.fails on +Infinity (10 mutations)
644.94 s
[really-safe-money-gen] coverage (1282/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(<) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AmountOf * BTC)"'s (0 mutations)
647.72 s
[really-safe-money-gen] coverage (1285/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(>) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is antireflexive for "valid (AmountOf * BTC)"'s (0 mutations)
647.80 s
[really-safe-money-gen] coverage (1241/1610): Money\.AmountOfSpec.INR.Show (AmountOf * INR) and Read (AmountOf * INR).are implemented such that read \. show == id for valid values (1 mutations)
648.04 s
[really-safe-money-gen] coverage (1221/1610): Money\.AmountOfSpec.INR.multiply.is absorbed by 0 (10 mutations)
648.28 s
[really-safe-money-gen] coverage (1247/1610): Money\.AmountOfSpec.INR.INR.convert.produces valid amounts (25 mutations)
648.72 s
[really-safe-money-gen] coverage (1287/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(>) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AmountOf * BTC)"'s (0 mutations)
649.22 s
[really-safe-money-gen] coverage (1242/1610): Money\.AmountOfSpec.INR.toRational.produces valid Rationals (0 mutations)
649.97 s
[really-safe-money-gen] coverage (1284/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(<) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is transitive for "valid (AmountOf * BTC)"'s (0 mutations)
650.46 s
[really-safe-money-gen] coverage (1219/1610): Money\.AmountOfSpec.INR.multiply.matches what you would get with Integer, if nothing fails (9 mutations)
650.69 s
[really-safe-money-gen] coverage (1243/1610): Money\.AmountOfSpec.INR.sum.produces valid amounts (10 mutations)
651.18 s
[really-safe-money-gen] coverage (1193/1610): Money\.AmountOfSpec.INR.ADA.convert.produces valid amounts (25 mutations)
651.28 s
[really-safe-money-gen] coverage (1278/1610): Money\.AmountOfSpec.BTC.Ord (AmountOf * BTC).(>=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is reflexive for "valid (AmountOf * BTC)"'s (0 mutations)
653.31 s
[really-safe-money-gen] coverage (1292/1610): Money\.AmountOfSpec.BTC.fromRatio.succeeds on 1 (19 mutations)
653.95 s
[really-safe-money-gen] coverage (1244/1610): Money\.AmountOfSpec.INR.sum.matches what you would get with Integer, if nothing fails (10 mutations)
654.17 s
[really-safe-money-gen] coverage (1217/1610): Money\.AmountOfSpec.INR.CHF.convert.produces valid amounts (25 mutations)
654.63 s
[really-safe-money-gen] coverage (1218/1610): Money\.AmountOfSpec.INR.CHF.rate.produces valid amounts (10 mutations)
655.11 s
[really-safe-money-gen] coverage (1288/1610): Money\.AmountOfSpec.BTC.fromRatio.roundtrips with toRatio (19 mutations)
655.12 s
[really-safe-money-gen] coverage (1293/1610): Money\.AmountOfSpec.BTC.fromRatio.produces valid AmountOfs (19 mutations)
655.90 s
[really-safe-money-gen] coverage (1289/1610): Money\.AmountOfSpec.BTC.fromRatio.fails on NaN (2 mutations)
656.66 s
[really-safe-money-gen] coverage (1291/1610): Money\.AmountOfSpec.BTC.fromRatio.succeeds on 0 (20 mutations)
659.77 s
[really-safe-money-gen] coverage (1290/1610): Money\.AmountOfSpec.BTC.fromRatio.succeeds on 77 (19 mutations)
663.94 s
[really-safe-money-gen] coverage (1315/1610): Money\.AmountOfSpec.BTC.USD.convert.produces valid amounts (25 mutations)
666.59 s
[really-safe-money-gen] coverage (1220/1610): Money\.AmountOfSpec.INR.multiply.produces valid amounts (9 mutations)
666.70 s
[really-safe-money-gen] coverage (1310/1610): Money\.AmountOfSpec.BTC.fromDouble.succeeds on 0 (30 mutations)
667.76 s
[really-safe-money-gen] coverage (1311/1610): Money\.AmountOfSpec.BTC.fromDouble.fails on -Infinity (6 mutations)
667.78 s
[really-safe-money-gen] coverage (1314/1610): Money\.AmountOfSpec.BTC.USD.rate.produces valid amounts (10 mutations)
668.49 s
[really-safe-money-gen] coverage (1313/1610): Money\.AmountOfSpec.BTC.GenValid (AmountOf * BTC).genValid \:\: Gen (AmountOf * BTC).only generates valid '(AmountOf * BTC)'s (0 mutations)
669.64 s
[really-safe-money-gen] coverage (1312/1610): Money\.AmountOfSpec.BTC.fromDouble.fails on NaN (8 mutations)
669.92 s
[really-safe-money-gen] coverage (1318/1610): Money\.AmountOfSpec.BTC.Eq (AmountOf * BTC).(==) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AmountOf * BTC)"s (0 mutations)
670.46 s
[really-safe-money-gen] coverage (1316/1610): Money\.AmountOfSpec.BTC.Eq (AmountOf * BTC).(==) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is reflexive for "valid (AmountOf * BTC)"s (0 mutations)
670.72 s
[really-safe-money-gen] coverage (1321/1610): Money\.AmountOfSpec.BTC.Eq (AmountOf * BTC).(/=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is antireflexive for "valid (AmountOf * BTC)"s (0 mutations)
673.12 s
[really-safe-money-gen] coverage (1325/1610): Money\.AmountOfSpec.BTC.add.is commutative (9 mutations)
673.64 s
[really-safe-money-gen] coverage (1323/1610): Money\.AmountOfSpec.BTC.add.has a left-identity\: zero (10 mutations)
674.79 s
[really-safe-money-gen] coverage (1322/1610): Money\.AmountOfSpec.BTC.add.has a right-identity\: zero (10 mutations)
675.36 s
[really-safe-money-gen] coverage (1317/1610): Money\.AmountOfSpec.BTC.Eq (AmountOf * BTC).(==) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is transitive for "valid (AmountOf * BTC)"s (0 mutations)
675.92 s
[really-safe-money-gen] coverage (1329/1610): Money\.AmountOfSpec.BTC.ADA.rate.produces valid amounts (10 mutations)
676.18 s
[really-safe-money-gen] coverage (1319/1610): Money\.AmountOfSpec.BTC.Eq (AmountOf * BTC).(==) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is symmetric for "valid (AmountOf * BTC)"s (0 mutations)
676.36 s
[really-safe-money-gen] coverage (1320/1610): Money\.AmountOfSpec.BTC.Eq (AmountOf * BTC).(/=) \:\: (AmountOf * BTC) -> (AmountOf * BTC) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AmountOf * BTC)"s (0 mutations)
676.66 s
[really-safe-money-gen] coverage (1327/1610): Money\.AmountOfSpec.BTC.add.is associative when both succeed (9 mutations)
676.91 s
[really-safe-money-gen] coverage (1324/1610): Money\.AmountOfSpec.BTC.add.matches what you would get with Integer, if nothing fails (9 mutations)
677.77 s
[really-safe-money-gen] coverage (1332/1610): Money\.AmountOfSpec.BTC.BTC.rate.produces valid amounts (10 mutations)
678.90 s
[really-safe-money-gen] coverage (1326/1610): Money\.AmountOfSpec.BTC.add.produces valid amounts (9 mutations)
679.52 s
[really-safe-money-gen] coverage (1343/1610): Money\.AmountOfSpec.BTC.distribute.Eq (Distribution (AmountOf * BTC)).(==) \:\: (Distribution (AmountOf * BTC)) -> (Distribution (AmountOf * BTC)) -> Bool.is symmetric for "valid (Distribution (AmountOf * BTC))"s (1 mutations)
679.55 s
[really-safe-money-gen] coverage (1331/1610): Money\.AmountOfSpec.BTC.BTC.convert.produces valid amounts (25 mutations)
680.04 s
[really-safe-money-gen] coverage (1328/1610): Money\.AmountOfSpec.BTC.ADA.convert.produces valid amounts (25 mutations)
680.66 s
[really-safe-money-gen] coverage (1333/1610): Money\.AmountOfSpec.BTC.toDouble.produces valid Doubles (0 mutations)
681.63 s
[really-safe-money-gen] coverage (1336/1610): Money\.AmountOfSpec.BTC.fromMinimalQuantisations.produces valid amounts (0 mutations)
681.65 s
[really-safe-money-gen] coverage (1346/1610): Money\.AmountOfSpec.BTC.distribute.produces valid amounts (21 mutations)
682.30 s
[really-safe-money-gen] coverage (1334/1610): Money\.AmountOfSpec.BTC.Show (AmountOf * BTC) and Read (AmountOf * BTC).are implemented such that read \. show == id for valid values (1 mutations)
682.30 s
[really-safe-money-gen] coverage (1330/1610): Money\.AmountOfSpec.BTC.zero.is valid (1 mutations)
686.03 s
[really-safe-money-gen] coverage (1335/1610): Money\.AmountOfSpec.BTC.subtract.matches what you would get with Integer, if nothing fails (10 mutations)
688.92 s
[really-safe-money-gen] coverage (1353/1610): Money\.AmountOfSpec.BTC.multiply.produces valid amounts (9 mutations)
691.58 s
[really-safe-money-gen] coverage (1337/1610): Money\.AmountOfSpec.BTC.toRatio.produces valid Rationals when the quantisation factor is nonzero (0 mutations)
694.86 s
[really-safe-money-gen] coverage (1340/1610): Money\.AmountOfSpec.BTC.distribute.Eq (Distribution (AmountOf * BTC)).(/=) \:\: (Distribution (AmountOf * BTC)) -> (Distribution (AmountOf * BTC)) -> Bool.is antireflexive for "valid (Distribution (AmountOf * BTC))"s (1 mutations)
695.07 s
[really-safe-money-gen] coverage (1352/1610): Money\.AmountOfSpec.BTC.multiply.has an identity\: 1 (9 mutations)
695.18 s
[really-safe-money-gen] coverage (1342/1610): Money\.AmountOfSpec.BTC.distribute.Eq (Distribution (AmountOf * BTC)).(==) \:\: (Distribution (AmountOf * BTC)) -> (Distribution (AmountOf * BTC)) -> Bool.is reflexive for "valid (Distribution (AmountOf * BTC))"s (1 mutations)
695.72 s
[really-safe-money-gen] coverage (1339/1610): Money\.AmountOfSpec.BTC.sum.produces valid amounts (10 mutations)
695.73 s
[really-safe-money-gen] coverage (1338/1610): Money\.AmountOfSpec.BTC.sum.matches what you would get with Integer, if nothing fails (10 mutations)
695.76 s
[really-safe-money-gen] coverage (1344/1610): Money\.AmountOfSpec.BTC.distribute.Eq (Distribution (AmountOf * BTC)).(==) \:\: (Distribution (AmountOf * BTC)) -> (Distribution (AmountOf * BTC)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AmountOf * BTC))"s (1 mutations)
697.56 s
[really-safe-money-gen] coverage (1365/1610): Money\.AmountOfSpec.CHF.fromRatio.succeeds on 1 (19 mutations)
697.70 s
[really-safe-money-gen] coverage (1349/1610): Money\.AmountOfSpec.BTC.toRational.produces valid Rationals (0 mutations)
697.77 s
[really-safe-money-gen] coverage (1356/1610): Money\.AmountOfSpec.CHF.INR.convert.produces valid amounts (25 mutations)
699.04 s
[really-safe-money-gen] coverage (1367/1610): Money\.AmountOfSpec.CHF.fromRatio.succeeds on 77 (19 mutations)
699.05 s
[really-safe-money-gen] coverage (1348/1610): Money\.AmountOfSpec.BTC.distribute.Show (Distribution (AmountOf * BTC)) and Read (Distribution (AmountOf * BTC)).are implemented such that read \. show == id for valid values (1 mutations)
699.11 s
[really-safe-money-gen] coverage (1347/1610): Money\.AmountOfSpec.BTC.distribute.produces results that sum up to the greater whole (29 mutations)
699.42 s
[really-safe-money-gen] coverage (1341/1610): Money\.AmountOfSpec.BTC.distribute.Eq (Distribution (AmountOf * BTC)).(/=) \:\: (Distribution (AmountOf * BTC)) -> (Distribution (AmountOf * BTC)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AmountOf * BTC))"s (1 mutations)
699.59 s
[really-safe-money-gen] coverage (1354/1610): Money\.AmountOfSpec.BTC.multiply.matches what you would get with Integer, if nothing fails (9 mutations)
700.05 s
[really-safe-money-gen] coverage (1364/1610): Money\.AmountOfSpec.CHF.fromRatio.roundtrips with toRatio (19 mutations)
701.34 s
[really-safe-money-gen] coverage (1345/1610): Money\.AmountOfSpec.BTC.distribute.Eq (Distribution (AmountOf * BTC)).(==) \:\: (Distribution (AmountOf * BTC)) -> (Distribution (AmountOf * BTC)) -> Bool.is transitive for "valid (Distribution (AmountOf * BTC))"s (1 mutations)
701.64 s
[really-safe-money-gen] coverage (1360/1610): Money\.AmountOfSpec.CHF.fromMinimalQuantisations.produces valid amounts (0 mutations)
701.64 s
[really-safe-money-gen] coverage (1350/1610): Money\.AmountOfSpec.BTC.fraction.produces valid amounts (17 mutations)
702.40 s
[really-safe-money-gen] coverage (1359/1610): Money\.AmountOfSpec.CHF.USD.rate.produces valid amounts (10 mutations)
703.17 s
[really-safe-money-gen] coverage (1374/1610): Money\.AmountOfSpec.CHF.multiply.produces valid amounts (9 mutations)
703.31 s
[really-safe-money-gen] coverage (1361/1610): Money\.AmountOfSpec.CHF.fromRatio.succeeds on 0 (20 mutations)
704.42 s
[really-safe-money-gen] coverage (1351/1610): Money\.AmountOfSpec.BTC.multiply.is absorbed by 0 (10 mutations)
704.42 s
[really-safe-money-gen] coverage (1362/1610): Money\.AmountOfSpec.CHF.fromRatio.fails on +Infinity (2 mutations)
704.70 s
[really-safe-money-gen] coverage (1357/1610): Money\.AmountOfSpec.CHF.INR.rate.produces valid amounts (10 mutations)
707.71 s
[really-safe-money-gen] coverage (1358/1610): Money\.AmountOfSpec.CHF.USD.convert.produces valid amounts (25 mutations)
707.91 s
[really-safe-money-gen] coverage (1369/1610): Money\.AmountOfSpec.CHF.fraction.produces valid amounts (17 mutations)
709.47 s
[really-safe-money-gen] coverage (1355/1610): Money\.AmountOfSpec.BTC.multiply.is distributive with add when both succeed (17 mutations)
710.02 s
[really-safe-money-gen] coverage (1363/1610): Money\.AmountOfSpec.CHF.fromRatio.fails on NaN (2 mutations)
712.44 s
[really-safe-money-gen] coverage (1382/1610): Money\.AmountOfSpec.CHF.fromRational.roundtrips with toRational (19 mutations)
712.69 s
[really-safe-money-gen] coverage (1366/1610): Money\.AmountOfSpec.CHF.fromRatio.fails on 7\.123 (13 mutations)
712.71 s
[really-safe-money-gen] coverage (1368/1610): Money\.AmountOfSpec.CHF.fromRatio.produces valid AmountOfs (19 mutations)
715.32 s
[really-safe-money-gen] coverage (1377/1610): Money\.AmountOfSpec.CHF.fromRational.produces valid Amounts (19 mutations)
716.44 s
[really-safe-money-gen] coverage (1370/1610): Money\.AmountOfSpec.CHF.multiply.has an identity\: 1 (9 mutations)
717.70 s
[really-safe-money-gen] coverage (1376/1610): Money\.AmountOfSpec.CHF.fromRational.fails on +Infinity (2 mutations)
717.80 s
[really-safe-money-gen] coverage (1372/1610): Money\.AmountOfSpec.CHF.multiply.is distributive with add when both succeed (17 mutations)
718.50 s
[really-safe-money-gen] coverage (1388/1610): Money\.AmountOfSpec.CHF.Eq (AmountOf * CHF).(/=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is antireflexive for "valid (AmountOf * CHF)"s (0 mutations)
719.71 s
[really-safe-money-gen] coverage (1383/1610): Money\.AmountOfSpec.CHF.fromRational.succeeds on 1 (19 mutations)
721.88 s
[really-safe-money-gen] coverage (1384/1610): Money\.AmountOfSpec.CHF.Eq (AmountOf * CHF).(==) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (AmountOf * CHF)"s (0 mutations)
722.56 s
[really-safe-money-gen] coverage (1375/1610): Money\.AmountOfSpec.CHF.toRatio.produces valid Rationals when the quantisation factor is nonzero (0 mutations)
723.15 s
[really-safe-money-gen] coverage (1378/1610): Money\.AmountOfSpec.CHF.fromRational.succeeds on 0 (19 mutations)
723.76 s
[really-safe-money-gen] coverage (1371/1610): Money\.AmountOfSpec.CHF.multiply.is absorbed by 0 (10 mutations)
725.56 s
[really-safe-money-gen] coverage (1380/1610): Money\.AmountOfSpec.CHF.fromRational.fails on -1 (8 mutations)
725.78 s
[really-safe-money-gen] coverage (1373/1610): Money\.AmountOfSpec.CHF.multiply.matches what you would get with Integer, if nothing fails (9 mutations)
726.74 s
[really-safe-money-gen] coverage (1387/1610): Money\.AmountOfSpec.CHF.Eq (AmountOf * CHF).(==) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is transitive for "valid (AmountOf * CHF)"s (0 mutations)
726.79 s
[really-safe-money-gen] coverage (1379/1610): Money\.AmountOfSpec.CHF.fromRational.fails on -Infinity (2 mutations)
729.44 s
[really-safe-money-gen] coverage (1403/1610): Money\.AmountOfSpec.CHF.fromDouble.produces valid amounts (30 mutations)
729.72 s
[really-safe-money-gen] coverage (1392/1610): Money\.AmountOfSpec.CHF.BTC.convert.produces valid amounts (25 mutations)
730.35 s
[really-safe-money-gen] coverage (1390/1610): Money\.AmountOfSpec.CHF.sum.matches what you would get with Integer, if nothing fails (10 mutations)
730.53 s
[really-safe-money-gen] coverage (1385/1610): Money\.AmountOfSpec.CHF.Eq (AmountOf * CHF).(==) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is symmetric for "valid (AmountOf * CHF)"s (0 mutations)
730.67 s
[really-safe-money-gen] coverage (1397/1610): Money\.AmountOfSpec.CHF.toRational.produces valid Rationals (0 mutations)
731.24 s
[really-safe-money-gen] coverage (1381/1610): Money\.AmountOfSpec.CHF.fromRational.fails on NaN (2 mutations)
731.43 s
[really-safe-money-gen] coverage (1391/1610): Money\.AmountOfSpec.CHF.sum.produces valid amounts (10 mutations)
731.52 s
[really-safe-money-gen] coverage (1386/1610): Money\.AmountOfSpec.CHF.Eq (AmountOf * CHF).(==) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is reflexive for "valid (AmountOf * CHF)"s (0 mutations)
732.07 s
[really-safe-money-gen] coverage (1402/1610): Money\.AmountOfSpec.CHF.fromDouble.succeeds on 1 (30 mutations)
732.11 s
[really-safe-money-gen] coverage (1406/1610): Money\.AmountOfSpec.CHF.fromDouble.fails on -1 (6 mutations)
732.31 s
[really-safe-money-gen] coverage (1413/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF)."max \:\: (AmountOf * CHF -> AmountOf * CHF -> AmountOf * CHF)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AmountOf * CHF)"'s (0 mutations)
732.87 s
[really-safe-money-gen] coverage (1395/1610): Money\.AmountOfSpec.CHF.subtract.matches what you would get with Integer, if nothing fails (10 mutations)
733.64 s
[really-safe-money-gen] coverage (1409/1610): Money\.AmountOfSpec.CHF.ADA.rate.produces valid amounts (10 mutations)
734.85 s
[really-safe-money-gen] coverage (1398/1610): Money\.AmountOfSpec.CHF.CHF.convert.produces valid amounts (25 mutations)
736.72 s
[really-safe-money-gen] coverage (1393/1610): Money\.AmountOfSpec.CHF.BTC.rate.produces valid amounts (10 mutations)
736.92 s
[really-safe-money-gen] coverage (1389/1610): Money\.AmountOfSpec.CHF.Eq (AmountOf * CHF).(/=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (AmountOf * CHF)"s (0 mutations)
737.66 s
[really-safe-money-gen] coverage (1427/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(<=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is reflexive for "valid (AmountOf * CHF)"'s (0 mutations)
738.41 s
[really-safe-money-gen] coverage (1396/1610): Money\.AmountOfSpec.CHF.toDouble.produces valid Doubles (0 mutations)
738.61 s
[really-safe-money-gen] coverage (1399/1610): Money\.AmountOfSpec.CHF.CHF.rate.produces valid amounts (10 mutations)
739.12 s
[really-safe-money-gen] coverage (1394/1610): Money\.AmountOfSpec.CHF.zero.is valid (1 mutations)
739.19 s
[really-safe-money-gen] coverage (1401/1610): Money\.AmountOfSpec.CHF.format.produces valid strings (3 mutations)
739.36 s
[really-safe-money-gen] coverage (1410/1610): Money\.AmountOfSpec.CHF.ADA.convert.produces valid amounts (25 mutations)
740.72 s
[really-safe-money-gen] coverage (1411/1610): Money\.AmountOfSpec.CHF.toMinimalQuantisations.produces valid Int64s (0 mutations)
740.76 s
[really-safe-money-gen] coverage (1408/1610): Money\.AmountOfSpec.CHF.fromDouble.fails on -Infinity (6 mutations)
741.24 s
[really-safe-money-gen] coverage (1400/1610): Money\.AmountOfSpec.CHF.Show (AmountOf * CHF) and Read (AmountOf * CHF).are implemented such that read \. show == id for valid values (1 mutations)
741.27 s
[really-safe-money-gen] coverage (1422/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(<) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is antireflexive for "valid (AmountOf * CHF)"'s (0 mutations)
744.10 s
[really-safe-money-gen] coverage (1404/1610): Money\.AmountOfSpec.CHF.fromDouble.fails on +Infinity (10 mutations)
744.66 s
[really-safe-money-gen] coverage (1435/1610): Money\.AmountOfSpec.CHF.distribute.Eq (Distribution (AmountOf * CHF)).(==) \:\: (Distribution (AmountOf * CHF)) -> (Distribution (AmountOf * CHF)) -> Bool.is symmetric for "valid (Distribution (AmountOf * CHF))"s (1 mutations)
746.10 s
[really-safe-money-gen] coverage (1407/1610): Money\.AmountOfSpec.CHF.fromDouble.fails on NaN (8 mutations)
747.54 s
[really-safe-money-gen] coverage (1418/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(>=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is transitive for "valid (AmountOf * CHF)"'s (0 mutations)
747.73 s
[really-safe-money-gen] coverage (1412/1610): Money\.AmountOfSpec.CHF.toMinimalQuantisations.roundtrips with fromMinimalQuantisations (0 mutations)
747.91 s
[really-safe-money-gen] coverage (1405/1610): Money\.AmountOfSpec.CHF.fromDouble.succeeds on 0 (30 mutations)
750.18 s
[really-safe-money-gen] coverage (1416/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(>) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is antireflexive for "valid (AmountOf * CHF)"'s (0 mutations)
750.85 s
[really-safe-money-gen] coverage (1431/1610): Money\.AmountOfSpec.CHF.distribute.produces valid amounts (21 mutations)
751.57 s
[really-safe-money-gen] coverage (1421/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(>=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is reflexive for "valid (AmountOf * CHF)"'s (0 mutations)
753.13 s
[really-safe-money-gen] coverage (1444/1610): Money\.AmountOfSpec.CHF.add.has a right-identity\: zero (10 mutations)
753.40 s
[really-safe-money-gen] coverage (1424/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(<) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is transitive for "valid (AmountOf * CHF)"'s (0 mutations)
755.42 s
[really-safe-money-gen] coverage (1443/1610): Money\.AmountOfSpec.CHF.add.matches what you would get with Integer, if nothing fails (9 mutations)
755.51 s
[really-safe-money-gen] coverage (1415/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(>) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid (AmountOf * CHF)"'s (0 mutations)
757.23 s
[really-safe-money-gen] coverage (1423/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(<) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AmountOf * CHF)"'s (0 mutations)
757.45 s
[really-safe-money-gen] coverage (1414/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF)."min \:\: (AmountOf * CHF -> AmountOf * CHF -> AmountOf * CHF)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AmountOf * CHF)"'s (0 mutations)
757.52 s
[really-safe-money-gen] coverage (1417/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(>) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is transitive for "valid (AmountOf * CHF)"'s (0 mutations)
758.12 s
[really-safe-money-gen] coverage (1429/1610): Money\.AmountOfSpec.CHF.GenValid (AmountOf * CHF).genValid \:\: Gen (AmountOf * CHF).only generates valid '(AmountOf * CHF)'s (0 mutations)
758.18 s
[really-safe-money-gen] coverage (1450/1610): Money\.AmountSpec.fraction.Produces a result that has been rounded in the right direction when using RoundUp (6 mutations)
758.39 s
[really-safe-money-gen] coverage (1430/1610): Money\.AmountOfSpec.CHF.distribute.Show (Distribution (AmountOf * CHF)) and Read (Distribution (AmountOf * CHF)).are implemented such that read \. show == id for valid values (1 mutations)
758.69 s
[really-safe-money-gen] coverage (1436/1610): Money\.AmountOfSpec.CHF.distribute.Eq (Distribution (AmountOf * CHF)).(==) \:\: (Distribution (AmountOf * CHF)) -> (Distribution (AmountOf * CHF)) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution (AmountOf * CHF))"s (1 mutations)
758.76 s
[really-safe-money-gen] coverage (1426/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(<=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid (AmountOf * CHF)"'s (0 mutations)
758.90 s
[really-safe-money-gen] coverage (1419/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(>=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid (AmountOf * CHF)"'s (0 mutations)
760.04 s
[really-safe-money-gen] coverage (1425/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(<=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is transitive for "valid (AmountOf * CHF)"'s (0 mutations)
761.11 s
[really-safe-money-gen] coverage (1446/1610): Money\.AmountSpec.fraction.Correctly fractions 101 with 1 % 100 (12 mutations)
761.34 s
[really-safe-money-gen] coverage (1439/1610): Money\.AmountOfSpec.CHF.add.is commutative (9 mutations)
761.78 s
[really-safe-money-gen] coverage (1428/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(<=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is antisymmetric for "valid (AmountOf * CHF)"'s (0 mutations)
761.90 s
[really-safe-money-gen] coverage (1433/1610): Money\.AmountOfSpec.CHF.distribute.Eq (Distribution (AmountOf * CHF)).(/=) \:\: (Distribution (AmountOf * CHF)) -> (Distribution (AmountOf * CHF)) -> Bool.is antireflexive for "valid (Distribution (AmountOf * CHF))"s (1 mutations)
761.98 s
[really-safe-money-gen] coverage (1434/1610): Money\.AmountOfSpec.CHF.distribute.Eq (Distribution (AmountOf * CHF)).(/=) \:\: (Distribution (AmountOf * CHF)) -> (Distribution (AmountOf * CHF)) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution (AmountOf * CHF))"s (1 mutations)
762.51 s
[really-safe-money-gen] coverage (1420/1610): Money\.AmountOfSpec.CHF.Ord (AmountOf * CHF).(>=) \:\: (AmountOf * CHF) -> (AmountOf * CHF) -> Bool.is antisymmetric for "valid (AmountOf * CHF)"'s (0 mutations)
763.54 s
[really-safe-money-gen] coverage (1222/1610): Money\.AmountOfSpec.INR.multiply.has an identity\: 1 (9 mutations)
763.84 s
[really-safe-money-gen] coverage (1432/1610): Money\.AmountOfSpec.CHF.distribute.produces results that sum up to the greater whole (29 mutations)
764.47 s
[really-safe-money-gen] coverage (1201/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR)."max \:\: (AmountOf * INR -> AmountOf * INR -> AmountOf * INR)".is equivalent to (\\a b -> if a >= b then a else b) for "valid (AmountOf * INR)"'s (0 mutations)
765.06 s
[really-safe-money-gen] coverage (1447/1610): Money\.AmountSpec.fraction.Produces a result that can be multiplied back (17 mutations)
766.07 s
[really-safe-money-gen] coverage (1440/1610): Money\.AmountOfSpec.CHF.add.has a left-identity\: zero (10 mutations)
766.12 s
[really-safe-money-gen] coverage (1442/1610): Money\.AmountOfSpec.CHF.add.produces valid amounts (9 mutations)
768.66 s
[really-safe-money-gen] coverage (1451/1610): Money\.AmountSpec.format.formats 1 correctly with quantisation factor 1 (3 mutations)
768.94 s
[really-safe-money-gen] coverage (1454/1610): Money\.AmountSpec.fromRatio.produces valid Amounts (19 mutations)
769.42 s
[really-safe-money-gen] coverage (1437/1610): Money\.AmountOfSpec.CHF.distribute.Eq (Distribution (AmountOf * CHF)).(==) \:\: (Distribution (AmountOf * CHF)) -> (Distribution (AmountOf * CHF)) -> Bool.is reflexive for "valid (Distribution (AmountOf * CHF))"s (1 mutations)
771.77 s
[really-safe-money-gen] coverage (1438/1610): Money\.AmountOfSpec.CHF.distribute.Eq (Distribution (AmountOf * CHF)).(==) \:\: (Distribution (AmountOf * CHF)) -> (Distribution (AmountOf * CHF)) -> Bool.is transitive for "valid (Distribution (AmountOf * CHF))"s (1 mutations)
772.57 s
[really-safe-money-gen] coverage (1200/1610): Money\.AmountOfSpec.INR.fromDouble.produces valid amounts (30 mutations)
773.55 s
[really-safe-money-gen] coverage (1445/1610): Money\.AmountSpec.fraction.Produces a result that has been rounded in the right direction when using RoundDown (6 mutations)
775.47 s
[really-safe-money-gen] coverage (1448/1610): Money\.AmountSpec.fraction.produces valid amounts (17 mutations)
776.11 s
[really-safe-money-gen] coverage (1441/1610): Money\.AmountOfSpec.CHF.add.is associative when both succeed (9 mutations)
776.76 s
[really-safe-money-gen] coverage (1213/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(<) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is transitive for "valid (AmountOf * INR)"'s (0 mutations)
777.52 s
[really-safe-money-gen] coverage (1460/1610): Money\.AmountSpec.fromRatio.succeeds on 0 (19 mutations)
778.08 s
[really-safe-money-gen] coverage (1449/1610): Money\.AmountSpec.fraction.Correctly fractions 100 with 1 % 100 (12 mutations)
778.08 s
[really-safe-money-gen] coverage (1459/1610): Money\.AmountSpec.fromRatio.succeeds on 77\.02 with quantisation factor 100 (19 mutations)
779.03 s
[really-safe-money-gen] coverage (1231/1610): Money\.AmountOfSpec.INR.fromRational.produces valid Amounts (19 mutations)
780.64 s
[really-safe-money-gen] coverage (1305/1610): Money\.AmountOfSpec.BTC.fromRational.roundtrips with toRational (19 mutations)
781.26 s
[really-safe-money-gen] coverage (1462/1610): Money\.AmountSpec.distribute.correctly distributes 3 into 3 (5 mutations)
781.55 s
[really-safe-money-gen] coverage (1297/1610): Money\.AmountOfSpec.BTC.CHF.rate.produces valid amounts (10 mutations)
782.37 s
[really-safe-money-gen] coverage (1461/1610): Money\.AmountSpec.fromRatio.fails on 7\.123 with quantisation factor 10 (13 mutations)
782.99 s
[really-safe-money-gen] coverage (1214/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(<) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid (AmountOf * INR)"'s (0 mutations)
783.01 s
[really-safe-money-gen] coverage (1452/1610): Money\.AmountSpec.format.formats 1 correctly with quantisation factor 10 (3 mutations)
784.13 s
[really-safe-money-gen] coverage (1300/1610): Money\.AmountOfSpec.BTC.fromRational.fails on -1 (8 mutations)
784.14 s
[really-safe-money-gen] coverage (1216/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR)."min \:\: (AmountOf * INR -> AmountOf * INR -> AmountOf * INR)".is equivalent to (\\a b -> if a <= b then a else b) for "valid (AmountOf * INR)"'s (0 mutations)
786.12 s
[really-safe-money-gen] coverage (1464/1610): Money\.AmountSpec.distribute.Show (Distribution Amount) and Read (Distribution Amount).are implemented such that read \. show == id for valid values (1 mutations)
786.69 s
[really-safe-money-gen] coverage (1307/1610): Money\.AmountOfSpec.BTC.fromDouble.succeeds on 1 (30 mutations)
786.87 s
[really-safe-money-gen] coverage (1456/1610): Money\.AmountSpec.fromRatio.succeeds on 1 (19 mutations)
787.02 s
[really-safe-money-gen] coverage (1453/1610): Money\.AmountSpec.format.produces valid strings (3 mutations)
787.53 s
[really-safe-money-gen] coverage (1212/1610): Money\.AmountOfSpec.INR.Ord (AmountOf * INR).(>=) \:\: (AmountOf * INR) -> (AmountOf * INR) -> Bool.is antisymmetric for "valid (AmountOf * INR)"'s (0 mutations)
788.03 s
[really-safe-money-gen] coverage (1303/1610): Money\.AmountOfSpec.BTC.fromRational.fails on -Infinity (2 mutations)
788.86 s
[really-safe-money-gen] coverage (1463/1610): Money\.AmountSpec.distribute.produces results that sum up to the greater whole (25 mutations)
789.07 s
[really-safe-money-gen] coverage (1194/1610): Money\.AmountOfSpec.INR.fromDouble.fails on -Infinity (6 mutations)
790.22 s
[really-safe-money-gen] coverage (1457/1610): Money\.AmountSpec.fromRatio.fails on NaN (2 mutations)
791.85 s
[really-safe-money-gen] coverage (1472/1610): Money\.AmountSpec.distribute.Eq (Distribution Amount).(/=) \:\: (Distribution Amount) -> (Distribution Amount) -> Bool.is antireflexive for "valid (Distribution Amount)"s (1 mutations)
791.89 s
[really-safe-money-gen] coverage (1455/1610): Money\.AmountSpec.fromRatio.roundtrips with toRatio (19 mutations)
792.04 s
[really-safe-money-gen] coverage (1458/1610): Money\.AmountSpec.fromRatio.fails on +Infinity (2 mutations)
792.12 s
[really-safe-money-gen] coverage (1299/1610): Money\.AmountOfSpec.BTC.fromRational.produces valid Amounts (19 mutations)
793.34 s
[really-safe-money-gen] coverage (1302/1610): Money\.AmountOfSpec.BTC.fromRational.fails on +Infinity (2 mutations)
793.44 s
[really-safe-money-gen] coverage (1301/1610): Money\.AmountOfSpec.BTC.fromRational.succeeds on 1 (19 mutations)
794.89 s
[really-safe-money-gen] coverage (1470/1610): Money\.AmountSpec.distribute.Eq (Distribution Amount).(==) \:\: (Distribution Amount) -> (Distribution Amount) -> Bool.is reflexive for "valid (Distribution Amount)"s (1 mutations)
796.76 s
[really-safe-money-gen] coverage (1467/1610): Money\.AmountSpec.distribute.correctly distributes 5 into 3 (7 mutations)
799.12 s
[really-safe-money-gen] coverage (1296/1610): Money\.AmountOfSpec.BTC.CHF.convert.produces valid amounts (25 mutations)
800.04 s
[really-safe-money-gen] coverage (1476/1610): Money\.AmountSpec.sum.matches what you would get with Integer, if nothing fails (10 mutations)
800.68 s
[really-safe-money-gen] coverage (1309/1610): Money\.AmountOfSpec.BTC.fromDouble.fails on -1 (6 mutations)
800.82 s
[really-safe-money-gen] coverage (1473/1610): Money\.AmountSpec.distribute.Eq (Distribution Amount).(/=) \:\: (Distribution Amount) -> (Distribution Amount) -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid (Distribution Amount)"s (1 mutations)
800.94 s
[really-safe-money-gen] coverage (1480/1610): Money\.AmountSpec.multiply.fails for 2 * maxbound (8 mutations)
801.18 s
[really-safe-money-gen] coverage (1248/1610): Money\.AmountOfSpec.INR.BTC.rate.produces valid amounts (10 mutations)
801.42 s
[really-safe-money-gen] coverage (1482/1610): Money\.AmountSpec.multiply.is absorbed by 0 (10 mutations)
801.93 s
[really-safe-money-gen] coverage (1304/1610): Money\.AmountOfSpec.BTC.fromRational.succeeds on 0 (19 mutations)
802.11 s
[really-safe-money-gen] coverage (1295/1610): Money\.AmountOfSpec.BTC.fromRatio.fails on 7\.123 (13 mutations)
803.03 s
[really-safe-money-gen] coverage (1485/1610): Money\.AmountSpec.multiply.succeeds for 3 * 6 (9 mutations)
803.33 s
[really-safe-money-gen] coverage (1294/1610): Money\.AmountOfSpec.BTC.fromRatio.fails on +Infinity (2 mutations)
804.56 s
[really-safe-money-gen] coverage (1488/1610): Money\.AmountSpec.fromDouble.roundtrips with toDouble, back to double (30 mutations)
805.23 s
[really-safe-money-gen] coverage (1232/1610): Money\.AmountOfSpec.INR.fromRational.succeeds on 1 (19 mutations)
805.54 s
[really-safe-money-gen] coverage (1479/1610): Money\.AmountSpec.multiply.matches what you would get with Integer, if nothing fails (9 mutations)
806.19 s
[really-safe-money-gen] coverage (1478/1610): Money\.AmountSpec.sum.correctly sums [1,2,3] to 6 (10 mutations)
806.45 s
[really-safe-money-gen] coverage (1484/1610): Money\.AmountSpec.multiply.has an identity\: 1 (9 mutations)
806.56 s
[really-safe-money-gen] coverage (1506/1610): Money\.AmountSpec.Ord Amount.(>=) \:\: Amount -> Amount -> Bool.is reflexive for "valid Amount"'s (0 mutations)
806.84 s
[really-safe-money-gen] coverage (1308/1610): Money\.AmountOfSpec.BTC.fromDouble.produces valid amounts (30 mutations)
807.18 s
[really-safe-money-gen] coverage (1483/1610): Money\.AmountSpec.multiply.is distributive with add when both succeed (18 mutations)
807.39 s
[really-safe-money-gen] coverage (1465/1610): Money\.AmountSpec.distribute.correctly distributes 10 into 4 (7 mutations)
807.95 s
[really-safe-money-gen] coverage (1502/1610): Money\.AmountSpec.Ord Amount.(<=) \:\: Amount -> Amount -> Bool.is transitive for "valid Amount"'s (0 mutations)
808.84 s
[really-safe-money-gen] coverage (1298/1610): Money\.AmountOfSpec.BTC.fromRational.fails on NaN (2 mutations)
809.91 s
[really-safe-money-gen] coverage (1530/1610): Money\.AmountSpec.add.fails for maxBound + 1 (8 mutations)
810.31 s
[really-safe-money-gen] coverage (1306/1610): Money\.AmountOfSpec.BTC.fromDouble.fails on +Infinity (10 mutations)
811.30 s
[really-safe-money-gen] coverage (1477/1610): Money\.AmountSpec.sum.fails to sum above maxBound (9 mutations)
811.46 s
[really-safe-money-gen] coverage (1524/1610): Money\.AmountSpec.fromRational.fails on +Infinity (2 mutations)
812.26 s
[really-safe-money-gen] coverage (1469/1610): Money\.AmountSpec.distribute.Eq (Distribution Amount).(==) \:\: (Distribution Amount) -> (Distribution Amount) -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid (Distribution Amount)"s (1 mutations)
812.71 s
[really-safe-money-gen] coverage (1533/1610): Money\.AmountSpec.add.produces valid amounts (9 mutations)
813.60 s
[really-safe-money-gen] coverage (1486/1610): Money\.AmountSpec.Show Amount and Read Amount.are implemented such that read \. show == id for valid values (1 mutations)
813.62 s
[really-safe-money-gen] coverage (1500/1610): Money\.AmountSpec.Ord Amount.(<=) \:\: Amount -> Amount -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid Amount"'s (0 mutations)
813.62 s
[really-safe-money-gen] coverage (1474/1610): Money\.AmountSpec.distribute.produces valid amounts (17 mutations)
814.77 s
[really-safe-money-gen] coverage (1468/1610): Money\.AmountSpec.distribute.Eq (Distribution Amount).(==) \:\: (Distribution Amount) -> (Distribution Amount) -> Bool.is symmetric for "valid (Distribution Amount)"s (1 mutations)
816.05 s
[really-safe-money-gen] coverage (1499/1610): Money\.AmountSpec.Ord Amount.(<=) \:\: Amount -> Amount -> Bool.is reflexive for "valid Amount"'s (0 mutations)
817.43 s
[really-safe-money-gen] coverage (1471/1610): Money\.AmountSpec.distribute.Eq (Distribution Amount).(==) \:\: (Distribution Amount) -> (Distribution Amount) -> Bool.is transitive for "valid (Distribution Amount)"s (1 mutations)
817.55 s
[really-safe-money-gen] coverage (1516/1610): Money\.AmountSpec.toRational.produces an invalid Rational with quantisation factor 0 (1 mutations)
818.07 s
[really-safe-money-gen] coverage (1542/1610): Money\.AmountSpec.Eq Amount.(==) \:\: Amount -> Amount -> Bool.is reflexive for "valid Amount"s (0 mutations)
818.69 s
[really-safe-money-gen] coverage (1481/1610): Money\.AmountSpec.multiply.produces valid amounts (9 mutations)
819.40 s
[really-safe-money-gen] coverage (1536/1610): Money\.AmountSpec.toMinimalQuantisations.roundtrips with fromMinimalQuantisations (0 mutations)
820.18 s
[really-safe-money-gen] coverage (1501/1610): Money\.AmountSpec.Ord Amount.(<=) \:\: Amount -> Amount -> Bool.is antisymmetric for "valid Amount"'s (0 mutations)
820.37 s
[really-safe-money-gen] coverage (1475/1610): Money\.AmountSpec.sum.produces valid amounts (10 mutations)
822.09 s
[really-safe-money-gen] coverage (1515/1610): Money\.AmountSpec.toRational.produces valid Rationals when the quantisation factor is nonzero (0 mutations)
822.34 s
[really-safe-money-gen] coverage (1490/1610): Money\.AmountSpec.fromDouble.produces valid amounts (30 mutations)
823.03 s
[really-safe-money-gen] coverage (1548/1610): Money\.AmountSpec.rate.produces valid conversion rates (10 mutations)
823.11 s
[really-safe-money-gen] coverage (1531/1610): Money\.AmountSpec.add.matches what you would get with Integer, if nothing fails (9 mutations)
825.97 s
[really-safe-money-gen] coverage (1538/1610): Money\.AmountSpec.Eq Amount.(/=) \:\: Amount -> Amount -> Bool.is antireflexive for "valid Amount"s (0 mutations)
826.14 s
[really-safe-money-gen] coverage (1509/1610): Money\.AmountSpec.Ord Amount.(<) \:\: Amount -> Amount -> Bool.is transitive for "valid Amount"'s (0 mutations)
826.32 s
[really-safe-money-gen] coverage (1487/1610): Money\.AmountSpec.fromDouble.fails on really large numbers (21 mutations)
827.94 s
[really-safe-money-gen] coverage (1529/1610): Money\.AmountSpec.add.is commutative (9 mutations)
828.58 s
[really-safe-money-gen] coverage (1511/1610): Money\.AmountSpec.Ord Amount."min \:\: (Amount -> Amount -> Amount)".is equivalent to (\\a b -> if a <= b then a else b) for "valid Amount"'s (0 mutations)
828.87 s
[really-safe-money-gen] coverage (1554/1610): Money\.AmountSpec.convert.produces valid amounts (25 mutations)
829.09 s
[really-safe-money-gen] coverage (1541/1610): Money\.AmountSpec.Eq Amount.(==) \:\: Amount -> Amount -> Bool.is transitive for "valid Amount"s (0 mutations)
829.14 s
[really-safe-money-gen] coverage (1532/1610): Money\.AmountSpec.add.has a right-identity\: zero (10 mutations)
829.24 s
[really-safe-money-gen] coverage (1547/1610): Money\.AmountSpec.toDouble.produces an infinite Double with quantisation factor 0 (0 mutations)
832.11 s
[really-safe-money-gen] coverage (1555/1610): Money\.AmountSpec.toRatio.produces an invalid Rational with quantisation factor 0 (1 mutations)
832.90 s
[really-safe-money-gen] coverage (1551/1610): Money\.AmountSpec.zero.is valid (1 mutations)
833.38 s
[really-safe-money-gen] coverage (1545/1610): Money\.AmountSpec.toDouble.produces valid Doubles (0 mutations)
833.40 s
[really-safe-money-gen] coverage (1539/1610): Money\.AmountSpec.Eq Amount.(/=) \:\: Amount -> Amount -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid Amount"s (0 mutations)
834.47 s
[really-safe-money-gen] coverage (1527/1610): Money\.AmountSpec.fromRational.produces valid Amounts (19 mutations)
834.48 s
[really-safe-money-gen] coverage (1564/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 20 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 20} (23 mutations)
834.66 s
[really-safe-money-gen] coverage (1528/1610): Money\.AmountSpec.add.is associative when both succeed (9 mutations)
834.78 s
[really-safe-money-gen] coverage (1534/1610): Money\.AmountSpec.add.fails for maxBound + maxBound (8 mutations)
835.81 s
[really-safe-money-gen] coverage (1550/1610): Money\.AmountSpec.rate.computes this USD to CHF rate correctly (10 mutations)
835.87 s
[really-safe-money-gen] coverage (1540/1610): Money\.AmountSpec.Eq Amount.(==) \:\: Amount -> Amount -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid Amount"s (0 mutations)
836.47 s
[really-safe-money-gen] coverage (1535/1610): Money\.AmountSpec.add.has a left-identity\: zero (10 mutations)
837.71 s
[really-safe-money-gen] coverage (1553/1610): Money\.AmountSpec.convert.converts this USD to CHF correctly (22 mutations)
837.83 s
[really-safe-money-gen] coverage (1546/1610): Money\.AmountSpec.toDouble.succeeds on 7702 with quantisation factor 100 (0 mutations)
838.87 s
[really-safe-money-gen] coverage (1543/1610): Money\.AmountSpec.Eq Amount.(==) \:\: Amount -> Amount -> Bool.is symmetric for "valid Amount"s (0 mutations)
839.32 s
[really-safe-money-gen] coverage (1503/1610): Money\.AmountSpec.Ord Amount.(>=) \:\: Amount -> Amount -> Bool.is transitive for "valid Amount"'s (0 mutations)
840.12 s
[really-safe-money-gen] coverage (1537/1610): Money\.AmountSpec.toMinimalQuantisations.produces valid Int64s (0 mutations)
840.69 s
[really-safe-money-gen] coverage (1556/1610): Money\.AmountSpec.toRatio.produces valid Rationals when the quantisation factor is nonzero (0 mutations)
841.55 s
[really-safe-money-gen] coverage (1549/1610): Money\.AmountSpec.rate.computes a rate that can be used to do a conversion without rounding (27 mutations)
842.81 s
[really-safe-money-gen] coverage (1544/1610): Money\.AmountSpec.GenValid Amount.genValid \:\: Gen Amount.only generates valid 'Amount's (0 mutations)
843.09 s
[really-safe-money-gen] coverage (1561/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100000000} into DecimalLiteral (Just True) 500 8 (50 mutations)
845.40 s
[really-safe-money-gen] coverage (1559/1610): Money\.AmountSpec.subtract.matches what you would get with Integer, if nothing fails (10 mutations)
845.95 s
[really-safe-money-gen] coverage (1576/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 20} into DecimalLiteral (Just True) 500 2 (44 mutations)
846.72 s
[really-safe-money-gen] coverage (1552/1610): Money\.AmountSpec.convert.succeeds in converting 1\:1 without rounding if the quantisation factor is the same (25 mutations)
847.51 s
[really-safe-money-gen] coverage (1560/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 600 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 20} (23 mutations)
850.35 s
[really-safe-money-gen] coverage (1557/1610): Money\.AmountSpec.subtract.fails for 0 - maxBound (9 mutations)
850.88 s
[really-safe-money-gen] coverage (1558/1610): Money\.AmountSpec.subtract.fails for 0 - 1 (9 mutations)
852.15 s
[really-safe-money-gen] coverage (1578/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100} into DecimalLiteral (Just True) 200 2 (44 mutations)
852.81 s
[really-safe-money-gen] coverage (1570/1610): Money\.AmountSpec.DecimalLiteral.Amount\.fromDecimalLiteral.fails on this amount that is too precise (17 mutations)
853.00 s
[really-safe-money-gen] coverage (1589/1610): Money\.CurrencySpec.Eq Currency.(/=) \:\: Currency -> Currency -> Bool.is equivalent to (\\a b -> not $ a == b) for "valid Currency"s (1 mutations)
853.00 s
[really-safe-money-gen] coverage (1562/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 2 0 into decimalLiteral QuantisationFactor {unQuantisationFactor = 1} (23 mutations)
854.22 s
[really-safe-money-gen] coverage (1565/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 500 8 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100000000} (23 mutations)
854.37 s
[really-safe-money-gen] coverage (1581/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100} into DecimalLiteral (Just True) 4 2 (44 mutations)
854.92 s
[really-safe-money-gen] coverage (1572/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 1} into DecimalLiteral (Just True) 2 0 (38 mutations)
857.38 s
[really-safe-money-gen] coverage (1580/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100} into DecimalLiteral (Just True) 100 2 (44 mutations)
857.89 s
[really-safe-money-gen] coverage (1567/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 20} into DecimalLiteral (Just True) 10 2 (50 mutations)
857.90 s
[really-safe-money-gen] coverage (1573/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 1} into DecimalLiteral (Just True) 1 0 (38 mutations)
858.18 s
[really-safe-money-gen] coverage (1584/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 20} into DecimalLiteral (Just True) 20 2 (50 mutations)
858.72 s
[really-safe-money-gen] coverage (1563/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 20} into DecimalLiteral (Just True) 600 2 (44 mutations)
859.75 s
[really-safe-money-gen] coverage (1566/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 200 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100} (23 mutations)
861.18 s
[really-safe-money-gen] coverage (1571/1610): Money\.AmountSpec.DecimalLiteral.Amount\.fromDecimalLiteral.fails on this amount that is too precise:1 (17 mutations)
861.22 s
[really-safe-money-gen] coverage (1568/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 500 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 20} (23 mutations)
862.28 s
[really-safe-money-gen] coverage (1577/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 3 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100} (23 mutations)
863.33 s
[really-safe-money-gen] coverage (1575/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 100 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100} (23 mutations)
863.98 s
[really-safe-money-gen] coverage (1574/1610): Money\.AmountSpec.DecimalLiteral.can turn decimalLiteral QuantisationFactor {unQuantisationFactor = 100} into DecimalLiteral (Just True) 3 2 (44 mutations)
864.67 s
[really-safe-money-gen] coverage (1569/1610): Money\.AmountSpec.DecimalLiteral.Amount\.fromDecimalLiteral.produces valid factors (23 mutations)
866.06 s
[really-safe-money-gen] coverage (1579/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 4 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 100} (23 mutations)
867.50 s
[really-safe-money-gen] coverage (1590/1610): Money\.CurrencySpec.Eq Currency.(==) \:\: Currency -> Currency -> Bool.is equivalent to (\\a b -> not $ a /= b) for "valid Currency"s (1 mutations)
868.98 s
[really-safe-money-gen] coverage (1587/1610): Money\.AmountSpec.fromMinimalQuantisations.produces valid amounts (0 mutations)
870.01 s
[really-safe-money-gen] coverage (1586/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 10 2 into decimalLiteral QuantisationFactor {unQuantisationFactor = 20} (23 mutations)
871.36 s
[really-safe-money-gen] coverage (1585/1610): Money\.AmountSpec.DecimalLiteral.can turn DecimalLiteral (Just True) 1 0 into decimalLiteral QuantisationFactor {unQuantisationFactor = 1} (23 mutations)
872.64 s
[really-safe-money-gen] coverage (1588/1610): Money\.CurrencySpec.Eq Currency.(/=) \:\: Currency -> Currency -> Bool.is antireflexive for "valid Currency"s (1 mutations)
874.04 s
[really-safe-money-gen] coverage (1608/1610): Money\.CurrencySpec.Ord Currency.(<) \:\: Currency -> Currency -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid Currency"'s (1 mutations)
874.92 s
[really-safe-money-gen] coverage (1521/1610): Money\.AmountSpec.fromRational.succeeds on 1 (19 mutations)
875.04 s
[really-safe-money-gen] coverage (1605/1610): Money\.CurrencySpec.Ord Currency.(>=) \:\: Currency -> Currency -> Bool.is antisymmetric for "valid Currency"'s (1 mutations)
875.56 s
[really-safe-money-gen] coverage (1591/1610): Money\.CurrencySpec.Eq Currency.(==) \:\: Currency -> Currency -> Bool.is symmetric for "valid Currency"s (1 mutations)
877.12 s
[really-safe-money-gen] coverage (1596/1610): Money\.CurrencySpec.Ord Currency."min \:\: (Currency -> Currency -> Currency)".is equivalent to (\\a b -> if a <= b then a else b) for "valid Currency"'s (1 mutations)
878.02 s
[really-safe-money-gen] coverage (1604/1610): Money\.CurrencySpec.Ord Currency.(>=) \:\: Currency -> Currency -> Bool.is transitive for "valid Currency"'s (1 mutations)
878.29 s
[really-safe-money-gen] coverage (1593/1610): Money\.CurrencySpec.Eq Currency.(==) \:\: Currency -> Currency -> Bool.is reflexive for "valid Currency"s (1 mutations)
880.20 s
[really-safe-money-gen] coverage (1598/1610): Money\.CurrencySpec.Ord Currency.(<=) \:\: Currency -> Currency -> Bool.is antisymmetric for "valid Currency"'s (1 mutations)
880.22 s
[really-safe-money-gen] coverage (1594/1610): Money\.CurrencySpec.Show Currency and Read Currency.are implemented such that read \. show == id for valid values (1 mutations)
880.90 s
[really-safe-money-gen] coverage (1595/1610): Money\.CurrencySpec.Ord Currency."max \:\: (Currency -> Currency -> Currency)".is equivalent to (\\a b -> if a >= b then a else b) for "valid Currency"'s (1 mutations)
881.41 s
[really-safe-money-gen] coverage (1592/1610): Money\.CurrencySpec.Eq Currency.(==) \:\: Currency -> Currency -> Bool.is transitive for "valid Currency"s (1 mutations)
881.90 s
[really-safe-money-gen] coverage (1601/1610): Money\.CurrencySpec.Ord Currency.(>) \:\: Currency -> Currency -> Bool.is transitive for "valid Currency"'s (1 mutations)
882.69 s
[really-safe-money-gen] coverage (1602/1610): Money\.CurrencySpec.Ord Currency.(>) \:\: Currency -> Currency -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid Currency"'s (1 mutations)
882.84 s
[really-safe-money-gen] coverage (1526/1610): Money\.AmountSpec.fromRational.fails on NaN (2 mutations)
883.04 s
[really-safe-money-gen] coverage (1522/1610): Money\.AmountSpec.fromRational.succeeds on 77\.02 with quantisation factor 100 (19 mutations)
884.26 s
[really-safe-money-gen] coverage (1597/1610): Money\.CurrencySpec.Ord Currency.(<=) \:\: Currency -> Currency -> Bool.is transitive for "valid Currency"'s (1 mutations)
884.52 s
[really-safe-money-gen] coverage (1603/1610): Money\.CurrencySpec.Ord Currency.(>) \:\: Currency -> Currency -> Bool.is antireflexive for "valid Currency"'s (1 mutations)
884.97 s
[really-safe-money-gen] coverage (1599/1610): Money\.CurrencySpec.Ord Currency.(<=) \:\: Currency -> Currency -> Bool.is equivalent to (\\a b -> compare a b /= GT) for "valid Currency"'s (1 mutations)
885.03 s
[really-safe-money-gen] coverage (1609/1610): Money\.CurrencySpec.Ord Currency.(<) \:\: Currency -> Currency -> Bool.is transitive for "valid Currency"'s (1 mutations)
885.55 s
[really-safe-money-gen] coverage (1607/1610): Money\.CurrencySpec.Ord Currency.(>=) \:\: Currency -> Currency -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid Currency"'s (1 mutations)
886.31 s
[really-safe-money-gen] coverage (1600/1610): Money\.CurrencySpec.Ord Currency.(<=) \:\: Currency -> Currency -> Bool.is reflexive for "valid Currency"'s (1 mutations)
887.87 s
[really-safe-money-gen] coverage (1606/1610): Money\.CurrencySpec.Ord Currency.(>=) \:\: Currency -> Currency -> Bool.is reflexive for "valid Currency"'s (1 mutations)
888.32 s
[really-safe-money-gen] coverage (1610/1610): Money\.CurrencySpec.Ord Currency.(<) \:\: Currency -> Currency -> Bool.is antireflexive for "valid Currency"'s (1 mutations)
889.03 s
[really-safe-money-gen] coverage (1510/1610): Money\.AmountSpec.Ord Amount.(<) \:\: Amount -> Amount -> Bool.is equivalent to (\\a b -> compare a b == LT) for "valid Amount"'s (0 mutations)
889.64 s
[really-safe-money-gen] coverage (1517/1610): Money\.AmountSpec.fromRational.roundtrips with toRational (19 mutations)
890.22 s
[really-safe-money-gen] coverage (1523/1610): Money\.AmountSpec.fromRational.fails on 7\.123 with quantisation factor 10 (13 mutations)
891.63 s
[really-safe-money-gen] coverage (1525/1610): Money\.AmountSpec.fromRational.fails on -1 (8 mutations)
894.08 s
[really-safe-money-gen] coverage (1495/1610): Money\.AmountSpec.fromDouble.fails on -Infinity (6 mutations)
895.00 s
[really-safe-money-gen] coverage (1513/1610): Money\.AmountSpec.Ord Amount.(>) \:\: Amount -> Amount -> Bool.is antireflexive for "valid Amount"'s (0 mutations)
895.14 s
[really-safe-money-gen] coverage (1512/1610): Money\.AmountSpec.Ord Amount.(>) \:\: Amount -> Amount -> Bool.is equivalent to (\\a b -> compare a b == GT) for "valid Amount"'s (0 mutations)
895.63 s
[really-safe-money-gen] coverage (1504/1610): Money\.AmountSpec.Ord Amount.(>=) \:\: Amount -> Amount -> Bool.is equivalent to (\\a b -> compare a b /= LT) for "valid Amount"'s (0 mutations)
895.96 s
[really-safe-money-gen] coverage (1520/1610): Money\.AmountSpec.fromRational.fails on -Infinity (2 mutations)
896.87 s
[really-safe-money-gen] coverage (1494/1610): Money\.AmountSpec.fromDouble.fails on 7\.123 with quantisation factor 10 (24 mutations)
897.13 s
[really-safe-money-gen] coverage (1518/1610): Money\.AmountSpec.fromRational.succeeds on 0 (19 mutations)
897.57 s
[really-safe-money-gen] coverage (1496/1610): Money\.AmountSpec.fromDouble.fails on +Infinity (10 mutations)
897.74 s
[really-safe-money-gen] coverage (1491/1610): Money\.AmountSpec.fromDouble.fails on really large numbers:1 (10 mutations)
898.73 s
[really-safe-money-gen] coverage (1505/1610): Money\.AmountSpec.Ord Amount.(>=) \:\: Amount -> Amount -> Bool.is antisymmetric for "valid Amount"'s (0 mutations)
898.87 s
[really-safe-money-gen] coverage (1508/1610): Money\.AmountSpec.Ord Amount.(<) \:\: Amount -> Amount -> Bool.is antireflexive for "valid Amount"'s (0 mutations)
899.27 s
[really-safe-money-gen] coverage (1498/1610): Money\.AmountSpec.fromDouble.succeeds on 0 (30 mutations)
901.43 s
[really-safe-money-gen] coverage (1507/1610): Money\.AmountSpec.Ord Amount."max \:\: (Amount -> Amount -> Amount)".is equivalent to (\\a b -> if a >= b then a else b) for "valid Amount"'s (0 mutations)
902.26 s
[really-safe-money-gen] coverage (1519/1610): Money\.AmountSpec.fromRational.fails on really large numbers (19 mutations)
902.55 s
[really-safe-money-gen] coverage (1492/1610): Money\.AmountSpec.fromDouble.fails on NaN (8 mutations)
902.76 s
[really-safe-money-gen] coverage (1497/1610): Money\.AmountSpec.fromDouble.succeeds on 1 (30 mutations)
902.81 s
[really-safe-money-gen] coverage (1514/1610): Money\.AmountSpec.Ord Amount.(>) \:\: Amount -> Amount -> Bool.is transitive for "valid Amount"'s (0 mutations)
903.13 s
[really-safe-money-gen] coverage (1489/1610): Money\.AmountSpec.fromDouble.succeeds on 77\.02 with quantisation factor 100 (30 mutations)
903.39 s
[really-safe-money-gen] coverage (1493/1610): Money\.AmountSpec.fromDouble.fails on -1 (6 mutations)
903.84 s
[really-safe-money-gen] coverage (1466/1610): Money\.AmountSpec.distribute.GenValid (Distribution Amount).genValid \:\: Gen (Distribution Amount).only generates valid '(Distribution Amount)'s (11 mutations)
911.69 s
[really-safe-money-gen] coverage (1583/1610): Money\.AmountSpec.DecimalLiteral.Amount\.toDecimalLiteral.roundtrips with Amount\.fromDecimalLiteral (74 mutations)
925.19 s
[really-safe-money-gen] coverage (1582/1610): Money\.AmountSpec.DecimalLiteral.Amount\.toDecimalLiteral.produces valid decimal literals (52 mutations)
926.32 s
[really-safe-money-gen] mutation-nix: running mutations
936.18 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:553:7-39
936.21 s
[really-safe-money-gen] @@ -550,11 +550,10 @@
936.21 s
[really-safe-money-gen] let aa1 = abs a1
936.21 s
[really-safe-money-gen] aa2 = abs a2
936.21 s
[really-safe-money-gen] mr = Amount.rate qf1 aa1 qf2 aa2
936.21 s
[really-safe-money-gen] in case (a1, a2) of
936.21 s
[really-safe-money-gen] - (Positive _, Positive _) -> mr
936.21 s
[really-safe-money-gen] (Positive _, Negative _) -> Nothing
936.21 s
[really-safe-money-gen] (Negative _, Positive _) -> Nothing
936.21 s
[really-safe-money-gen] (Negative _, Negative _) -> mr
936.21 s
[really-safe-money-gen]
936.21 s
[really-safe-money-gen] -- | Convert an amount of money of one currency into an amount of money of
936.21 s
[really-safe-money-gen] -- another currency using a conversion rate.
936.21 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:553:7-39
936.21 s
[really-safe-money-gen] @@ -550,11 +550,10 @@
936.21 s
[really-safe-money-gen] let aa1 = abs a1
936.21 s
[really-safe-money-gen] aa2 = abs a2
936.21 s
[really-safe-money-gen] mr = Amount.rate qf1 aa1 qf2 aa2
936.21 s
[really-safe-money-gen] in case (a1, a2) of
936.21 s
[really-safe-money-gen] (Positive _, Positive _) -> mr
936.21 s
[really-safe-money-gen] - (Positive _, Negative _) -> Nothing
936.21 s
[really-safe-money-gen] (Negative _, Positive _) -> Nothing
936.21 s
[really-safe-money-gen] (Negative _, Negative _) -> mr
936.21 s
[really-safe-money-gen]
936.21 s
[really-safe-money-gen] -- | Convert an amount of money of one currency into an amount of money of
936.21 s
[really-safe-money-gen] -- another currency using a conversion rate.
936.21 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:553:7-39
936.22 s
[really-safe-money-gen] @@ -550,11 +550,10 @@
936.22 s
[really-safe-money-gen] let aa1 = abs a1
936.22 s
[really-safe-money-gen] aa2 = abs a2
936.22 s
[really-safe-money-gen] mr = Amount.rate qf1 aa1 qf2 aa2
936.22 s
[really-safe-money-gen] in case (a1, a2) of
936.22 s
[really-safe-money-gen] (Positive _, Positive _) -> mr
936.22 s
[really-safe-money-gen] (Positive _, Negative _) -> Nothing
936.22 s
[really-safe-money-gen] (Negative _, Positive _) -> Nothing
936.22 s
[really-safe-money-gen] - (Negative _, Negative _) -> mr
936.22 s
[really-safe-money-gen]
936.22 s
[really-safe-money-gen] -- | Convert an amount of money of one currency into an amount of money of
936.22 s
[really-safe-money-gen] -- another currency using a conversion rate.
936.22 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:591:7-44
936.22 s
[really-safe-money-gen] @@ -588,9 +588,8 @@
936.22 s
[really-safe-money-gen] (Maybe Account, Maybe ConversionRate)
936.22 s
[really-safe-money-gen] convert r qf1 a cr qf2 =
936.22 s
[really-safe-money-gen] let (ma, mr) = Amount.convert r qf1 (abs a) cr qf2
936.22 s
[really-safe-money-gen] in case a of
936.22 s
[really-safe-money-gen] - Positive _ -> (Positive <$> ma, mr)
936.22 s
[really-safe-money-gen] Negative _ -> (Negative <$> ma, mr)
936.22 s
[really-safe-money-gen]
936.22 s
[really-safe-money-gen] -- | Format an account of money without a symbol.
936.22 s
[really-safe-money-gen] --
936.22 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:591:7-44
936.22 s
[really-safe-money-gen] @@ -588,9 +588,8 @@
936.22 s
[really-safe-money-gen] (Maybe Account, Maybe ConversionRate)
936.22 s
[really-safe-money-gen] convert r qf1 a cr qf2 =
936.22 s
[really-safe-money-gen] let (ma, mr) = Amount.convert r qf1 (abs a) cr qf2
936.22 s
[really-safe-money-gen] in case a of
936.22 s
[really-safe-money-gen] Positive _ -> (Positive <$> ma, mr)
936.22 s
[really-safe-money-gen] - Negative _ -> (Negative <$> ma, mr)
936.22 s
[really-safe-money-gen]
936.22 s
[really-safe-money-gen] -- | Format an account of money without a symbol.
936.22 s
[really-safe-money-gen] --
936.22 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:553:7-39
936.22 s
[really-safe-money-gen] @@ -550,11 +550,10 @@
936.22 s
[really-safe-money-gen] let aa1 = abs a1
936.22 s
[really-safe-money-gen] aa2 = abs a2
936.22 s
[really-safe-money-gen] mr = Amount.rate qf1 aa1 qf2 aa2
936.22 s
[really-safe-money-gen] in case (a1, a2) of
936.22 s
[really-safe-money-gen] (Positive _, Positive _) -> mr
936.22 s
[really-safe-money-gen] (Positive _, Negative _) -> Nothing
936.22 s
[really-safe-money-gen] - (Negative _, Positive _) -> Nothing
936.22 s
[really-safe-money-gen] (Negative _, Negative _) -> mr
936.22 s
[really-safe-money-gen]
936.22 s
[really-safe-money-gen] -- | Convert an amount of money of one currency into an amount of money of
936.22 s
[really-safe-money-gen] -- another currency using a conversion rate.
936.22 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:421:11-29
936.22 s
[really-safe-money-gen] @@ -418,13 +418,12 @@
936.22 s
[really-safe-money-gen] multiply :: Int32 -> Account -> Maybe Account
936.23 s
[really-safe-money-gen] multiply factor account =
936.23 s
[really-safe-money-gen] let af = (fromIntegral :: Int32 -> Word32) ((Prelude.abs :: Int32 -> Int32) factor)
936.23 s
[really-safe-money-gen] f = case (compare factor 0, compare account zero) of
936.23 s
[really-safe-money-gen] (EQ, _) -> const zero
936.23 s
[really-safe-money-gen] (_, EQ) -> const zero
936.23 s
[really-safe-money-gen] - (GT, GT) -> Positive
936.23 s
[really-safe-money-gen] (GT, LT) -> Negative
936.23 s
[really-safe-money-gen] (LT, GT) -> Negative
936.23 s
[really-safe-money-gen] (LT, LT) -> Positive
936.23 s
[really-safe-money-gen] in f <$> Amount.multiply af (abs account)
936.23 s
[really-safe-money-gen]
936.23 s
[really-safe-money-gen] -- | Distribute an amount of money into chunks that are as evenly distributed as possible.
936.23 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:451:14-23
936.23 s
[really-safe-money-gen] @@ -448,7 +448,7 @@
936.23 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
936.23 s
[really-safe-money-gen] DistributedZero -> DistributedZero
936.23 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
936.23 s
[really-safe-money-gen] - if a > = zero
936.23 s
[really-safe-money-gen] + if a < zero
936.23 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.23 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.23 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.23 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:451:14-23
936.23 s
[really-safe-money-gen] @@ -448,7 +448,7 @@
936.23 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
936.23 s
[really-safe-money-gen] DistributedZero -> DistributedZero
936.23 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
936.23 s
[really-safe-money-gen] - if a > = z e ro
936.23 s
[really-safe-money-gen] + if Tru e
936.23 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.23 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.23 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.23 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:451:14-23
936.23 s
[really-safe-money-gen] @@ -448,7 +448,7 @@
936.23 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
936.23 s
[really-safe-money-gen] DistributedZero -> DistributedZero
936.23 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
936.23 s
[really-safe-money-gen] - if a > = zero
936.23 s
[really-safe-money-gen] + if a < = zero
936.23 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.23 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.23 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.24 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:421:11-29
936.24 s
[really-safe-money-gen] @@ -418,13 +418,12 @@
936.24 s
[really-safe-money-gen] multiply :: Int32 -> Account -> Maybe Account
936.24 s
[really-safe-money-gen] multiply factor account =
936.24 s
[really-safe-money-gen] let af = (fromIntegral :: Int32 -> Word32) ((Prelude.abs :: Int32 -> Int32) factor)
936.24 s
[really-safe-money-gen] f = case (compare factor 0, compare account zero) of
936.24 s
[really-safe-money-gen] (EQ, _) -> const zero
936.24 s
[really-safe-money-gen] (_, EQ) -> const zero
936.24 s
[really-safe-money-gen] (GT, GT) -> Positive
936.24 s
[really-safe-money-gen] (GT, LT) -> Negative
936.24 s
[really-safe-money-gen] (LT, GT) -> Negative
936.24 s
[really-safe-money-gen] - (LT, LT) -> Positive
936.24 s
[really-safe-money-gen] in f <$> Amount.multiply af (abs account)
936.24 s
[really-safe-money-gen]
936.24 s
[really-safe-money-gen] -- | Distribute an amount of money into chunks that are as evenly distributed as possible.
936.24 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:421:11-29
936.24 s
[really-safe-money-gen] @@ -418,13 +418,12 @@
936.24 s
[really-safe-money-gen] multiply :: Int32 -> Account -> Maybe Account
936.24 s
[really-safe-money-gen] multiply factor account =
936.24 s
[really-safe-money-gen] let af = (fromIntegral :: Int32 -> Word32) ((Prelude.abs :: Int32 -> Int32) factor)
936.24 s
[really-safe-money-gen] f = case (compare factor 0, compare account zero) of
936.24 s
[really-safe-money-gen] (EQ, _) -> const zero
936.24 s
[really-safe-money-gen] (_, EQ) -> const zero
936.24 s
[really-safe-money-gen] (GT, GT) -> Positive
936.24 s
[really-safe-money-gen] (GT, LT) -> Negative
936.24 s
[really-safe-money-gen] - (LT, GT) -> Negative
936.24 s
[really-safe-money-gen] (LT, LT) -> Positive
936.24 s
[really-safe-money-gen] in f <$> Amount.multiply af (abs account)
936.24 s
[really-safe-money-gen]
936.24 s
[really-safe-money-gen] -- | Distribute an amount of money into chunks that are as evenly distributed as possible.
936.24 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:451:14-23
936.24 s
[really-safe-money-gen] @@ -448,7 +448,7 @@
936.24 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
936.24 s
[really-safe-money-gen] DistributedZero -> DistributedZero
936.24 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
936.24 s
[really-safe-money-gen] - if a > = z e ro
936.24 s
[really-safe-money-gen] + if F a ls e
936.24 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.24 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.24 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.24 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Account.hs:451:14-23
936.24 s
[really-safe-money-gen] @@ -448,7 +448,7 @@
936.24 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
936.24 s
[really-safe-money-gen] DistributedZero -> DistributedZero
936.24 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
936.24 s
[really-safe-money-gen] - if a >= zero
936.24 s
[really-safe-money-gen] + if n o t ( a >= zero )
936.24 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.24 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.24 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.25 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:455:14-23
936.25 s
[really-safe-money-gen] @@ -452,7 +452,7 @@
936.25 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.25 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.25 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.25 s
[really-safe-money-gen] - if a > = zero
936.25 s
[really-safe-money-gen] + if a < zero
936.25 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
936.25 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
936.25 s
[really-safe-money-gen]
936.25 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Account.hs:455:14-23
936.25 s
[really-safe-money-gen] @@ -452,7 +452,7 @@
936.25 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.25 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.25 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.25 s
[really-safe-money-gen] - if a >= zero
936.25 s
[really-safe-money-gen] + if n o t ( a >= zero )
936.25 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
936.25 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
936.25 s
[really-safe-money-gen]
936.25 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:455:14-23
936.25 s
[really-safe-money-gen] @@ -452,7 +452,7 @@
936.25 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.25 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.25 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.25 s
[really-safe-money-gen] - if a > = z e ro
936.25 s
[really-safe-money-gen] + if F a ls e
936.25 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
936.25 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
936.25 s
[really-safe-money-gen]
936.25 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:447:7-136
936.25 s
[really-safe-money-gen] @@ -444,17 +444,16 @@
936.25 s
[really-safe-money-gen] distribute a f =
936.25 s
[really-safe-money-gen] let aa = abs a
936.25 s
[really-safe-money-gen] af = (fromIntegral :: Word16 -> Word32) (Prelude.abs f)
936.25 s
[really-safe-money-gen] in case Amount.distribute aa af of
936.25 s
[really-safe-money-gen] - DistributedIntoZeroChunks -> DistributedIntoZeroChunks
936.25 s
[really-safe-money-gen] DistributedZero -> DistributedZero
936.25 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
936.25 s
[really-safe-money-gen] if a >= zero
936.25 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.25 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.25 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.25 s
[really-safe-money-gen] if a >= zero
936.25 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
936.25 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
936.25 s
[really-safe-money-gen]
936.25 s
[really-safe-money-gen] type AccountDistribution = Amount.Distribution Account
936.25 s
[really-safe-money-gen]
936.25 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:421:11-29
936.25 s
[really-safe-money-gen] @@ -418,13 +418,12 @@
936.25 s
[really-safe-money-gen] multiply :: Int32 -> Account -> Maybe Account
936.25 s
[really-safe-money-gen] multiply factor account =
936.25 s
[really-safe-money-gen] let af = (fromIntegral :: Int32 -> Word32) ((Prelude.abs :: Int32 -> Int32) factor)
936.25 s
[really-safe-money-gen] f = case (compare factor 0, compare account zero) of
936.25 s
[really-safe-money-gen] - (EQ, _) -> const zero
936.25 s
[really-safe-money-gen] (_, EQ) -> const zero
936.25 s
[really-safe-money-gen] (GT, GT) -> Positive
936.25 s
[really-safe-money-gen] (GT, LT) -> Negative
936.25 s
[really-safe-money-gen] (LT, GT) -> Negative
936.25 s
[really-safe-money-gen] (LT, LT) -> Positive
936.25 s
[really-safe-money-gen] in f <$> Amount.multiply af (abs account)
936.25 s
[really-safe-money-gen]
936.26 s
[really-safe-money-gen] -- | Distribute an amount of money into chunks that are as evenly distributed as possible.
936.26 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:455:14-23
936.26 s
[really-safe-money-gen] @@ -452,7 +452,7 @@
936.26 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.26 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.26 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.26 s
[really-safe-money-gen] - if a > = zero
936.26 s
[really-safe-money-gen] + if a > zero
936.26 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
936.26 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
936.26 s
[really-safe-money-gen]
936.26 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:421:11-29
936.26 s
[really-safe-money-gen] @@ -418,13 +418,12 @@
936.26 s
[really-safe-money-gen] multiply :: Int32 -> Account -> Maybe Account
936.26 s
[really-safe-money-gen] multiply factor account =
936.26 s
[really-safe-money-gen] let af = (fromIntegral :: Int32 -> Word32) ((Prelude.abs :: Int32 -> Int32) factor)
936.26 s
[really-safe-money-gen] f = case (compare factor 0, compare account zero) of
936.26 s
[really-safe-money-gen] (EQ, _) -> const zero
936.26 s
[really-safe-money-gen] - (_, EQ) -> const zero
936.26 s
[really-safe-money-gen] (GT, GT) -> Positive
936.26 s
[really-safe-money-gen] (GT, LT) -> Negative
936.26 s
[really-safe-money-gen] (LT, GT) -> Negative
936.26 s
[really-safe-money-gen] (LT, LT) -> Positive
936.26 s
[really-safe-money-gen] in f <$> Amount.multiply af (abs account)
936.26 s
[really-safe-money-gen]
936.26 s
[really-safe-money-gen] -- | Distribute an amount of money into chunks that are as evenly distributed as possible.
936.26 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:421:11-29
936.26 s
[really-safe-money-gen] @@ -418,13 +418,12 @@
936.26 s
[really-safe-money-gen] multiply :: Int32 -> Account -> Maybe Account
936.26 s
[really-safe-money-gen] multiply factor account =
936.26 s
[really-safe-money-gen] let af = (fromIntegral :: Int32 -> Word32) ((Prelude.abs :: Int32 -> Int32) factor)
936.26 s
[really-safe-money-gen] f = case (compare factor 0, compare account zero) of
936.26 s
[really-safe-money-gen] (EQ, _) -> const zero
936.26 s
[really-safe-money-gen] (_, EQ) -> const zero
936.26 s
[really-safe-money-gen] (GT, GT) -> Positive
936.26 s
[really-safe-money-gen] - (GT, LT) -> Negative
936.26 s
[really-safe-money-gen] (LT, GT) -> Negative
936.26 s
[really-safe-money-gen] (LT, LT) -> Positive
936.26 s
[really-safe-money-gen] in f <$> Amount.multiply af (abs account)
936.26 s
[really-safe-money-gen]
936.26 s
[really-safe-money-gen] -- | Distribute an amount of money into chunks that are as evenly distributed as possible.
936.26 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Account.hs:421:32-33
936.26 s
[really-safe-money-gen] @@ -418,7 +418,7 @@
936.26 s
[really-safe-money-gen] multiply :: Int32 -> Account -> Maybe Account
936.26 s
[really-safe-money-gen] multiply factor account =
936.26 s
[really-safe-money-gen] let af = (fromIntegral :: Int32 -> Word32) ((Prelude.abs :: Int32 -> Int32) factor)
936.26 s
[really-safe-money-gen] - f = case (compare factor 0 , compare account zero) of
936.26 s
[really-safe-money-gen] + f = case (compare factor 1 , compare account zero) of
936.26 s
[really-safe-money-gen] (EQ, _) -> const zero
936.26 s
[really-safe-money-gen] (_, EQ) -> const zero
936.26 s
[really-safe-money-gen] (GT, GT) -> Positive
936.26 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:455:14-23
936.26 s
[really-safe-money-gen] @@ -452,7 +452,7 @@
936.26 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
936.26 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
936.26 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
936.26 s
[really-safe-money-gen] - if a > = z e ro
936.26 s
[really-safe-money-gen] + if Tru e
936.26 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
936.26 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
936.26 s
[really-safe-money-gen]
936.26 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:522:19-35
936.26 s
[really-safe-money-gen] @@ -519,10 +519,9 @@
936.26 s
[really-safe-money-gen] let aa = abs account
936.26 s
[really-safe-money-gen] (amount, actualFraction) = Amount.fraction ro aa af
936.26 s
[really-safe-money-gen] func :: Maybe Amount -> Ratio Natural -> (Maybe Account, Ratio Natural)
936.26 s
[really-safe-money-gen] func ma r = case compare account zero of
936.26 s
[really-safe-money-gen] - EQ -> (Just zero, r)
936.26 s
[really-safe-money-gen] GT -> (Positive <$> ma, r)
936.26 s
[really-safe-money-gen] LT -> (Negative <$> ma, r)
936.27 s
[really-safe-money-gen] in func amount actualFraction
936.27 s
[really-safe-money-gen]
936.27 s
[really-safe-money-gen] -- | Compute the currency conversion rate between two accounts of money of
936.27 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:447:7-136
936.27 s
[really-safe-money-gen] @@ -444,17 +444,13 @@
936.27 s
[really-safe-money-gen] distribute a f =
936.27 s
[really-safe-money-gen] let aa = abs a
936.27 s
[really-safe-money-gen] af = (fromIntegral :: Word16 -> Word32) (Prelude.abs f)
936.27 s
[really-safe-money-gen] in case Amount.distribute aa af of
936.27 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
936.27 s
[really-safe-money-gen] DistributedZero -> DistributedZero
936.27 s
[really-safe-money-gen] - DistributedIntoEqualChunks numberOfChunks chunk ->
936.27 s
[really-safe-money-gen] - if a >= zero
936.27 s
[really-safe-money-gen] - then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
943.54 s
[really-safe-money-gen] - else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
943.54 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
943.56 s
[really-safe-money-gen] if a >= zero
943.56 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
943.56 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
943.56 s
[really-safe-money-gen]
943.56 s
[really-safe-money-gen] type AccountDistribution = Amount.Distribution Account
943.56 s
[really-safe-money-gen]
943.56 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/Account.hs:523:16-25
943.56 s
[really-safe-money-gen] @@ -520,7 +520,7 @@
943.57 s
[really-safe-money-gen] (amount, actualFraction) = Amount.fraction ro aa af
943.57 s
[really-safe-money-gen] func :: Maybe Amount -> Ratio Natural -> (Maybe Account, Ratio Natural)
943.57 s
[really-safe-money-gen] func ma r = case compare account zero of
943.57 s
[really-safe-money-gen] - EQ -> ( J u st ze r o , r)
943.57 s
[really-safe-money-gen] + EQ -> ( N o th in g , r)
943.57 s
[really-safe-money-gen] GT -> (Positive <$> ma, r)
943.57 s
[really-safe-money-gen] LT -> (Negative <$> ma, r)
943.57 s
[really-safe-money-gen] in func amount actualFraction
943.57 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:447:7-136
943.57 s
[really-safe-money-gen] @@ -444,17 +444,13 @@
943.57 s
[really-safe-money-gen] distribute a f =
943.57 s
[really-safe-money-gen] let aa = abs a
943.57 s
[really-safe-money-gen] af = (fromIntegral :: Word16 -> Word32) (Prelude.abs f)
943.57 s
[really-safe-money-gen] in case Amount.distribute aa af of
943.57 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
943.57 s
[really-safe-money-gen] DistributedZero -> DistributedZero
943.57 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
943.57 s
[really-safe-money-gen] if a >= zero
943.57 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
943.57 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
943.57 s
[really-safe-money-gen] - DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
943.57 s
[really-safe-money-gen] - if a >= zero
943.57 s
[really-safe-money-gen] - then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
943.58 s
[really-safe-money-gen] - else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
943.58 s
[really-safe-money-gen]
943.58 s
[really-safe-money-gen] type AccountDistribution = Amount.Distribution Account
943.58 s
[really-safe-money-gen]
943.58 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Account.hs:495:17-18
943.58 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
943.58 s
[really-safe-money-gen] fraction rounding account f =
943.58 s
[really-safe-money-gen] let af = (realToFrac :: Rational -> Ratio Natural) ((Prelude.abs :: Rational -> Rational) f)
943.58 s
[really-safe-money-gen] ro =
943.58 s
[really-safe-money-gen] - if f >= 0
943.58 s
[really-safe-money-gen] + if f >= 1
943.58 s
[really-safe-money-gen] then rounding
943.58 s
[really-safe-money-gen] else case rounding of
943.58 s
[really-safe-money-gen] RoundUp -> RoundDown
943.58 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:495:12-18
943.58 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
943.58 s
[really-safe-money-gen] fraction rounding account f =
943.58 s
[really-safe-money-gen] let af = (realToFrac :: Rational -> Ratio Natural) ((Prelude.abs :: Rational -> Rational) f)
943.58 s
[really-safe-money-gen] ro =
943.58 s
[really-safe-money-gen] - if f > = 0
943.58 s
[really-safe-money-gen] + if f < = 0
943.58 s
[really-safe-money-gen] then rounding
943.58 s
[really-safe-money-gen] else case rounding of
943.58 s
[really-safe-money-gen] RoundUp -> RoundDown
943.58 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:495:12-18
943.58 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
943.58 s
[really-safe-money-gen] fraction rounding account f =
943.58 s
[really-safe-money-gen] let af = (realToFrac :: Rational -> Ratio Natural) ((Prelude.abs :: Rational -> Rational) f)
943.58 s
[really-safe-money-gen] ro =
943.58 s
[really-safe-money-gen] - if f > = 0
943.58 s
[really-safe-money-gen] + if f > 0
943.58 s
[really-safe-money-gen] then rounding
943.58 s
[really-safe-money-gen] else case rounding of
943.58 s
[really-safe-money-gen] RoundUp -> RoundDown
943.58 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:495:12-18
943.59 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
943.59 s
[really-safe-money-gen] fraction rounding account f =
943.59 s
[really-safe-money-gen] let af = (realToFrac :: Rational -> Ratio Natural) ((Prelude.abs :: Rational -> Rational) f)
943.59 s
[really-safe-money-gen] ro =
943.59 s
[really-safe-money-gen] - if f >= 0
943.59 s
[really-safe-money-gen] + if F a lse
943.59 s
[really-safe-money-gen] then rounding
943.59 s
[really-safe-money-gen] else case rounding of
943.59 s
[really-safe-money-gen] RoundUp -> RoundDown
943.59 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:495:12-18
943.59 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
943.59 s
[really-safe-money-gen] fraction rounding account f =
943.59 s
[really-safe-money-gen] let af = (realToFrac :: Rational -> Ratio Natural) ((Prelude.abs :: Rational -> Rational) f)
943.59 s
[really-safe-money-gen] ro =
943.59 s
[really-safe-money-gen] - i f f >= 0
943.59 s
[really-safe-money-gen] + i f Tru e
943.59 s
[really-safe-money-gen] then rounding
943.59 s
[really-safe-money-gen] else case rounding of
943.59 s
[really-safe-money-gen] RoundUp -> RoundDown
943.59 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:522:19-35
943.59 s
[really-safe-money-gen] @@ -519,10 +519,9 @@
943.59 s
[really-safe-money-gen] let aa = abs account
943.59 s
[really-safe-money-gen] (amount, actualFraction) = Amount.fraction ro aa af
943.59 s
[really-safe-money-gen] func :: Maybe Amount -> Ratio Natural -> (Maybe Account, Ratio Natural)
943.59 s
[really-safe-money-gen] func ma r = case compare account zero of
943.59 s
[really-safe-money-gen] EQ -> (Just zero, r)
943.59 s
[really-safe-money-gen] - GT -> (Positive <$> ma, r)
943.59 s
[really-safe-money-gen] LT -> (Negative <$> ma, r)
943.59 s
[really-safe-money-gen] in func amount actualFraction
943.59 s
[really-safe-money-gen]
943.59 s
[really-safe-money-gen] -- | Compute the currency conversion rate between two accounts of money of
943.59 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:497:16-41
943.59 s
[really-safe-money-gen] @@ -494,10 +494,9 @@
943.59 s
[really-safe-money-gen] ro =
943.59 s
[really-safe-money-gen] if f >= 0
943.59 s
[really-safe-money-gen] then rounding
943.59 s
[really-safe-money-gen] else case rounding of
943.59 s
[really-safe-money-gen] - RoundUp -> RoundDown
943.60 s
[really-safe-money-gen] RoundDown -> RoundUp
943.60 s
[really-safe-money-gen] RoundNearest -> RoundNearest
943.60 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
943.60 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
943.60 s
[really-safe-money-gen] in if f >= 0
943.60 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:497:16-41
943.60 s
[really-safe-money-gen] @@ -494,10 +494,9 @@
943.60 s
[really-safe-money-gen] ro =
943.60 s
[really-safe-money-gen] if f >= 0
943.60 s
[really-safe-money-gen] then rounding
943.60 s
[really-safe-money-gen] else case rounding of
943.60 s
[really-safe-money-gen] RoundUp -> RoundDown
943.60 s
[really-safe-money-gen] RoundDown -> RoundUp
943.60 s
[really-safe-money-gen] - RoundNearest -> RoundNearest
943.60 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
943.60 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
943.60 s
[really-safe-money-gen] in if f >= 0
943.60 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:451:14-23
943.60 s
[really-safe-money-gen] @@ -448,7 +448,7 @@
943.60 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
943.60 s
[really-safe-money-gen] DistributedZero -> DistributedZero
943.60 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
943.60 s
[really-safe-money-gen] - if a > = zero
943.60 s
[really-safe-money-gen] + if a > zero
943.60 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
943.60 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
943.60 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
943.60 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:497:16-41
943.60 s
[really-safe-money-gen] @@ -494,10 +494,9 @@
943.60 s
[really-safe-money-gen] ro =
943.60 s
[really-safe-money-gen] if f >= 0
943.60 s
[really-safe-money-gen] then rounding
943.60 s
[really-safe-money-gen] else case rounding of
943.60 s
[really-safe-money-gen] RoundUp -> RoundDown
943.60 s
[really-safe-money-gen] - RoundDown -> RoundUp
943.60 s
[really-safe-money-gen] RoundNearest -> RoundNearest
943.60 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
943.60 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
943.60 s
[really-safe-money-gen] in if f >= 0
943.60 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Account.hs:503:15-16
943.60 s
[really-safe-money-gen] @@ -500,7 +500,7 @@
943.60 s
[really-safe-money-gen] RoundNearest -> RoundNearest
943.60 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
943.60 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
943.61 s
[really-safe-money-gen] - in if f >= 0
943.61 s
[really-safe-money-gen] + in if f >= 1
943.61 s
[really-safe-money-gen] then (ma, r)
943.61 s
[really-safe-money-gen] else (negate <$> ma, -r)
943.61 s
[really-safe-money-gen]
943.61 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:447:7-136
943.61 s
[really-safe-money-gen] @@ -444,17 +444,16 @@
943.61 s
[really-safe-money-gen] distribute a f =
943.61 s
[really-safe-money-gen] let aa = abs a
943.61 s
[really-safe-money-gen] af = (fromIntegral :: Word16 -> Word32) (Prelude.abs f)
943.61 s
[really-safe-money-gen] in case Amount.distribute aa af of
943.61 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
943.61 s
[really-safe-money-gen] - DistributedZero -> DistributedZero
943.61 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
943.61 s
[really-safe-money-gen] if a >= zero
943.61 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
943.61 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
943.61 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
943.61 s
[really-safe-money-gen] if a >= zero
943.61 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
943.61 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
943.61 s
[really-safe-money-gen]
943.61 s
[really-safe-money-gen] type AccountDistribution = Amount.Distribution Account
943.61 s
[really-safe-money-gen]
943.61 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:503:10-16
949.14 s
[really-safe-money-gen] @@ -500,7 +500,7 @@
949.16 s
[really-safe-money-gen] RoundNearest -> RoundNearest
949.16 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
949.17 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
949.17 s
[really-safe-money-gen] - in if f > = 0
949.17 s
[really-safe-money-gen] + in if f < 0
949.17 s
[really-safe-money-gen] then (ma, r)
949.17 s
[really-safe-money-gen] else (negate <$> ma, -r)
949.17 s
[really-safe-money-gen]
949.17 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:503:10-16
949.17 s
[really-safe-money-gen] @@ -500,7 +500,7 @@
949.17 s
[really-safe-money-gen] RoundNearest -> RoundNearest
949.17 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
949.17 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
949.17 s
[really-safe-money-gen] - in i f f >= 0
949.17 s
[really-safe-money-gen] + in i f Tru e
949.17 s
[really-safe-money-gen] then (ma, r)
949.17 s
[really-safe-money-gen] else (negate <$> ma, -r)
949.17 s
[really-safe-money-gen]
949.17 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:503:10-16
949.17 s
[really-safe-money-gen] @@ -500,7 +500,7 @@
949.17 s
[really-safe-money-gen] RoundNearest -> RoundNearest
949.17 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
949.17 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
949.17 s
[really-safe-money-gen] - in if f > = 0
949.18 s
[really-safe-money-gen] + in if f < = 0
949.18 s
[really-safe-money-gen] then (ma, r)
949.18 s
[really-safe-money-gen] else (negate <$> ma, -r)
949.18 s
[really-safe-money-gen]
949.18 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:495:12-18
949.18 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
949.18 s
[really-safe-money-gen] fraction rounding account f =
949.18 s
[really-safe-money-gen] let af = (realToFrac :: Rational -> Ratio Natural) ((Prelude.abs :: Rational -> Rational) f)
949.18 s
[really-safe-money-gen] ro =
949.18 s
[really-safe-money-gen] - if f > = 0
949.18 s
[really-safe-money-gen] + if f < 0
949.18 s
[really-safe-money-gen] then rounding
949.18 s
[really-safe-money-gen] else case rounding of
949.18 s
[really-safe-money-gen] RoundUp -> RoundDown
949.18 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:503:10-16
949.18 s
[really-safe-money-gen] @@ -500,7 +500,7 @@
949.18 s
[really-safe-money-gen] RoundNearest -> RoundNearest
949.18 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
949.18 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
949.18 s
[really-safe-money-gen] - in if f > = 0
949.18 s
[really-safe-money-gen] + in if f > 0
949.18 s
[really-safe-money-gen] then (ma, r)
949.18 s
[really-safe-money-gen] else (negate <$> ma, -r)
949.18 s
[really-safe-money-gen]
949.18 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:455:14-23
949.18 s
[really-safe-money-gen] @@ -452,7 +452,7 @@
949.18 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
949.19 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
949.19 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
949.19 s
[really-safe-money-gen] - if a > = zero
949.19 s
[really-safe-money-gen] + if a < = zero
949.19 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
949.19 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
949.19 s
[really-safe-money-gen]
949.19 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Account.hs:503:10-16
949.19 s
[really-safe-money-gen] @@ -500,7 +500,7 @@
949.19 s
[really-safe-money-gen] RoundNearest -> RoundNearest
949.19 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
949.19 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
949.19 s
[really-safe-money-gen] - in if f >= 0
949.19 s
[really-safe-money-gen] + in if n o t ( f >= 0 )
949.19 s
[really-safe-money-gen] then (ma, r)
949.19 s
[really-safe-money-gen] else (negate <$> ma, -r)
949.19 s
[really-safe-money-gen]
949.19 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:503:10-16
949.19 s
[really-safe-money-gen] @@ -500,7 +500,7 @@
949.19 s
[really-safe-money-gen] RoundNearest -> RoundNearest
949.19 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
949.19 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
949.19 s
[really-safe-money-gen] - in if f >= 0
949.19 s
[really-safe-money-gen] + in if F a lse
949.19 s
[really-safe-money-gen] then (ma, r)
949.19 s
[really-safe-money-gen] else (negate <$> ma, -r)
949.19 s
[really-safe-money-gen]
949.19 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:211:11-37
949.19 s
[really-safe-money-gen] @@ -208,9 +208,8 @@
949.19 s
[really-safe-money-gen] -- (-3) % 20
949.19 s
[really-safe-money-gen] toRational :: QuantisationFactor -> Account -> Rational
949.19 s
[really-safe-money-gen] toRational quantisationFactor account =
949.19 s
[really-safe-money-gen] let f = case account of
949.19 s
[really-safe-money-gen] Positive _ -> id
949.19 s
[really-safe-money-gen] - Negative _ -> Prelude.negate
949.19 s
[really-safe-money-gen] in f $ Amount.toRational quantisationFactor (abs account)
949.19 s
[really-safe-money-gen]
949.19 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
949.19 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:197:14-20
949.20 s
[really-safe-money-gen] @@ -194,7 +194,7 @@
949.20 s
[really-safe-money-gen] fromDouble :: QuantisationFactor -> Double -> Maybe Account
949.20 s
[really-safe-money-gen] fromDouble quantisationFactor d =
949.20 s
[really-safe-money-gen] let d' = Prelude.abs d
949.20 s
[really-safe-money-gen] - f = if d > = 0 then Positive else Negative
949.20 s
[really-safe-money-gen] + f = if d < 0 then Positive else Negative
949.20 s
[really-safe-money-gen] in f <$> Amount.fromDouble quantisationFactor d'
949.20 s
[really-safe-money-gen]
949.20 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Rational'.
949.20 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:171:11-37
949.20 s
[really-safe-money-gen] @@ -168,9 +168,8 @@
949.20 s
[really-safe-money-gen] -- -0.25
949.20 s
[really-safe-money-gen] toDouble :: QuantisationFactor -> Account -> Double
949.20 s
[really-safe-money-gen] toDouble quantisationFactor account =
949.20 s
[really-safe-money-gen] let f = case account of
949.20 s
[really-safe-money-gen] Positive _ -> id
949.20 s
[really-safe-money-gen] - Negative _ -> Prelude.negate
949.20 s
[really-safe-money-gen] in f $ Amount.toDouble quantisationFactor (abs account)
949.20 s
[really-safe-money-gen]
949.20 s
[really-safe-money-gen] -- | Turn a 'Double' into an amount of money.
949.20 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:522:19-35
949.20 s
[really-safe-money-gen] @@ -519,10 +519,9 @@
949.20 s
[really-safe-money-gen] let aa = abs account
949.20 s
[really-safe-money-gen] (amount, actualFraction) = Amount.fraction ro aa af
949.20 s
[really-safe-money-gen] func :: Maybe Amount -> Ratio Natural -> (Maybe Account, Ratio Natural)
949.20 s
[really-safe-money-gen] func ma r = case compare account zero of
949.20 s
[really-safe-money-gen] EQ -> (Just zero, r)
949.20 s
[really-safe-money-gen] GT -> (Positive <$> ma, r)
949.20 s
[really-safe-money-gen] - LT -> (Negative <$> ma, r)
949.20 s
[really-safe-money-gen] in func amount actualFraction
949.20 s
[really-safe-money-gen]
949.20 s
[really-safe-money-gen] -- | Compute the currency conversion rate between two accounts of money of
949.21 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:155:11-37
949.21 s
[really-safe-money-gen] @@ -152,9 +152,8 @@
949.21 s
[really-safe-money-gen] -- We return 'Integer' because the result does not fit into a 'Word64'
949.21 s
[really-safe-money-gen] toMinimalQuantisations :: Account -> Integer
949.21 s
[really-safe-money-gen] toMinimalQuantisations account =
949.21 s
[really-safe-money-gen] let f = case account of
949.21 s
[really-safe-money-gen] - Positive _ -> id
949.21 s
[really-safe-money-gen] Negative _ -> Prelude.negate
949.21 s
[really-safe-money-gen] in f $ (fromIntegral :: Word64 -> Integer) $ Amount.toMinimalQuantisations (abs account)
949.21 s
[really-safe-money-gen]
949.21 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Double'.
949.21 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:233:14-20
949.21 s
[really-safe-money-gen] @@ -230,7 +230,7 @@
949.21 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Account
949.21 s
[really-safe-money-gen] fromRational quantisationFactor r =
949.21 s
[really-safe-money-gen] let r' = Prelude.abs r
949.21 s
[really-safe-money-gen] - f = if r > = 0 then Positive else Negative
949.21 s
[really-safe-money-gen] + f = if r < 0 then Positive else Negative
949.21 s
[really-safe-money-gen] in f <$> Amount.fromRational quantisationFactor r'
949.21 s
[really-safe-money-gen]
949.21 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
949.21 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Account.hs:233:14-20
949.21 s
[really-safe-money-gen] @@ -230,7 +230,7 @@
949.21 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Account
949.21 s
[really-safe-money-gen] fromRational quantisationFactor r =
949.21 s
[really-safe-money-gen] let r' = Prelude.abs r
949.21 s
[really-safe-money-gen] - f = if r >= 0 then Positive else Negative
949.21 s
[really-safe-money-gen] + f = if n o t ( r >= 0 ) then Positive else Negative
949.21 s
[really-safe-money-gen] in f <$> Amount.fromRational quantisationFactor r'
949.21 s
[really-safe-money-gen]
949.21 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
949.21 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:197:14-20
949.22 s
[really-safe-money-gen] @@ -194,7 +194,7 @@
949.22 s
[really-safe-money-gen] fromDouble :: QuantisationFactor -> Double -> Maybe Account
949.22 s
[really-safe-money-gen] fromDouble quantisationFactor d =
949.22 s
[really-safe-money-gen] let d' = Prelude.abs d
949.22 s
[really-safe-money-gen] - f = if d >= 0 then Positive else Negative
949.22 s
[really-safe-money-gen] + f = if F a lse then Positive else Negative
949.22 s
[really-safe-money-gen] in f <$> Amount.fromDouble quantisationFactor d'
949.22 s
[really-safe-money-gen]
949.22 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Rational'.
949.22 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:171:11-37
949.22 s
[really-safe-money-gen] @@ -168,9 +168,8 @@
949.22 s
[really-safe-money-gen] -- -0.25
949.22 s
[really-safe-money-gen] toDouble :: QuantisationFactor -> Account -> Double
949.22 s
[really-safe-money-gen] toDouble quantisationFactor account =
949.22 s
[really-safe-money-gen] let f = case account of
949.22 s
[really-safe-money-gen] - Positive _ -> id
949.22 s
[really-safe-money-gen] Negative _ -> Prelude.negate
949.22 s
[really-safe-money-gen] in f $ Amount.toDouble quantisationFactor (abs account)
949.22 s
[really-safe-money-gen]
949.22 s
[really-safe-money-gen] -- | Turn a 'Double' into an amount of money.
949.22 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Account.hs:233:19-20
949.22 s
[really-safe-money-gen] @@ -230,7 +230,7 @@
949.22 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Account
949.22 s
[really-safe-money-gen] fromRational quantisationFactor r =
949.22 s
[really-safe-money-gen] let r' = Prelude.abs r
949.22 s
[really-safe-money-gen] - f = if r >= 0 then Positive else Negative
949.22 s
[really-safe-money-gen] + f = if r >= 1 then Positive else Negative
953.40 s
[really-safe-money-gen] in f <$> Amount.fromRational quantisationFactor r'
953.40 s
[really-safe-money-gen]
953.40 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
953.40 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:123:10-23
953.40 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
953.40 s
[really-safe-money-gen] maxBoundI = (toInteger :: Word64 -> Integer) (maxBound :: Word64)
953.40 s
[really-safe-money-gen] a :: Integer
953.40 s
[really-safe-money-gen] a = (Prelude.abs :: Integer -> Integer) i
953.40 s
[really-safe-money-gen] - in if a > maxBoundI
953.40 s
[really-safe-money-gen] + in if a < = maxBoundI
953.40 s
[really-safe-money-gen] then Nothing
953.40 s
[really-safe-money-gen] else
953.40 s
[really-safe-money-gen] let w :: Word64
953.40 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:233:14-20
953.40 s
[really-safe-money-gen] @@ -230,7 +230,7 @@
953.40 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Account
953.40 s
[really-safe-money-gen] fromRational quantisationFactor r =
953.40 s
[really-safe-money-gen] let r' = Prelude.abs r
953.40 s
[really-safe-money-gen] - f = if r >= 0 then Positive else Negative
953.40 s
[really-safe-money-gen] + f = if T r u e then Positive else Negative
953.40 s
[really-safe-money-gen] in f <$> Amount.fromRational quantisationFactor r'
953.40 s
[really-safe-money-gen]
953.40 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
953.40 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Account.hs:495:12-18
953.40 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
953.40 s
[really-safe-money-gen] fraction rounding account f =
953.41 s
[really-safe-money-gen] let af = (realToFrac :: Rational -> Ratio Natural) ((Prelude.abs :: Rational -> Rational) f)
953.41 s
[really-safe-money-gen] ro =
953.41 s
[really-safe-money-gen] - if f >= 0
953.41 s
[really-safe-money-gen] + if n o t ( f >= 0 )
953.41 s
[really-safe-money-gen] then rounding
953.41 s
[really-safe-money-gen] else case rounding of
953.41 s
[really-safe-money-gen] RoundUp -> RoundDown
953.41 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Account.hs:131:20-26
953.41 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
953.41 s
[really-safe-money-gen] amount :: Amount
953.41 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
953.41 s
[really-safe-money-gen] in Just $
953.41 s
[really-safe-money-gen] - if i >= 0
953.41 s
[really-safe-money-gen] + if n o t ( i >= 0 )
953.41 s
[really-safe-money-gen] then Positive amount
953.41 s
[really-safe-money-gen] else Negative amount
953.41 s
[really-safe-money-gen]
953.41 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Account.hs:341:11-18
953.41 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
953.41 s
[really-safe-money-gen] i2 :: Integer
953.41 s
[really-safe-money-gen] i2 = toMinimalQuantisations a2
953.41 s
[really-safe-money-gen] r :: Integer
953.41 s
[really-safe-money-gen] - r = i1 + i2
953.41 s
[really-safe-money-gen] + r = i1 - i2
953.41 s
[really-safe-money-gen] in fromMinimalQuantisations r
953.41 s
[really-safe-money-gen]
953.41 s
[really-safe-money-gen] -- | Add a number of accounts of money together.
953.41 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Account.hs:341:11-18
953.41 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
953.41 s
[really-safe-money-gen] i2 :: Integer
953.41 s
[really-safe-money-gen] i2 = toMinimalQuantisations a2
953.41 s
[really-safe-money-gen] r :: Integer
953.41 s
[really-safe-money-gen] - r = i1 + i2
953.41 s
[really-safe-money-gen] + r = i1 * i2
953.41 s
[really-safe-money-gen] in fromMinimalQuantisations r
953.41 s
[really-safe-money-gen]
953.41 s
[really-safe-money-gen] -- | Add a number of accounts of money together.
953.42 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Account.hs:378:11-18
953.42 s
[really-safe-money-gen] @@ -375,7 +375,7 @@
953.42 s
[really-safe-money-gen] i2 :: Integer
953.42 s
[really-safe-money-gen] i2 = toMinimalQuantisations a2
953.42 s
[really-safe-money-gen] r :: Integer
953.42 s
[really-safe-money-gen] - r = i1 - i2
953.42 s
[really-safe-money-gen] + r = i1 + i2
953.42 s
[really-safe-money-gen] in fromMinimalQuantisations r
953.42 s
[really-safe-money-gen]
953.42 s
[really-safe-money-gen] -- | The absolute value of the account
953.42 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Account.hs:378:11-18
953.42 s
[really-safe-money-gen] @@ -375,7 +375,7 @@
953.42 s
[really-safe-money-gen] i2 :: Integer
953.42 s
[really-safe-money-gen] i2 = toMinimalQuantisations a2
953.42 s
[really-safe-money-gen] r :: Integer
953.42 s
[really-safe-money-gen] - r = i1 - i2
953.42 s
[really-safe-money-gen] + r = i1 * i2
953.42 s
[really-safe-money-gen] in fromMinimalQuantisations r
953.42 s
[really-safe-money-gen]
953.42 s
[really-safe-money-gen] -- | The absolute value of the account
953.42 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:131:20-26
953.42 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
953.42 s
[really-safe-money-gen] amount :: Amount
953.42 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
953.42 s
[really-safe-money-gen] in Just $
953.42 s
[really-safe-money-gen] - if i > = 0
953.42 s
[really-safe-money-gen] + if i < 0
953.42 s
[really-safe-money-gen] then Positive amount
953.42 s
[really-safe-money-gen] else Negative amount
953.42 s
[really-safe-money-gen]
953.42 s
[really-safe-money-gen] Testing mutation BoolLit at src/Numeric/DecimalLiteral.hs:396:23-27
953.42 s
[really-safe-money-gen] @@ -393,5 +393,5 @@
953.42 s
[really-safe-money-gen] DecimalLiteral mS m e -> DecimalLiteral (go mS) m e
953.42 s
[really-safe-money-gen] where
953.42 s
[really-safe-money-gen] go = \case
953.42 s
[really-safe-money-gen] - Nothing -> Just Tr u e
953.42 s
[really-safe-money-gen] + Nothing -> Just F a ls e
953.42 s
[really-safe-money-gen] s -> s
953.42 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
953.42 s
[really-safe-money-gen] @@ -365,7 +365,7 @@
953.42 s
[really-safe-money-gen] setMinimumDigits wantedDigits dl =
953.43 s
[really-safe-money-gen] let currentDigits :: Word8
953.43 s
[really-safe-money-gen] currentDigits = digits dl
953.43 s
[really-safe-money-gen] - in if wantedDigits < = currentDigits
953.43 s
[really-safe-money-gen] + in if wantedDigits < currentDigits
953.43 s
[really-safe-money-gen] then dl
953.43 s
[really-safe-money-gen] else increaseDigits (wantedDigits - currentDigits) dl
953.43 s
[really-safe-money-gen] where
953.43 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
953.43 s
[really-safe-money-gen] @@ -365,7 +365,7 @@
953.43 s
[really-safe-money-gen] setMinimumDigits wantedDigits dl =
953.43 s
[really-safe-money-gen] let currentDigits :: Word8
953.43 s
[really-safe-money-gen] currentDigits = digits dl
953.43 s
[really-safe-money-gen] - in if wantedDigits < = currentDigits
953.43 s
[really-safe-money-gen] + in if wantedDigits > currentDigits
953.43 s
[really-safe-money-gen] then dl
953.43 s
[really-safe-money-gen] else increaseDigits (wantedDigits - currentDigits) dl
953.43 s
[really-safe-money-gen] where
953.43 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:368:10-39
953.43 s
[really-safe-money-gen] @@ -365,7 +365,7 @@
953.43 s
[really-safe-money-gen] setMinimumDigits wantedDigits dl =
953.43 s
[really-safe-money-gen] let currentDigits :: Word8
953.43 s
[really-safe-money-gen] currentDigits = digits dl
953.43 s
[really-safe-money-gen] - in if wantedDigits < = currentDigits
953.43 s
[really-safe-money-gen] + in if wantedDigits > = currentDigits
953.43 s
[really-safe-money-gen] then dl
953.43 s
[really-safe-money-gen] else increaseDigits (wantedDigits - currentDigits) dl
953.43 s
[really-safe-money-gen] where
953.43 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:368:10-39
953.43 s
[really-safe-money-gen] @@ -365,7 +365,7 @@
953.43 s
[really-safe-money-gen] setMinimumDigits wantedDigits dl =
953.43 s
[really-safe-money-gen] let currentDigits :: Word8
953.43 s
[really-safe-money-gen] currentDigits = digits dl
953.43 s
[really-safe-money-gen] - in if w a nt ed Digits <= c u rr e n tDigits
953.43 s
[really-safe-money-gen] + in if Tr u e
953.43 s
[really-safe-money-gen] then dl
953.43 s
[really-safe-money-gen] else increaseDigits (wantedDigits - currentDigits) dl
953.43 s
[really-safe-money-gen] where
953.43 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:368:10-39
953.43 s
[really-safe-money-gen] @@ -365,7 +365,7 @@
953.43 s
[really-safe-money-gen] setMinimumDigits wantedDigits dl =
953.43 s
[really-safe-money-gen] let currentDigits :: Word8
953.43 s
[really-safe-money-gen] currentDigits = digits dl
953.43 s
[really-safe-money-gen] - in if w a nt edD ig i t s < = cu rr e n tDigits
953.43 s
[really-safe-money-gen] + in if F a l s e
953.43 s
[really-safe-money-gen] then dl
953.43 s
[really-safe-money-gen] else increaseDigits (wantedDigits - currentDigits) dl
953.43 s
[really-safe-money-gen] where
953.43 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:368:10-39
953.44 s
[really-safe-money-gen] @@ -365,7 +365,7 @@
953.44 s
[really-safe-money-gen] setMinimumDigits wantedDigits dl =
953.44 s
[really-safe-money-gen] let currentDigits :: Word8
953.44 s
[really-safe-money-gen] currentDigits = digits dl
953.44 s
[really-safe-money-gen] - in if wantedDigits <= currentDigits
953.44 s
[really-safe-money-gen] + in if n o t ( wantedDigits <= currentDigits )
953.44 s
[really-safe-money-gen] then dl
953.44 s
[really-safe-money-gen] else increaseDigits (wantedDigits - currentDigits) dl
953.44 s
[really-safe-money-gen] where
953.44 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:370:30-58
953.44 s
[really-safe-money-gen] @@ -367,7 +367,7 @@
953.44 s
[really-safe-money-gen] currentDigits = digits dl
953.44 s
[really-safe-money-gen] in if wantedDigits <= currentDigits
953.44 s
[really-safe-money-gen] then dl
953.44 s
[really-safe-money-gen] - else increaseDigits (wantedDigits - currentDigits) dl
953.44 s
[really-safe-money-gen] + else increaseDigits (wantedDigits + currentDigits) dl
953.44 s
[really-safe-money-gen] where
953.44 s
[really-safe-money-gen] increaseDigits :: Word8 -> DecimalLiteral -> DecimalLiteral
953.44 s
[really-safe-money-gen] increaseDigits 0 = id
953.44 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:370:30-58
953.44 s
[really-safe-money-gen] @@ -367,7 +367,7 @@
953.44 s
[really-safe-money-gen] currentDigits = digits dl
953.44 s
[really-safe-money-gen] in if wantedDigits <= currentDigits
953.44 s
[really-safe-money-gen] then dl
953.44 s
[really-safe-money-gen] - else increaseDigits (wantedDigits - currentDigits) dl
953.44 s
[really-safe-money-gen] + else increaseDigits (wantedDigits * currentDigits) dl
953.44 s
[really-safe-money-gen] where
953.44 s
[really-safe-money-gen] increaseDigits :: Word8 -> DecimalLiteral -> DecimalLiteral
953.44 s
[really-safe-money-gen] increaseDigits 0 = id
953.44 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:375:80-82
953.44 s
[really-safe-money-gen] @@ -372,7 +372,7 @@
953.44 s
[really-safe-money-gen] increaseDigits :: Word8 -> DecimalLiteral -> DecimalLiteral
953.44 s
[really-safe-money-gen] increaseDigits 0 = id
953.44 s
[really-safe-money-gen] increaseDigits w = \case
953.44 s
[really-safe-money-gen] - DecimalLiteral mS m e -> increaseDigits (pred w) (DecimalLiteral mS (m * 1 0) (succ e))
958.40 s
[really-safe-money-gen] + DecimalLiteral mS m e -> increaseDigits (pred w) (DecimalLiteral mS (m * 0) (succ e))
958.48 s
[really-safe-money-gen]
958.48 s
[really-safe-money-gen] -- | Ensures that a positive literal has no sign
958.48 s
[really-safe-money-gen] --
958.48 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:375:80-82
958.48 s
[really-safe-money-gen] @@ -372,7 +372,7 @@
958.48 s
[really-safe-money-gen] increaseDigits :: Word8 -> DecimalLiteral -> DecimalLiteral
958.48 s
[really-safe-money-gen] increaseDigits 0 = id
958.49 s
[really-safe-money-gen] increaseDigits w = \case
958.49 s
[really-safe-money-gen] - DecimalLiteral mS m e -> increaseDigits (pred w) (DecimalLiteral mS (m * 1 0 ) (succ e))
958.49 s
[really-safe-money-gen] + DecimalLiteral mS m e -> increaseDigits (pred w) (DecimalLiteral mS (m * 1 ) (succ e))
958.49 s
[really-safe-money-gen]
958.49 s
[really-safe-money-gen] -- | Ensures that a positive literal has no sign
958.49 s
[really-safe-money-gen] --
958.49 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:375:76-82
958.49 s
[really-safe-money-gen] @@ -372,7 +372,7 @@
958.49 s
[really-safe-money-gen] increaseDigits :: Word8 -> DecimalLiteral -> DecimalLiteral
958.49 s
[really-safe-money-gen] increaseDigits 0 = id
958.49 s
[really-safe-money-gen] increaseDigits w = \case
958.49 s
[really-safe-money-gen] - DecimalLiteral mS m e -> increaseDigits (pred w) (DecimalLiteral mS (m * 10) (succ e))
958.49 s
[really-safe-money-gen] + DecimalLiteral mS m e -> increaseDigits (pred w) (DecimalLiteral mS (m + 10) (succ e))
958.49 s
[really-safe-money-gen]
958.49 s
[really-safe-money-gen] -- | Ensures that a positive literal has no sign
958.49 s
[really-safe-money-gen] --
958.49 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:375:76-82
958.49 s
[really-safe-money-gen] @@ -372,7 +372,7 @@
958.49 s
[really-safe-money-gen] increaseDigits :: Word8 -> DecimalLiteral -> DecimalLiteral
958.49 s
[really-safe-money-gen] increaseDigits 0 = id
958.49 s
[really-safe-money-gen] increaseDigits w = \case
958.49 s
[really-safe-money-gen] - DecimalLiteral mS m e -> increaseDigits (pred w) (DecimalLiteral mS (m * 10) (succ e))
958.49 s
[really-safe-money-gen] + DecimalLiteral mS m e -> increaseDigits (pred w) (DecimalLiteral mS (m - 10) (succ e))
958.49 s
[really-safe-money-gen]
958.49 s
[really-safe-money-gen] -- | Ensures that a positive literal has no sign
958.49 s
[really-safe-money-gen] --
958.49 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:337:21-22
958.49 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.49 s
[really-safe-money-gen] pure $ fromIntegral n
958.50 s
[really-safe-money-gen]
958.50 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.50 s
[really-safe-money-gen] - numSign a = if a >= 0 then Nothing else Just False
958.50 s
[really-safe-money-gen] + numSign a = if a >= 1 then Nothing else Just False
958.50 s
[really-safe-money-gen]
958.50 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.50 s
[really-safe-money-gen] signSignum = \case
958.50 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
958.50 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.50 s
[really-safe-money-gen] pure $ fromIntegral n
958.50 s
[really-safe-money-gen]
958.50 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.50 s
[really-safe-money-gen] - numSign a = if a > = 0 then Nothing else Just False
958.50 s
[really-safe-money-gen] + numSign a = if a < 0 then Nothing else Just False
958.50 s
[really-safe-money-gen]
958.50 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.50 s
[really-safe-money-gen] signSignum = \case
958.50 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
958.50 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.50 s
[really-safe-money-gen] pure $ fromIntegral n
958.50 s
[really-safe-money-gen]
958.50 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.50 s
[really-safe-money-gen] - numSign a = if a > = 0 then Nothing else Just False
958.50 s
[really-safe-money-gen] + numSign a = if a < = 0 then Nothing else Just False
958.50 s
[really-safe-money-gen]
958.50 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.50 s
[really-safe-money-gen] signSignum = \case
958.50 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
958.50 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.50 s
[really-safe-money-gen] pure $ fromIntegral n
958.50 s
[really-safe-money-gen]
958.50 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.50 s
[really-safe-money-gen] - numSign a = if a > = 0 then Nothing else Just False
958.50 s
[really-safe-money-gen] + numSign a = if a > 0 then Nothing else Just False
958.50 s
[really-safe-money-gen]
958.50 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.50 s
[really-safe-money-gen] signSignum = \case
958.50 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:337:16-22
958.50 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.51 s
[really-safe-money-gen] pure $ fromIntegral n
958.51 s
[really-safe-money-gen]
958.51 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.51 s
[really-safe-money-gen] - numSign a = if a >= 0 then Nothing else Just False
958.51 s
[really-safe-money-gen] + numSign a = if Tru e then Nothing else Just False
958.51 s
[really-safe-money-gen]
958.51 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.51 s
[really-safe-money-gen] signSignum = \case
958.51 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:337:16-22
958.51 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.51 s
[really-safe-money-gen] pure $ fromIntegral n
958.51 s
[really-safe-money-gen]
958.51 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.51 s
[really-safe-money-gen] - numSign a = if a > = 0 then Nothing else Just False
958.51 s
[really-safe-money-gen] + numSign a = if F a l s e then Nothing else Just False
958.51 s
[really-safe-money-gen]
958.51 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.51 s
[really-safe-money-gen] signSignum = \case
958.51 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:337:16-22
958.51 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.51 s
[really-safe-money-gen] pure $ fromIntegral n
958.51 s
[really-safe-money-gen]
958.51 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.51 s
[really-safe-money-gen] - numSign a = if a >= 0 then Nothing else Just False
958.51 s
[really-safe-money-gen] + numSign a = if n o t ( a >= 0 ) then Nothing else Just False
958.51 s
[really-safe-money-gen]
958.51 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.51 s
[really-safe-money-gen] signSignum = \case
958.51 s
[really-safe-money-gen] Testing mutation BoolLit at src/Numeric/DecimalLiteral.hs:337:46-51
958.51 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.51 s
[really-safe-money-gen] pure $ fromIntegral n
958.51 s
[really-safe-money-gen]
958.51 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.51 s
[really-safe-money-gen] - numSign a = if a >= 0 then Nothing else Just F al s e
958.51 s
[really-safe-money-gen] + numSign a = if a >= 0 then Nothing else Just T ru e
958.51 s
[really-safe-money-gen]
958.51 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.51 s
[really-safe-money-gen] signSignum = \case
958.51 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Numeric/DecimalLiteral.hs:337:41-51
958.51 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
958.52 s
[really-safe-money-gen] pure $ fromIntegral n
958.52 s
[really-safe-money-gen]
958.52 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
958.52 s
[really-safe-money-gen] - numSign a = if a >= 0 then Nothing else J u s t F a lse
958.52 s
[really-safe-money-gen] + numSign a = if a >= 0 then Nothing else N o t h in g
958.52 s
[really-safe-money-gen]
958.52 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
958.52 s
[really-safe-money-gen] signSignum = \case
958.52 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
958.52 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
958.52 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
958.52 s
[really-safe-money-gen] toInt dl = do
958.52 s
[really-safe-money-gen] n <- toInteger dl
958.52 s
[really-safe-money-gen] - guard $ n < = fromIntegral (maxBound :: Int)
958.52 s
[really-safe-money-gen] + guard $ n < fromIntegral (maxBound :: Int)
958.52 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
958.52 s
[really-safe-money-gen] pure $ fromIntegral n
958.52 s
[really-safe-money-gen]
958.52 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
958.52 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
958.52 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
958.52 s
[really-safe-money-gen] toInt dl = do
958.52 s
[really-safe-money-gen] n <- toInteger dl
958.52 s
[really-safe-money-gen] - guard $ n < = fromIntegral (maxBound :: Int)
958.52 s
[really-safe-money-gen] + guard $ n > = fromIntegral (maxBound :: Int)
958.52 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
958.52 s
[really-safe-money-gen] pure $ fromIntegral n
958.52 s
[really-safe-money-gen]
958.52 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
958.52 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
958.52 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
958.52 s
[really-safe-money-gen] toInt dl = do
958.52 s
[really-safe-money-gen] n <- toInteger dl
958.52 s
[really-safe-money-gen] - guard $ n < = fromIntegral (maxBound :: Int)
958.52 s
[really-safe-money-gen] + guard $ n > fromIntegral (maxBound :: Int)
958.52 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
958.52 s
[really-safe-money-gen] pure $ fromIntegral n
958.53 s
[really-safe-money-gen]
958.53 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:332:11-46
958.53 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
958.53 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
958.53 s
[really-safe-money-gen] toInt dl = do
958.53 s
[really-safe-money-gen] n <- toInteger dl
958.53 s
[really-safe-money-gen] - guard $ n < = from I n te gr al ( maxBound : : Int)
958.53 s
[really-safe-money-gen] + guard $ F al se
958.53 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
958.53 s
[really-safe-money-gen] pure $ fromIntegral n
958.53 s
[really-safe-money-gen]
958.53 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:197:14-20
958.53 s
[really-safe-money-gen] @@ -194,7 +194,7 @@
958.53 s
[really-safe-money-gen] fromDouble :: QuantisationFactor -> Double -> Maybe Account
958.53 s
[really-safe-money-gen] fromDouble quantisationFactor d =
958.53 s
[really-safe-money-gen] let d' = Prelude.abs d
958.53 s
[really-safe-money-gen] - f = if d > = 0 then Positive else Negative
958.53 s
[really-safe-money-gen] + f = if d > 0 then Positive else Negative
958.53 s
[really-safe-money-gen] in f <$> Amount.fromDouble quantisationFactor d'
958.53 s
[really-safe-money-gen]
958.53 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Rational'.
958.53 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Account.hs:123:10-23
958.53 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
958.53 s
[really-safe-money-gen] maxBoundI = (toInteger :: Word64 -> Integer) (maxBound :: Word64)
958.53 s
[really-safe-money-gen] a :: Integer
958.53 s
[really-safe-money-gen] a = (Prelude.abs :: Integer -> Integer) i
958.53 s
[really-safe-money-gen] - in if a > maxBoundI
958.53 s
[really-safe-money-gen] + in if n o t ( a > maxBoundI )
962.88 s
[really-safe-money-gen] then Nothing
962.88 s
[really-safe-money-gen] else
962.88 s
[really-safe-money-gen] let w :: Word64
962.88 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:131:20-26
962.88 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
962.88 s
[really-safe-money-gen] amount :: Amount
962.88 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
962.88 s
[really-safe-money-gen] in Just $
962.88 s
[really-safe-money-gen] - if i > = 0
962.88 s
[really-safe-money-gen] + if i < = 0
962.88 s
[really-safe-money-gen] then Positive amount
962.88 s
[really-safe-money-gen] else Negative amount
962.88 s
[really-safe-money-gen]
962.89 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
962.89 s
[really-safe-money-gen] @@ -330,7 +330,7 @@
962.89 s
[really-safe-money-gen] toInt dl = do
962.89 s
[really-safe-money-gen] n <- toInteger dl
962.89 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
962.89 s
[really-safe-money-gen] - guard $ n > = fromIntegral (minBound :: Int)
962.89 s
[really-safe-money-gen] + guard $ n < fromIntegral (minBound :: Int)
962.89 s
[really-safe-money-gen] pure $ fromIntegral n
962.89 s
[really-safe-money-gen]
962.89 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
962.89 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:332:11-46
962.89 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
962.89 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
962.89 s
[really-safe-money-gen] toInt dl = do
962.89 s
[really-safe-money-gen] n <- toInteger dl
962.89 s
[really-safe-money-gen] - guard $ n <= fromIntegral (maxBound :: Int)
962.89 s
[really-safe-money-gen] + guard $ n o t ( n <= fromIntegral (maxBound :: Int) )
962.89 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
962.89 s
[really-safe-money-gen] pure $ fromIntegral n
962.89 s
[really-safe-money-gen]
962.89 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
962.89 s
[really-safe-money-gen] @@ -330,7 +330,7 @@
962.89 s
[really-safe-money-gen] toInt dl = do
962.89 s
[really-safe-money-gen] n <- toInteger dl
962.89 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
962.89 s
[really-safe-money-gen] - guard $ n > = fromIntegral (minBound :: Int)
962.89 s
[really-safe-money-gen] + guard $ n < = fromIntegral (minBound :: Int)
962.89 s
[really-safe-money-gen] pure $ fromIntegral n
962.89 s
[really-safe-money-gen]
962.89 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
962.89 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:333:11-46
962.89 s
[really-safe-money-gen] @@ -330,7 +330,7 @@
962.89 s
[really-safe-money-gen] toInt dl = do
962.89 s
[really-safe-money-gen] n <- toInteger dl
962.89 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
962.89 s
[really-safe-money-gen] - guard $ n > = fromIntegral (minBound :: Int)
962.89 s
[really-safe-money-gen] + guard $ n > fromIntegral (minBound :: Int)
962.89 s
[really-safe-money-gen] pure $ fromIntegral n
962.89 s
[really-safe-money-gen]
962.89 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
962.89 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:333:11-46
962.89 s
[really-safe-money-gen] @@ -330,7 +330,7 @@
962.90 s
[really-safe-money-gen] toInt dl = do
962.90 s
[really-safe-money-gen] n <- toInteger dl
962.90 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
962.90 s
[really-safe-money-gen] - guard $ n >= f r om I n t e g ral (minBound :: Int)
962.90 s
[really-safe-money-gen] + guard $ T r u e
962.90 s
[really-safe-money-gen] pure $ fromIntegral n
962.90 s
[really-safe-money-gen]
962.90 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
962.90 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:123:10-23
962.90 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
962.90 s
[really-safe-money-gen] maxBoundI = (toInteger :: Word64 -> Integer) (maxBound :: Word64)
962.90 s
[really-safe-money-gen] a :: Integer
962.90 s
[really-safe-money-gen] a = (Prelude.abs :: Integer -> Integer) i
962.90 s
[really-safe-money-gen] - in if a > maxBoundI
962.90 s
[really-safe-money-gen] + in if a < maxBoundI
962.90 s
[really-safe-money-gen] then Nothing
962.90 s
[really-safe-money-gen] else
962.90 s
[really-safe-money-gen] let w :: Word64
962.90 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:333:11-46
962.90 s
[really-safe-money-gen] @@ -330,7 +330,7 @@
962.90 s
[really-safe-money-gen] toInt dl = do
962.90 s
[really-safe-money-gen] n <- toInteger dl
962.90 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
962.90 s
[really-safe-money-gen] - guard $ n > = from I n te gr al ( minBound : : Int)
962.90 s
[really-safe-money-gen] + guard $ F al se
962.90 s
[really-safe-money-gen] pure $ fromIntegral n
962.90 s
[really-safe-money-gen]
962.90 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
962.90 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:131:20-26
962.90 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
962.90 s
[really-safe-money-gen] amount :: Amount
962.90 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
962.90 s
[really-safe-money-gen] in Just $
962.90 s
[really-safe-money-gen] - if i >= 0
962.90 s
[really-safe-money-gen] + if F a lse
962.90 s
[really-safe-money-gen] then Positive amount
962.90 s
[really-safe-money-gen] else Negative amount
962.90 s
[really-safe-money-gen]
962.90 s
[really-safe-money-gen] Testing mutation RemoveAction at src/Numeric/DecimalLiteral.hs:332:3-46
962.90 s
[really-safe-money-gen] @@ -329,7 +329,6 @@
962.90 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
962.90 s
[really-safe-money-gen] toInt dl = do
962.90 s
[really-safe-money-gen] n <- toInteger dl
962.90 s
[really-safe-money-gen] - guard $ n <= fromIntegral (maxBound :: Int)
962.90 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
962.90 s
[really-safe-money-gen] pure $ fromIntegral n
962.90 s
[really-safe-money-gen]
962.90 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:315:67-68
962.90 s
[really-safe-money-gen] @@ -312,7 +312,7 @@
962.90 s
[really-safe-money-gen]
962.90 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from an 'Integer'
962.90 s
[really-safe-money-gen] fromInteger :: Integer -> DecimalLiteral
962.90 s
[really-safe-money-gen] - fromInteger n = DecimalLiteral (numSign n) (fromIntegral (abs n)) 0
962.90 s
[really-safe-money-gen] + fromInteger n = DecimalLiteral (numSign n) (fromIntegral (abs n)) 1
962.90 s
[really-safe-money-gen]
962.90 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into an 'Integer'
962.90 s
[really-safe-money-gen] toInteger :: DecimalLiteral -> Maybe Integer
962.90 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:123:10-23
962.90 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
962.91 s
[really-safe-money-gen] maxBoundI = (toInteger :: Word64 -> Integer) (maxBound :: Word64)
962.91 s
[really-safe-money-gen] a :: Integer
962.91 s
[really-safe-money-gen] a = (Prelude.abs :: Integer -> Integer) i
962.91 s
[really-safe-money-gen] - in if a > m a xB ound I
962.91 s
[really-safe-money-gen] + in if F a l se
962.91 s
[really-safe-money-gen] then Nothing
962.91 s
[really-safe-money-gen] else
962.91 s
[really-safe-money-gen] let w :: Word64
962.91 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:333:11-46
962.91 s
[really-safe-money-gen] @@ -330,7 +330,7 @@
962.91 s
[really-safe-money-gen] toInt dl = do
962.91 s
[really-safe-money-gen] n <- toInteger dl
962.91 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
962.91 s
[really-safe-money-gen] - guard $ n >= fromIntegral (minBound :: Int)
962.91 s
[really-safe-money-gen] + guard $ n o t ( n >= fromIntegral (minBound :: Int) )
962.91 s
[really-safe-money-gen] pure $ fromIntegral n
962.91 s
[really-safe-money-gen]
962.91 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
962.91 s
[really-safe-money-gen] Testing mutation RemoveAction at src/Numeric/DecimalLiteral.hs:333:3-46
962.91 s
[really-safe-money-gen] @@ -330,7 +330,6 @@
962.91 s
[really-safe-money-gen] toInt dl = do
962.91 s
[really-safe-money-gen] n <- toInteger dl
962.91 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
962.91 s
[really-safe-money-gen] - guard $ n >= fromIntegral (minBound :: Int)
962.91 s
[really-safe-money-gen] pure $ fromIntegral n
962.91 s
[really-safe-money-gen]
962.91 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
962.91 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Numeric/DecimalLiteral.hs:310:27-33
962.91 s
[really-safe-money-gen] @@ -307,7 +307,7 @@
962.91 s
[really-safe-money-gen] toNatural :: DecimalLiteral -> Maybe Natural
962.91 s
[really-safe-money-gen] toNatural = \case
962.91 s
[really-safe-money-gen] DecimalLiteral (Just False) _ _ -> Nothing
962.91 s
[really-safe-money-gen] - DecimalLiteral _ n 0 -> J us t n
962.91 s
[really-safe-money-gen] + DecimalLiteral _ n 0 -> N o t h i n g
962.91 s
[really-safe-money-gen] _ -> Nothing
962.91 s
[really-safe-money-gen]
962.91 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from an 'Integer'
962.91 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:332:11-46
962.91 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
962.91 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
962.91 s
[really-safe-money-gen] toInt dl = do
962.91 s
[really-safe-money-gen] n <- toInteger dl
962.91 s
[really-safe-money-gen] - guard $ n <= f r om I n t e g ral (maxBound :: Int)
962.91 s
[really-safe-money-gen] + guard $ T r u e
962.91 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
962.91 s
[really-safe-money-gen] pure $ fromIntegral n
962.91 s
[really-safe-money-gen]
962.91 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Numeric/DecimalLiteral.hs:396:18-27
962.91 s
[really-safe-money-gen] @@ -393,5 +393,5 @@
962.91 s
[really-safe-money-gen] DecimalLiteral mS m e -> DecimalLiteral (go mS) m e
962.91 s
[really-safe-money-gen] where
962.91 s
[really-safe-money-gen] go = \case
962.91 s
[really-safe-money-gen] - Nothing -> J u s t T rue
962.92 s
[really-safe-money-gen] + Nothing -> No t hing
962.92 s
[really-safe-money-gen] s -> s
962.92 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Account.hs:197:14-20
962.92 s
[really-safe-money-gen] @@ -194,7 +194,7 @@
962.92 s
[really-safe-money-gen] fromDouble :: QuantisationFactor -> Double -> Maybe Account
962.92 s
[really-safe-money-gen] fromDouble quantisationFactor d =
962.92 s
[really-safe-money-gen] let d' = Prelude.abs d
962.92 s
[really-safe-money-gen] - f = if d >= 0 then Positive else Negative
962.92 s
[really-safe-money-gen] + f = if n o t ( d >= 0 ) then Positive else Negative
962.92 s
[really-safe-money-gen] in f <$> Amount.fromDouble quantisationFactor d'
962.92 s
[really-safe-money-gen]
962.92 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Rational'.
962.92 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:155:11-37
962.92 s
[really-safe-money-gen] @@ -152,9 +152,8 @@
962.92 s
[really-safe-money-gen] -- We return 'Integer' because the result does not fit into a 'Word64'
962.92 s
[really-safe-money-gen] toMinimalQuantisations :: Account -> Integer
962.92 s
[really-safe-money-gen] toMinimalQuantisations account =
962.92 s
[really-safe-money-gen] let f = case account of
962.92 s
[really-safe-money-gen] Positive _ -> id
962.92 s
[really-safe-money-gen] - Negative _ -> Prelude.negate
968.02 s
[really-safe-money-gen] in f $ (fromIntegral :: Word64 -> Integer) $ Amount.toMinimalQuantisations (abs account)
968.04 s
[really-safe-money-gen]
968.04 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Double'.
968.04 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:131:20-26
968.04 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
968.04 s
[really-safe-money-gen] amount :: Amount
968.04 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
968.05 s
[really-safe-money-gen] in Just $
968.05 s
[really-safe-money-gen] - if i >= 0
968.05 s
[really-safe-money-gen] + if Tru e
968.05 s
[really-safe-money-gen] then Positive amount
968.05 s
[really-safe-money-gen] else Negative amount
968.05 s
[really-safe-money-gen]
968.05 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:123:10-23
968.05 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
968.05 s
[really-safe-money-gen] maxBoundI = (toInteger :: Word64 -> Integer) (maxBound :: Word64)
968.05 s
[really-safe-money-gen] a :: Integer
968.05 s
[really-safe-money-gen] a = (Prelude.abs :: Integer -> Integer) i
968.05 s
[really-safe-money-gen] - in if a > maxBoundI
968.05 s
[really-safe-money-gen] + in if a > = maxBoundI
968.05 s
[really-safe-money-gen] then Nothing
968.05 s
[really-safe-money-gen] else
968.05 s
[really-safe-money-gen] let w :: Word64
968.05 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
968.05 s
[really-safe-money-gen] @@ -296,7 +296,7 @@
968.05 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
968.05 s
[really-safe-money-gen] toWord dl = do
968.05 s
[really-safe-money-gen] n <- toNatural dl
968.05 s
[really-safe-money-gen] - guard $ n < = fromIntegral (maxBound :: Word)
968.05 s
[really-safe-money-gen] + guard $ n > fromIntegral (maxBound :: Word)
968.05 s
[really-safe-money-gen] pure $ fromIntegral n
968.05 s
[really-safe-money-gen]
968.05 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
968.05 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:197:14-20
968.05 s
[really-safe-money-gen] @@ -194,7 +194,7 @@
968.05 s
[really-safe-money-gen] fromDouble :: QuantisationFactor -> Double -> Maybe Account
968.05 s
[really-safe-money-gen] fromDouble quantisationFactor d =
968.05 s
[really-safe-money-gen] let d' = Prelude.abs d
968.05 s
[really-safe-money-gen] - f = if d >= 0 then Positive else Negative
968.05 s
[really-safe-money-gen] + f = if Tru e then Positive else Negative
968.05 s
[really-safe-money-gen] in f <$> Amount.fromDouble quantisationFactor d'
968.06 s
[really-safe-money-gen]
968.06 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Rational'.
968.06 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:299:11-47
968.06 s
[really-safe-money-gen] @@ -296,7 +296,7 @@
968.06 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
968.06 s
[really-safe-money-gen] toWord dl = do
968.06 s
[really-safe-money-gen] n <- toNatural dl
968.06 s
[really-safe-money-gen] - guard $ n < = from I n te g r a l (maxB o u n d : : W ord)
968.06 s
[really-safe-money-gen] + guard $ T r u e
968.06 s
[really-safe-money-gen] pure $ fromIntegral n
968.06 s
[really-safe-money-gen]
968.06 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
968.06 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:123:10-23
968.06 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
968.06 s
[really-safe-money-gen] maxBoundI = (toInteger :: Word64 -> Integer) (maxBound :: Word64)
968.06 s
[really-safe-money-gen] a :: Integer
968.06 s
[really-safe-money-gen] a = (Prelude.abs :: Integer -> Integer) i
968.06 s
[really-safe-money-gen] - in if a > ma xB o u ndI
968.06 s
[really-safe-money-gen] + in if Tr u e
968.06 s
[really-safe-money-gen] then Nothing
968.06 s
[really-safe-money-gen] else
968.06 s
[really-safe-money-gen] let w :: Word64
968.06 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:299:11-47
968.06 s
[really-safe-money-gen] @@ -296,7 +296,7 @@
968.06 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
968.06 s
[really-safe-money-gen] toWord dl = do
968.06 s
[really-safe-money-gen] n <- toNatural dl
968.06 s
[really-safe-money-gen] - guard $ n <= fromIntegral (maxBound :: Word)
968.06 s
[really-safe-money-gen] + guard $ n o t ( n <= fromIntegral (maxBound :: Word) )
968.06 s
[really-safe-money-gen] pure $ fromIntegral n
968.06 s
[really-safe-money-gen]
968.06 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
968.06 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
968.06 s
[really-safe-money-gen] @@ -286,7 +286,7 @@
968.06 s
[really-safe-money-gen] toRatio :: DecimalLiteral -> Maybe (Ratio Natural)
968.06 s
[really-safe-money-gen] toRatio (DecimalLiteral mSign m e) = case mSign of
968.06 s
[really-safe-money-gen] Just False -> Nothing
968.06 s
[really-safe-money-gen] - _ -> Just $ fromIntegral m / ( 1 0 ^ e)
968.06 s
[really-safe-money-gen] + _ -> Just $ fromIntegral m / ( 0 ^ e)
968.06 s
[really-safe-money-gen]
968.06 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Word'
968.06 s
[really-safe-money-gen] fromWord :: Word -> DecimalLiteral
968.06 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:299:11-47
968.06 s
[really-safe-money-gen] @@ -296,7 +296,7 @@
968.06 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
968.06 s
[really-safe-money-gen] toWord dl = do
968.06 s
[really-safe-money-gen] n <- toNatural dl
968.06 s
[really-safe-money-gen] - guard $ n <= f r om Integ r al (maxBound :: Word)
968.06 s
[really-safe-money-gen] + guard $ F al se
968.06 s
[really-safe-money-gen] pure $ fromIntegral n
968.06 s
[really-safe-money-gen]
968.06 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
968.06 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Account.hs:131:25-26
968.06 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
968.06 s
[really-safe-money-gen] amount :: Amount
968.07 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
968.07 s
[really-safe-money-gen] in Just $
968.07 s
[really-safe-money-gen] - if i >= 0
968.07 s
[really-safe-money-gen] + if i >= 1
968.07 s
[really-safe-money-gen] then Positive amount
968.07 s
[really-safe-money-gen] else Negative amount
968.07 s
[really-safe-money-gen]
968.07 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
968.07 s
[really-safe-money-gen] @@ -233,7 +233,7 @@
968.07 s
[really-safe-money-gen] -- >>> fromRatio (1 % 3)
968.07 s
[really-safe-money-gen] -- Nothing
968.07 s
[really-safe-money-gen] fromRatio :: Ratio Natural -> Maybe DecimalLiteral
968.07 s
[really-safe-money-gen] - fromRatio = fromRationalRepetendLimited 2 5 6
968.07 s
[really-safe-money-gen] + fromRatio = fromRationalRepetendLimited 1
968.07 s
[really-safe-money-gen] where
968.07 s
[really-safe-money-gen] fromRationalRepetendLimited ::
968.07 s
[really-safe-money-gen] -- limit
968.07 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
968.07 s
[really-safe-money-gen] @@ -233,7 +233,7 @@
968.07 s
[really-safe-money-gen] -- >>> fromRatio (1 % 3)
968.07 s
[really-safe-money-gen] -- Nothing
968.07 s
[really-safe-money-gen] fromRatio :: Ratio Natural -> Maybe DecimalLiteral
968.07 s
[really-safe-money-gen] - fromRatio = fromRationalRepetendLimited 2 5 6
968.07 s
[really-safe-money-gen] + fromRatio = fromRationalRepetendLimited 0
968.07 s
[really-safe-money-gen] where
968.07 s
[really-safe-money-gen] fromRationalRepetendLimited ::
968.07 s
[really-safe-money-gen] -- limit
968.07 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:131:20-26
968.07 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
968.07 s
[really-safe-money-gen] amount :: Amount
968.07 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
968.07 s
[really-safe-money-gen] in Just $
968.07 s
[really-safe-money-gen] - if i > = 0
968.07 s
[really-safe-money-gen] + if i > 0
968.07 s
[really-safe-money-gen] then Positive amount
968.07 s
[really-safe-money-gen] else Negative amount
968.07 s
[really-safe-money-gen]
968.07 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Numeric/DecimalLiteral.hs:287:38-40
968.07 s
[really-safe-money-gen] @@ -284,9 +284,8 @@
968.07 s
[really-safe-money-gen] -- >>> toRatio (DecimalLiteral (Just False) 3 1)
968.07 s
[really-safe-money-gen] -- Nothing
968.07 s
[really-safe-money-gen] toRatio :: DecimalLiteral -> Maybe (Ratio Natural)
968.07 s
[really-safe-money-gen] toRatio (DecimalLiteral mSign m e) = case mSign of
968.07 s
[really-safe-money-gen] - Just False -> Nothing
968.07 s
[really-safe-money-gen] _ -> Just $ fromIntegral m / (10 ^ e)
968.07 s
[really-safe-money-gen]
968.07 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Word'
968.07 s
[really-safe-money-gen] fromWord :: Word -> DecimalLiteral
968.07 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:244:14-15
968.07 s
[really-safe-money-gen] @@ -241,7 +241,7 @@
968.07 s
[really-safe-money-gen] Ratio Natural ->
968.07 s
[really-safe-money-gen] Maybe DecimalLiteral
968.07 s
[really-safe-money-gen] fromRationalRepetendLimited l rational
968.07 s
[really-safe-money-gen] - | d == 0 = Nothing
968.07 s
[really-safe-money-gen] + | d == 1 = Nothing
968.07 s
[really-safe-money-gen] | otherwise = toLiteral Nothing <$> longDiv num
968.07 s
[really-safe-money-gen] where
968.07 s
[really-safe-money-gen] toLiteral mSign (m, e) = DecimalLiteral mSign m (fromIntegral e)
968.07 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Numeric/DecimalLiteral.hs:287:38-40
968.07 s
[really-safe-money-gen] @@ -284,9 +284,8 @@
968.07 s
[really-safe-money-gen] -- >>> toRatio (DecimalLiteral (Just False) 3 1)
968.07 s
[really-safe-money-gen] -- Nothing
968.07 s
[really-safe-money-gen] toRatio :: DecimalLiteral -> Maybe (Ratio Natural)
968.08 s
[really-safe-money-gen] toRatio (DecimalLiteral mSign m e) = case mSign of
968.08 s
[really-safe-money-gen] Just False -> Nothing
968.08 s
[really-safe-money-gen] - _ -> Just $ fromIntegral m / (10 ^ e)
968.08 s
[really-safe-money-gen]
968.08 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Word'
968.08 s
[really-safe-money-gen] fromWord :: Word -> DecimalLiteral
968.08 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Account.hs:233:14-20
968.08 s
[really-safe-money-gen] @@ -230,7 +230,7 @@
968.08 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Account
968.08 s
[really-safe-money-gen] fromRational quantisationFactor r =
968.08 s
[really-safe-money-gen] let r' = Prelude.abs r
968.08 s
[really-safe-money-gen] - f = if r >= 0 then Positive else Negative
968.08 s
[really-safe-money-gen] + f = if F a lse then Positive else Negative
968.08 s
[really-safe-money-gen] in f <$> Amount.fromRational quantisationFactor r'
968.08 s
[really-safe-money-gen]
968.08 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
968.08 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:244:9-15
968.08 s
[really-safe-money-gen] @@ -241,7 +241,7 @@
968.08 s
[really-safe-money-gen] Ratio Natural ->
968.08 s
[really-safe-money-gen] Maybe DecimalLiteral
968.08 s
[really-safe-money-gen] fromRationalRepetendLimited l rational
968.08 s
[really-safe-money-gen] - | d == 0 = Nothing
968.08 s
[really-safe-money-gen] + | n o t ( d == 0 ) = Nothing
968.08 s
[really-safe-money-gen] | otherwise = toLiteral Nothing <$> longDiv num
968.08 s
[really-safe-money-gen] where
973.40 s
[really-safe-money-gen] toLiteral mSign (m, e) = DecimalLiteral mSign m (fromIntegral e)
973.43 s
[really-safe-money-gen] Testing mutation RemoveAction at src/Numeric/DecimalLiteral.hs:299:3-47
973.43 s
[really-safe-money-gen] @@ -296,7 +296,6 @@
973.43 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
973.43 s
[really-safe-money-gen] toWord dl = do
973.43 s
[really-safe-money-gen] n <- toNatural dl
973.43 s
[really-safe-money-gen] - guard $ n <= fromIntegral (maxBound :: Word)
973.43 s
[really-safe-money-gen] pure $ fromIntegral n
973.43 s
[really-safe-money-gen]
973.43 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
973.43 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:244:9-15
973.44 s
[really-safe-money-gen] @@ -241,7 +241,7 @@
973.44 s
[really-safe-money-gen] Ratio Natural ->
973.44 s
[really-safe-money-gen] Maybe DecimalLiteral
973.44 s
[really-safe-money-gen] fromRationalRepetendLimited l rational
973.44 s
[really-safe-money-gen] - | d == 0 = Nothing
973.44 s
[really-safe-money-gen] + | Tru e = Nothing
973.44 s
[really-safe-money-gen] | otherwise = toLiteral Nothing <$> longDiv num
973.44 s
[really-safe-money-gen] where
973.44 s
[really-safe-money-gen] toLiteral mSign (m, e) = DecimalLiteral mSign m (fromIntegral e)
973.44 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Numeric/DecimalLiteral.hs:261:11-22
973.44 s
[really-safe-money-gen] @@ -258,7 +258,7 @@
973.44 s
[really-safe-money-gen] Natural ->
973.44 s
[really-safe-money-gen] Maybe (Natural, Int)
973.44 s
[really-safe-money-gen] longDivWithLimit !c !e _ns 0 =
973.44 s
[really-safe-money-gen] - J u s t (c , e)
973.44 s
[really-safe-money-gen] + N o t hing
973.44 s
[really-safe-money-gen] longDivWithLimit !c !e ns !n
973.44 s
[really-safe-money-gen] -- If there's a repetend, we can't turn it into a decimal literal
973.44 s
[really-safe-money-gen] | S.member n ns = Nothing
973.44 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:264:13-26
973.44 s
[really-safe-money-gen] @@ -261,7 +261,7 @@
973.44 s
[really-safe-money-gen] Just (c, e)
973.44 s
[really-safe-money-gen] longDivWithLimit !c !e ns !n
973.44 s
[really-safe-money-gen] -- If there's a repetend, we can't turn it into a decimal literal
973.44 s
[really-safe-money-gen] - | S . m e mb er n ns = Nothing
973.44 s
[really-safe-money-gen] + | T ru e = Nothing
973.44 s
[really-safe-money-gen] -- Over the limit, stop trying
973.44 s
[really-safe-money-gen] | e >= l = Nothing
973.44 s
[really-safe-money-gen] | n < d =
973.44 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
973.44 s
[really-safe-money-gen] @@ -263,7 +263,7 @@
973.44 s
[really-safe-money-gen] -- If there's a repetend, we can't turn it into a decimal literal
973.44 s
[really-safe-money-gen] | S.member n ns = Nothing
973.44 s
[really-safe-money-gen] -- Over the limit, stop trying
973.44 s
[really-safe-money-gen] - | e > = l = Nothing
973.44 s
[really-safe-money-gen] + | e < l = Nothing
973.44 s
[really-safe-money-gen] | n < d =
973.44 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.44 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
973.44 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
973.44 s
[really-safe-money-gen] @@ -263,7 +263,7 @@
973.44 s
[really-safe-money-gen] -- If there's a repetend, we can't turn it into a decimal literal
973.44 s
[really-safe-money-gen] | S.member n ns = Nothing
973.44 s
[really-safe-money-gen] -- Over the limit, stop trying
973.44 s
[really-safe-money-gen] - | e > = l = Nothing
973.44 s
[really-safe-money-gen] + | e < = l = Nothing
973.44 s
[really-safe-money-gen] | n < d =
973.45 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.45 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
973.45 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:264:13-26
973.45 s
[really-safe-money-gen] @@ -261,7 +261,7 @@
973.45 s
[really-safe-money-gen] Just (c, e)
973.45 s
[really-safe-money-gen] longDivWithLimit !c !e ns !n
973.45 s
[really-safe-money-gen] -- If there's a repetend, we can't turn it into a decimal literal
973.45 s
[really-safe-money-gen] - | S.member n ns = Nothing
973.45 s
[really-safe-money-gen] + | n o t ( S.member n ns ) = Nothing
973.45 s
[really-safe-money-gen] -- Over the limit, stop trying
973.45 s
[really-safe-money-gen] | e >= l = Nothing
973.45 s
[really-safe-money-gen] | n < d =
973.45 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:266:13-19
973.45 s
[really-safe-money-gen] @@ -263,7 +263,7 @@
973.45 s
[really-safe-money-gen] -- If there's a repetend, we can't turn it into a decimal literal
973.45 s
[really-safe-money-gen] | S.member n ns = Nothing
973.45 s
[really-safe-money-gen] -- Over the limit, stop trying
973.45 s
[really-safe-money-gen] - | e >= l = Nothing
973.45 s
[really-safe-money-gen] + | T r u e = Nothing
973.45 s
[really-safe-money-gen] | n < d =
973.45 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.45 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
973.45 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
973.45 s
[really-safe-money-gen] @@ -296,7 +296,7 @@
973.45 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
973.45 s
[really-safe-money-gen] toWord dl = do
973.45 s
[really-safe-money-gen] n <- toNatural dl
973.45 s
[really-safe-money-gen] - guard $ n < = fromIntegral (maxBound :: Word)
973.45 s
[really-safe-money-gen] + guard $ n < fromIntegral (maxBound :: Word)
973.45 s
[really-safe-money-gen] pure $ fromIntegral n
973.45 s
[really-safe-money-gen]
973.45 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
973.45 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:266:13-19
973.45 s
[really-safe-money-gen] @@ -263,7 +263,7 @@
973.45 s
[really-safe-money-gen] -- If there's a repetend, we can't turn it into a decimal literal
973.45 s
[really-safe-money-gen] | S.member n ns = Nothing
973.45 s
[really-safe-money-gen] -- Over the limit, stop trying
973.45 s
[really-safe-money-gen] - | e > = l = Nothing
973.45 s
[really-safe-money-gen] + | e > l = Nothing
973.45 s
[really-safe-money-gen] | n < d =
973.45 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.45 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
973.45 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:299:11-47
973.45 s
[really-safe-money-gen] @@ -296,7 +296,7 @@
973.45 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
973.45 s
[really-safe-money-gen] toWord dl = do
973.45 s
[really-safe-money-gen] n <- toNatural dl
973.45 s
[really-safe-money-gen] - guard $ n < = fromIntegral (maxBound :: Word)
973.45 s
[really-safe-money-gen] + guard $ n > = fromIntegral (maxBound :: Word)
973.45 s
[really-safe-money-gen] pure $ fromIntegral n
973.45 s
[really-safe-money-gen]
973.45 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
973.45 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
973.45 s
[really-safe-money-gen] @@ -264,7 +264,7 @@
973.45 s
[really-safe-money-gen] | S.member n ns = Nothing
973.45 s
[really-safe-money-gen] -- Over the limit, stop trying
973.45 s
[really-safe-money-gen] | e >= l = Nothing
973.45 s
[really-safe-money-gen] - | n < d =
973.45 s
[really-safe-money-gen] + | n > d =
973.45 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.45 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
973.45 s
[really-safe-money-gen] | otherwise =
973.46 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:267:13-18
973.46 s
[really-safe-money-gen] @@ -264,7 +264,7 @@
973.46 s
[really-safe-money-gen] | S.member n ns = Nothing
973.46 s
[really-safe-money-gen] -- Over the limit, stop trying
973.46 s
[really-safe-money-gen] | e >= l = Nothing
973.46 s
[really-safe-money-gen] - | n < d =
973.46 s
[really-safe-money-gen] + | n o t ( n < d ) =
973.46 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.46 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
973.46 s
[really-safe-money-gen] | otherwise =
973.46 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:269:41-43
973.46 s
[really-safe-money-gen] @@ -266,7 +266,7 @@
973.46 s
[really-safe-money-gen] | e >= l = Nothing
973.46 s
[really-safe-money-gen] | n < d =
973.46 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.46 s
[really-safe-money-gen] - in longDivWithLimit (c * 1 0 ) (succ e) ns' (n * 10)
973.46 s
[really-safe-money-gen] + in longDivWithLimit (c * 1 ) (succ e) ns' (n * 10)
973.46 s
[really-safe-money-gen] | otherwise =
973.46 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
973.46 s
[really-safe-money-gen] in longDivWithLimit (c + q) e ns r'
973.46 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:269:37-43
973.46 s
[really-safe-money-gen] @@ -266,7 +266,7 @@
973.46 s
[really-safe-money-gen] | e >= l = Nothing
973.46 s
[really-safe-money-gen] | n < d =
973.46 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.46 s
[really-safe-money-gen] - in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
973.46 s
[really-safe-money-gen] + in longDivWithLimit (c + 10) (succ e) ns' (n * 10)
973.46 s
[really-safe-money-gen] | otherwise =
973.46 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
973.46 s
[really-safe-money-gen] in longDivWithLimit (c + q) e ns r'
973.46 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:269:37-43
973.46 s
[really-safe-money-gen] @@ -266,7 +266,7 @@
973.46 s
[really-safe-money-gen] | e >= l = Nothing
973.46 s
[really-safe-money-gen] | n < d =
973.46 s
[really-safe-money-gen] let !ns' = S.insert n ns
973.46 s
[really-safe-money-gen] - in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
973.46 s
[really-safe-money-gen] + in longDivWithLimit (c - 10) (succ e) ns' (n * 10)
973.46 s
[really-safe-money-gen] | otherwise =
973.46 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
973.46 s
[really-safe-money-gen] in longDivWithLimit (c + q) e ns r'
973.46 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:304:42-43
973.46 s
[really-safe-money-gen] @@ -301,7 +301,7 @@
973.46 s
[really-safe-money-gen]
973.46 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
973.46 s
[really-safe-money-gen] fromNatural :: Natural -> DecimalLiteral
973.46 s
[really-safe-money-gen] - fromNatural n = DecimalLiteral Nothing n 0
973.46 s
[really-safe-money-gen] + fromNatural n = DecimalLiteral Nothing n 1
973.46 s
[really-safe-money-gen]
973.46 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Natural'
973.46 s
[really-safe-money-gen] toNatural :: DecimalLiteral -> Maybe Natural
977.80 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:267:13-18
977.80 s
[really-safe-money-gen] @@ -264,7 +264,7 @@
977.80 s
[really-safe-money-gen] | S.member n ns = Nothing
977.80 s
[really-safe-money-gen] -- Over the limit, stop trying
977.80 s
[really-safe-money-gen] | e >= l = Nothing
977.80 s
[really-safe-money-gen] - | n < d =
977.80 s
[really-safe-money-gen] + | T r u e =
977.80 s
[really-safe-money-gen] let !ns' = S.insert n ns
977.80 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
977.80 s
[really-safe-money-gen] | otherwise =
977.80 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:266:13-19
977.80 s
[really-safe-money-gen] @@ -263,7 +263,7 @@
977.80 s
[really-safe-money-gen] -- If there's a repetend, we can't turn it into a decimal literal
977.80 s
[really-safe-money-gen] | S.member n ns = Nothing
977.80 s
[really-safe-money-gen] -- Over the limit, stop trying
977.80 s
[really-safe-money-gen] - | e >= l = Nothing
977.81 s
[really-safe-money-gen] + | n o t ( e >= l ) = Nothing
977.81 s
[really-safe-money-gen] | n < d =
977.81 s
[really-safe-money-gen] let !ns' = S.insert n ns
977.81 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
977.81 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:252:36-37
977.81 s
[really-safe-money-gen] @@ -249,7 +249,7 @@
977.81 s
[really-safe-money-gen] num = numerator rational
977.81 s
[really-safe-money-gen]
977.81 s
[really-safe-money-gen] longDiv :: Natural -> Maybe (Natural, Int)
977.81 s
[really-safe-money-gen] - longDiv = longDivWithLimit 0 0 S.empty
977.81 s
[really-safe-money-gen] + longDiv = longDivWithLimit 1 0 S.empty
977.81 s
[really-safe-money-gen]
977.81 s
[really-safe-money-gen] longDivWithLimit ::
977.81 s
[really-safe-money-gen] Natural ->
977.81 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:269:59-65
977.81 s
[really-safe-money-gen] @@ -266,7 +266,7 @@
977.81 s
[really-safe-money-gen] | e >= l = Nothing
977.81 s
[really-safe-money-gen] | n < d =
977.81 s
[really-safe-money-gen] let !ns' = S.insert n ns
977.81 s
[really-safe-money-gen] - in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
977.81 s
[really-safe-money-gen] + in longDivWithLimit (c * 10) (succ e) ns' (n - 10)
977.81 s
[really-safe-money-gen] | otherwise =
977.81 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
977.81 s
[really-safe-money-gen] in longDivWithLimit (c + q) e ns r'
977.81 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:272:37-42
977.81 s
[really-safe-money-gen] @@ -269,7 +269,7 @@
977.81 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
977.81 s
[really-safe-money-gen] | otherwise =
977.81 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
977.81 s
[really-safe-money-gen] - in longDivWithLimit (c + q) e ns r'
977.81 s
[really-safe-money-gen] + in longDivWithLimit (c - q) e ns r'
977.81 s
[really-safe-money-gen]
977.81 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Ratio Natural'
977.81 s
[really-safe-money-gen] --
977.81 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:272:37-42
977.81 s
[really-safe-money-gen] @@ -269,7 +269,7 @@
977.81 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
977.81 s
[really-safe-money-gen] | otherwise =
977.81 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
977.81 s
[really-safe-money-gen] - in longDivWithLimit (c + q) e ns r'
977.81 s
[really-safe-money-gen] + in longDivWithLimit (c * q) e ns r'
977.81 s
[really-safe-money-gen]
977.81 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Ratio Natural'
977.81 s
[really-safe-money-gen] --
977.81 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:197:14-20
977.81 s
[really-safe-money-gen] @@ -194,7 +194,7 @@
977.81 s
[really-safe-money-gen] fromDouble :: QuantisationFactor -> Double -> Maybe Account
977.81 s
[really-safe-money-gen] fromDouble quantisationFactor d =
977.81 s
[really-safe-money-gen] let d' = Prelude.abs d
977.81 s
[really-safe-money-gen] - f = if d > = 0 then Positive else Negative
977.81 s
[really-safe-money-gen] + f = if d < = 0 then Positive else Negative
977.81 s
[really-safe-money-gen] in f <$> Amount.fromDouble quantisationFactor d'
977.82 s
[really-safe-money-gen]
977.82 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Rational'.
977.82 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:233:14-20
977.82 s
[really-safe-money-gen] @@ -230,7 +230,7 @@
977.82 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Account
977.82 s
[really-safe-money-gen] fromRational quantisationFactor r =
977.82 s
[really-safe-money-gen] let r' = Prelude.abs r
977.82 s
[really-safe-money-gen] - f = if r > = 0 then Positive else Negative
977.82 s
[really-safe-money-gen] + f = if r > 0 then Positive else Negative
977.82 s
[really-safe-money-gen] in f <$> Amount.fromRational quantisationFactor r'
977.82 s
[really-safe-money-gen]
977.82 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
977.82 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:236:41-44
977.82 s
[really-safe-money-gen] @@ -233,7 +233,7 @@
977.82 s
[really-safe-money-gen] -- >>> fromRatio (1 % 3)
977.82 s
[really-safe-money-gen] -- Nothing
977.82 s
[really-safe-money-gen] fromRatio :: Ratio Natural -> Maybe DecimalLiteral
977.82 s
[really-safe-money-gen] - fromRatio = fromRationalRepetendLimited 256
977.82 s
[really-safe-money-gen] + fromRatio = fromRationalRepetendLimited - 256
977.82 s
[really-safe-money-gen] where
977.82 s
[really-safe-money-gen] fromRationalRepetendLimited ::
977.82 s
[really-safe-money-gen] -- limit
977.82 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
977.82 s
[really-safe-money-gen] @@ -286,7 +286,7 @@
977.82 s
[really-safe-money-gen] toRatio :: DecimalLiteral -> Maybe (Ratio Natural)
977.82 s
[really-safe-money-gen] toRatio (DecimalLiteral mSign m e) = case mSign of
977.82 s
[really-safe-money-gen] Just False -> Nothing
977.82 s
[really-safe-money-gen] - _ -> Just $ fromIntegral m / (1 0 ^ e)
977.82 s
[really-safe-money-gen] + _ -> Just $ fromIntegral m / (1 ^ e)
977.82 s
[really-safe-money-gen]
977.82 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Word'
977.82 s
[really-safe-money-gen] fromWord :: Word -> DecimalLiteral
977.82 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Account.hs:197:19-20
977.82 s
[really-safe-money-gen] @@ -194,7 +194,7 @@
977.82 s
[really-safe-money-gen] fromDouble :: QuantisationFactor -> Double -> Maybe Account
977.82 s
[really-safe-money-gen] fromDouble quantisationFactor d =
977.82 s
[really-safe-money-gen] let d' = Prelude.abs d
977.82 s
[really-safe-money-gen] - f = if d >= 0 then Positive else Negative
977.82 s
[really-safe-money-gen] + f = if d >= 1 then Positive else Negative
977.82 s
[really-safe-money-gen] in f <$> Amount.fromDouble quantisationFactor d'
977.82 s
[really-safe-money-gen]
977.82 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Rational'.
977.82 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
977.82 s
[really-safe-money-gen] @@ -286,7 +286,7 @@
977.82 s
[really-safe-money-gen] toRatio :: DecimalLiteral -> Maybe (Ratio Natural)
977.82 s
[really-safe-money-gen] toRatio (DecimalLiteral mSign m e) = case mSign of
977.82 s
[really-safe-money-gen] Just False -> Nothing
977.82 s
[really-safe-money-gen] - _ -> Just $ fromIntegral m / ( 10 ^ e)
977.82 s
[really-safe-money-gen] + _ -> Just $ fromIntegral m / ( - 10 ^ e)
977.82 s
[really-safe-money-gen]
977.82 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Word'
977.82 s
[really-safe-money-gen] fromWord :: Word -> DecimalLiteral
977.82 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Account.hs:233:14-20
977.82 s
[really-safe-money-gen] @@ -230,7 +230,7 @@
977.83 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Account
977.83 s
[really-safe-money-gen] fromRational quantisationFactor r =
977.83 s
[really-safe-money-gen] let r' = Prelude.abs r
977.83 s
[really-safe-money-gen] - f = if r > = 0 then Positive else Negative
977.83 s
[really-safe-money-gen] + f = if r < = 0 then Positive else Negative
977.83 s
[really-safe-money-gen] in f <$> Amount.fromRational quantisationFactor r'
977.83 s
[really-safe-money-gen]
977.83 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
977.83 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account.hs:211:11-37
977.83 s
[really-safe-money-gen] @@ -208,9 +208,8 @@
977.83 s
[really-safe-money-gen] -- (-3) % 20
977.83 s
[really-safe-money-gen] toRational :: QuantisationFactor -> Account -> Rational
977.83 s
[really-safe-money-gen] toRational quantisationFactor account =
977.83 s
[really-safe-money-gen] let f = case account of
977.83 s
[really-safe-money-gen] - Positive _ -> id
977.83 s
[really-safe-money-gen] Negative _ -> Prelude.negate
977.83 s
[really-safe-money-gen] in f $ Amount.toRational quantisationFactor (abs account)
977.83 s
[really-safe-money-gen]
977.83 s
[really-safe-money-gen] -- | Turn a 'Rational' into an amount of money.
977.83 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:269:59-65
977.83 s
[really-safe-money-gen] @@ -266,7 +266,7 @@
977.83 s
[really-safe-money-gen] | e >= l = Nothing
977.83 s
[really-safe-money-gen] | n < d =
977.83 s
[really-safe-money-gen] let !ns' = S.insert n ns
977.83 s
[really-safe-money-gen] - in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
977.83 s
[really-safe-money-gen] + in longDivWithLimit (c * 10) (succ e) ns' (n + 10)
977.83 s
[really-safe-money-gen] | otherwise =
977.83 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
977.83 s
[really-safe-money-gen] in longDivWithLimit (c + q) e ns r'
977.83 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:269:63-65
977.83 s
[really-safe-money-gen] @@ -266,7 +266,7 @@
977.83 s
[really-safe-money-gen] | e >= l = Nothing
977.83 s
[really-safe-money-gen] | n < d =
977.83 s
[really-safe-money-gen] let !ns' = S.insert n ns
977.83 s
[really-safe-money-gen] - in longDivWithLimit (c * 10) (succ e) ns' (n * 1 0 )
977.83 s
[really-safe-money-gen] + in longDivWithLimit (c * 10) (succ e) ns' (n * 1 )
977.83 s
[really-safe-money-gen] | otherwise =
977.83 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
977.83 s
[really-safe-money-gen] in longDivWithLimit (c + q) e ns r'
977.83 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:269:63-65
977.83 s
[really-safe-money-gen] @@ -266,7 +266,7 @@
977.83 s
[really-safe-money-gen] | e >= l = Nothing
977.83 s
[really-safe-money-gen] | n < d =
977.83 s
[really-safe-money-gen] let !ns' = S.insert n ns
977.83 s
[really-safe-money-gen] - in longDivWithLimit (c * 10) (succ e) ns' (n * 1 0)
977.83 s
[really-safe-money-gen] + in longDivWithLimit (c * 10) (succ e) ns' (n * 0)
977.83 s
[really-safe-money-gen] | otherwise =
977.83 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
977.83 s
[really-safe-money-gen] in longDivWithLimit (c + q) e ns r'
977.83 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:269:41-43
977.83 s
[really-safe-money-gen] @@ -266,7 +266,7 @@
977.83 s
[really-safe-money-gen] | e >= l = Nothing
977.83 s
[really-safe-money-gen] | n < d =
977.83 s
[really-safe-money-gen] let !ns' = S.insert n ns
982.62 s
[really-safe-money-gen] - in longDivWithLimit (c * 1 0) (succ e) ns' (n * 10)
982.62 s
[really-safe-money-gen] + in longDivWithLimit (c * 0) (succ e) ns' (n * 10)
982.70 s
[really-safe-money-gen] | otherwise =
982.70 s
[really-safe-money-gen] let (q, r') = n `quotRem` d
982.70 s
[really-safe-money-gen] in longDivWithLimit (c + q) e ns r'
982.70 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
982.70 s
[really-safe-money-gen] @@ -264,7 +264,7 @@
982.70 s
[really-safe-money-gen] | S.member n ns = Nothing
982.70 s
[really-safe-money-gen] -- Over the limit, stop trying
982.71 s
[really-safe-money-gen] | e >= l = Nothing
982.71 s
[really-safe-money-gen] - | n < d =
982.71 s
[really-safe-money-gen] + | n > = d =
982.71 s
[really-safe-money-gen] let !ns' = S.insert n ns
982.71 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
982.71 s
[really-safe-money-gen] | otherwise =
982.71 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:252:38-39
982.71 s
[really-safe-money-gen] @@ -249,7 +249,7 @@
982.71 s
[really-safe-money-gen] num = numerator rational
982.71 s
[really-safe-money-gen]
982.71 s
[really-safe-money-gen] longDiv :: Natural -> Maybe (Natural, Int)
982.71 s
[really-safe-money-gen] - longDiv = longDivWithLimit 0 0 S.empty
982.71 s
[really-safe-money-gen] + longDiv = longDivWithLimit 0 1 S.empty
982.71 s
[really-safe-money-gen]
982.71 s
[really-safe-money-gen] longDivWithLimit ::
982.71 s
[really-safe-money-gen] Natural ->
982.71 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:267:13-18
982.71 s
[really-safe-money-gen] @@ -264,7 +264,7 @@
982.71 s
[really-safe-money-gen] | S.member n ns = Nothing
982.71 s
[really-safe-money-gen] -- Over the limit, stop trying
982.71 s
[really-safe-money-gen] | e >= l = Nothing
982.71 s
[really-safe-money-gen] - | n < d =
982.71 s
[really-safe-money-gen] + | n < = d =
982.71 s
[really-safe-money-gen] let !ns' = S.insert n ns
982.71 s
[really-safe-money-gen] in longDivWithLimit (c * 10) (succ e) ns' (n * 10)
982.71 s
[really-safe-money-gen] | otherwise =
982.71 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
982.71 s
[really-safe-money-gen] @@ -220,7 +220,7 @@
982.72 s
[really-safe-money-gen] -- (-3) % 10
982.72 s
[really-safe-money-gen] toRational :: DecimalLiteral -> Rational
982.72 s
[really-safe-money-gen] toRational (DecimalLiteral mSign m e) =
982.72 s
[really-safe-money-gen] - signSignum mSign (fromIntegral m / (1 0 ^ e))
982.72 s
[really-safe-money-gen] + signSignum mSign (fromIntegral m / (1 ^ e))
982.72 s
[really-safe-money-gen]
982.72 s
[really-safe-money-gen] -- | Parse a 'DecimalLiteral' from a 'Ratio Natural'
982.72 s
[really-safe-money-gen] --
982.72 s
[really-safe-money-gen] Testing mutation ListLit at src/Numeric/DecimalLiteral.hs:186:15-25
982.72 s
[really-safe-money-gen] @@ -183,7 +183,6 @@
982.72 s
[really-safe-money-gen]
982.72 s
[really-safe-money-gen] goFrac m e = reverse (go e (reverse (show m)))
982.72 s
[really-safe-money-gen] go :: Word8 -> String -> String
982.72 s
[really-safe-money-gen] - go 0 [] = ['.', '0']
982.72 s
[really-safe-money-gen] go 0 s = '.' : s
982.72 s
[really-safe-money-gen] go e [] = '0' : go (pred e) []
982.72 s
[really-safe-money-gen] go e (c : cs) = c : go (pred e) cs
982.72 s
[really-safe-money-gen] Testing mutation ListLit at src/Numeric/DecimalLiteral.hs:186:15-25
982.72 s
[really-safe-money-gen] @@ -183,7 +183,6 @@
982.72 s
[really-safe-money-gen]
982.72 s
[really-safe-money-gen] goFrac m e = reverse (go e (reverse (show m)))
982.72 s
[really-safe-money-gen] go :: Word8 -> String -> String
982.72 s
[really-safe-money-gen] - go 0 [] = ['.', '0']
982.72 s
[really-safe-money-gen] go 0 s = '.' : s
982.72 s
[really-safe-money-gen] go e [] = '0' : go (pred e) []
982.72 s
[really-safe-money-gen] go e (c : cs) = c : go (pred e) cs
982.72 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
982.72 s
[really-safe-money-gen] @@ -142,7 +142,7 @@
982.72 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
982.72 s
[really-safe-money-gen] parseDigits f z = do
982.72 s
[really-safe-money-gen] c <- ReadP.satisfy Char.isDigit
982.72 s
[really-safe-money-gen] - let digit = Char.ord c - 4 8
982.72 s
[really-safe-money-gen] + let digit = Char.ord c - 0
982.72 s
[really-safe-money-gen] case f z digit of
982.72 s
[really-safe-money-gen] Nothing -> fail "Failed to step the first digit"
982.72 s
[really-safe-money-gen] Just a -> ReadP.look >>= go a
982.72 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
982.72 s
[really-safe-money-gen] @@ -205,7 +205,7 @@
982.72 s
[really-safe-money-gen] -- Nothing
982.72 s
[really-safe-money-gen] fromRational :: Rational -> Maybe DecimalLiteral
982.72 s
[really-safe-money-gen] fromRational (n :% d)
982.72 s
[really-safe-money-gen] - | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
982.72 s
[really-safe-money-gen] + | n > = 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
982.72 s
[really-safe-money-gen] | otherwise = fromRatio (fromIntegral n % fromIntegral d)
982.72 s
[really-safe-money-gen]
982.72 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Rational'
982.72 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
982.72 s
[really-safe-money-gen] @@ -205,7 +205,7 @@
982.72 s
[really-safe-money-gen] -- Nothing
982.72 s
[really-safe-money-gen] fromRational :: Rational -> Maybe DecimalLiteral
982.72 s
[really-safe-money-gen] fromRational (n :% d)
982.72 s
[really-safe-money-gen] - | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
982.72 s
[really-safe-money-gen] + | n > 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
982.72 s
[really-safe-money-gen] | otherwise = fromRatio (fromIntegral n % fromIntegral d)
982.72 s
[really-safe-money-gen]
982.72 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Rational'
982.72 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:208:9-10
982.72 s
[really-safe-money-gen] @@ -205,7 +205,7 @@
982.72 s
[really-safe-money-gen] -- Nothing
982.72 s
[really-safe-money-gen] fromRational :: Rational -> Maybe DecimalLiteral
982.72 s
[really-safe-money-gen] fromRational (n :% d)
982.73 s
[really-safe-money-gen] - | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
982.73 s
[really-safe-money-gen] + | n < 1 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
982.73 s
[really-safe-money-gen] | otherwise = fromRatio (fromIntegral n % fromIntegral d)
982.73 s
[really-safe-money-gen]
982.73 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Rational'
982.73 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:208:5-10
982.73 s
[really-safe-money-gen] @@ -205,7 +205,7 @@
982.73 s
[really-safe-money-gen] -- Nothing
982.73 s
[really-safe-money-gen] fromRational :: Rational -> Maybe DecimalLiteral
982.73 s
[really-safe-money-gen] fromRational (n :% d)
982.73 s
[really-safe-money-gen] - | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
982.73 s
[really-safe-money-gen] + | n o t ( n < 0 ) = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
982.73 s
[really-safe-money-gen] | otherwise = fromRatio (fromIntegral n % fromIntegral d)
982.73 s
[really-safe-money-gen]
982.73 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Rational'
982.73 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
982.73 s
[really-safe-money-gen] @@ -220,7 +220,7 @@
982.73 s
[really-safe-money-gen] -- (-3) % 10
982.73 s
[really-safe-money-gen] toRational :: DecimalLiteral -> Rational
982.73 s
[really-safe-money-gen] toRational (DecimalLiteral mSign m e) =
982.73 s
[really-safe-money-gen] - signSignum mSign (fromIntegral m / ( 10 ^ e))
982.73 s
[really-safe-money-gen] + signSignum mSign (fromIntegral m / ( - 10 ^ e))
982.73 s
[really-safe-money-gen]
982.73 s
[really-safe-money-gen] -- | Parse a 'DecimalLiteral' from a 'Ratio Natural'
982.73 s
[really-safe-money-gen] --
982.73 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:223:39-41
982.73 s
[really-safe-money-gen] @@ -220,7 +220,7 @@
982.73 s
[really-safe-money-gen] -- (-3) % 10
982.73 s
[really-safe-money-gen] toRational :: DecimalLiteral -> Rational
982.73 s
[really-safe-money-gen] toRational (DecimalLiteral mSign m e) =
982.73 s
[really-safe-money-gen] - signSignum mSign (fromIntegral m / ( 1 0 ^ e))
982.73 s
[really-safe-money-gen] + signSignum mSign (fromIntegral m / ( 0 ^ e))
982.73 s
[really-safe-money-gen]
982.73 s
[really-safe-money-gen] -- | Parse a 'DecimalLiteral' from a 'Ratio Natural'
982.73 s
[really-safe-money-gen] --
982.73 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
982.73 s
[really-safe-money-gen] @@ -142,7 +142,7 @@
982.73 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
982.73 s
[really-safe-money-gen] parseDigits f z = do
982.73 s
[really-safe-money-gen] c <- ReadP.satisfy Char.isDigit
982.73 s
[really-safe-money-gen] - let digit = Char.ord c - 48
982.73 s
[really-safe-money-gen] + let digit = Char.ord c - - 48
982.73 s
[really-safe-money-gen] case f z digit of
982.73 s
[really-safe-money-gen] Nothing -> fail "Failed to step the first digit"
982.73 s
[really-safe-money-gen] Just a -> ReadP.look >>= go a
982.73 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:145:15-30
982.73 s
[really-safe-money-gen] @@ -142,7 +142,7 @@
982.74 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
982.74 s
[really-safe-money-gen] parseDigits f z = do
982.74 s
[really-safe-money-gen] c <- ReadP.satisfy Char.isDigit
982.74 s
[really-safe-money-gen] - let digit = Char.ord c - 48
982.74 s
[really-safe-money-gen] + let digit = Char.ord c + 48
982.74 s
[really-safe-money-gen] case f z digit of
982.74 s
[really-safe-money-gen] Nothing -> fail "Failed to step the first digit"
982.74 s
[really-safe-money-gen] Just a -> ReadP.look >>= go a
982.74 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:145:28-30
982.74 s
[really-safe-money-gen] @@ -142,7 +142,7 @@
982.74 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
982.74 s
[really-safe-money-gen] parseDigits f z = do
982.74 s
[really-safe-money-gen] c <- ReadP.satisfy Char.isDigit
982.74 s
[really-safe-money-gen] - let digit = Char.ord c - 4 8
982.74 s
[really-safe-money-gen] + let digit = Char.ord c - 1
982.74 s
[really-safe-money-gen] case f z digit of
982.74 s
[really-safe-money-gen] Nothing -> fail "Failed to step the first digit"
982.74 s
[really-safe-money-gen] Just a -> ReadP.look >>= go a
982.74 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:152:9-23
982.74 s
[really-safe-money-gen] @@ -149,7 +149,7 @@
982.74 s
[really-safe-money-gen] where
982.74 s
[really-safe-money-gen] go !a [] = return a
982.74 s
[really-safe-money-gen] go !a (c : cs)
982.74 s
[really-safe-money-gen] - | Char.isDigit c = do
982.74 s
[really-safe-money-gen] + | n o t ( Char.isDigit c ) = do
982.74 s
[really-safe-money-gen] _ <- ReadP.get
982.74 s
[really-safe-money-gen] let digit = Char.ord c - 48
982.74 s
[really-safe-money-gen] case f a digit of
982.74 s
[really-safe-money-gen] Testing mutation BoolLit at src/Numeric/DecimalLiteral.hs:208:62-67
982.74 s
[really-safe-money-gen] @@ -205,7 +205,7 @@
986.93 s
[really-safe-money-gen] -- Nothing
986.93 s
[really-safe-money-gen] fromRational :: Rational -> Maybe DecimalLiteral
986.93 s
[really-safe-money-gen] fromRational (n :% d)
986.93 s
[really-safe-money-gen] - | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just F al s e) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
986.93 s
[really-safe-money-gen] + | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just T ru e) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
986.93 s
[really-safe-money-gen] | otherwise = fromRatio (fromIntegral n % fromIntegral d)
986.93 s
[really-safe-money-gen]
986.93 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Rational'
986.93 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:208:5-10
986.93 s
[really-safe-money-gen] @@ -205,7 +205,7 @@
986.93 s
[really-safe-money-gen] -- Nothing
986.93 s
[really-safe-money-gen] fromRational :: Rational -> Maybe DecimalLiteral
986.93 s
[really-safe-money-gen] fromRational (n :% d)
986.93 s
[really-safe-money-gen] - | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
986.93 s
[really-safe-money-gen] + | T r u e = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
986.93 s
[really-safe-money-gen] | otherwise = fromRatio (fromIntegral n % fromIntegral d)
986.93 s
[really-safe-money-gen]
986.93 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Rational'
986.93 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
986.93 s
[really-safe-money-gen] @@ -151,7 +151,7 @@
986.93 s
[really-safe-money-gen] go !a (c : cs)
986.94 s
[really-safe-money-gen] | Char.isDigit c = do
986.94 s
[really-safe-money-gen] _ <- ReadP.get
986.94 s
[really-safe-money-gen] - let digit = Char.ord c - 4 8
986.94 s
[really-safe-money-gen] + let digit = Char.ord c - 1
986.94 s
[really-safe-money-gen] case f a digit of
986.94 s
[really-safe-money-gen] Nothing -> fail "Failed to step the digit"
986.94 s
[really-safe-money-gen] Just a' -> go a' cs
986.94 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:154:23-38
986.94 s
[really-safe-money-gen] @@ -151,7 +151,7 @@
986.94 s
[really-safe-money-gen] go !a (c : cs)
986.94 s
[really-safe-money-gen] | Char.isDigit c = do
986.94 s
[really-safe-money-gen] _ <- ReadP.get
986.94 s
[really-safe-money-gen] - let digit = Char.ord c - 48
986.94 s
[really-safe-money-gen] + let digit = Char.ord c * 48
986.94 s
[really-safe-money-gen] case f a digit of
986.94 s
[really-safe-money-gen] Nothing -> fail "Failed to step the digit"
986.94 s
[really-safe-money-gen] Just a' -> go a' cs
986.94 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:152:9-23
986.94 s
[really-safe-money-gen] @@ -149,7 +149,7 @@
986.94 s
[really-safe-money-gen] where
986.94 s
[really-safe-money-gen] go !a [] = return a
986.94 s
[really-safe-money-gen] go !a (c : cs)
986.94 s
[really-safe-money-gen] - | C h a r .isD igit c = do
986.94 s
[really-safe-money-gen] + | T r u e = do
986.94 s
[really-safe-money-gen] _ <- ReadP.get
986.94 s
[really-safe-money-gen] let digit = Char.ord c - 48
986.94 s
[really-safe-money-gen] case f a digit of
986.95 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Numeric/DecimalLiteral.hs:208:57-67
986.95 s
[really-safe-money-gen] @@ -205,7 +205,7 @@
986.95 s
[really-safe-money-gen] -- Nothing
986.95 s
[really-safe-money-gen] fromRational :: Rational -> Maybe DecimalLiteral
986.95 s
[really-safe-money-gen] fromRational (n :% d)
986.95 s
[really-safe-money-gen] - | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral ( J u s t F a ls e ) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
986.95 s
[really-safe-money-gen] + | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral ( N o t h in g ) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
986.95 s
[really-safe-money-gen] | otherwise = fromRatio (fromIntegral n % fromIntegral d)
986.95 s
[really-safe-money-gen]
986.95 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Rational'
986.95 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:154:23-38
986.95 s
[really-safe-money-gen] @@ -151,7 +151,7 @@
986.95 s
[really-safe-money-gen] go !a (c : cs)
986.95 s
[really-safe-money-gen] | Char.isDigit c = do
986.95 s
[really-safe-money-gen] _ <- ReadP.get
986.95 s
[really-safe-money-gen] - let digit = Char.ord c - 48
986.95 s
[really-safe-money-gen] + let digit = Char.ord c + 48
986.95 s
[really-safe-money-gen] case f a digit of
986.95 s
[really-safe-money-gen] Nothing -> fail "Failed to step the digit"
986.95 s
[really-safe-money-gen] Just a' -> go a' cs
986.95 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
986.95 s
[really-safe-money-gen] @@ -151,7 +151,7 @@
986.95 s
[really-safe-money-gen] go !a (c : cs)
986.95 s
[really-safe-money-gen] | Char.isDigit c = do
986.95 s
[really-safe-money-gen] _ <- ReadP.get
986.95 s
[really-safe-money-gen] - let digit = Char.ord c - 4 8
986.95 s
[really-safe-money-gen] + let digit = Char.ord c - 0
986.95 s
[really-safe-money-gen] case f a digit of
986.95 s
[really-safe-money-gen] Nothing -> fail "Failed to step the digit"
986.95 s
[really-safe-money-gen] Just a' -> go a' cs
986.95 s
[really-safe-money-gen] Testing mutation Cmp at src/Numeric/DecimalLiteral.hs:208:5-10
986.95 s
[really-safe-money-gen] @@ -205,7 +205,7 @@
986.95 s
[really-safe-money-gen] -- Nothing
986.95 s
[really-safe-money-gen] fromRational :: Rational -> Maybe DecimalLiteral
986.95 s
[really-safe-money-gen] fromRational (n :% d)
986.95 s
[really-safe-money-gen] - | n < 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
986.95 s
[really-safe-money-gen] + | n < = 0 = (\(DecimalLiteral _ m e) -> DecimalLiteral (Just False) m e) <$> fromRatio (fromIntegral (abs n) % fromIntegral d)
986.95 s
[really-safe-money-gen] | otherwise = fromRatio (fromIntegral n % fromIntegral d)
986.95 s
[really-safe-money-gen]
986.95 s
[really-safe-money-gen] -- | Turn a 'DecimalLiteral' into a 'Rational'
986.95 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:154:36-38
986.95 s
[really-safe-money-gen] @@ -151,7 +151,7 @@
986.95 s
[really-safe-money-gen] go !a (c : cs)
986.95 s
[really-safe-money-gen] | Char.isDigit c = do
986.95 s
[really-safe-money-gen] _ <- ReadP.get
986.95 s
[really-safe-money-gen] - let digit = Char.ord c - 48
986.95 s
[really-safe-money-gen] + let digit = Char.ord c - - 48
986.96 s
[really-safe-money-gen] case f a digit of
986.96 s
[really-safe-money-gen] Nothing -> fail "Failed to step the digit"
986.96 s
[really-safe-money-gen] Just a' -> go a' cs
986.96 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-29
986.96 s
[really-safe-money-gen] @@ -136,7 +136,7 @@
986.96 s
[really-safe-money-gen] stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
986.96 s
[really-safe-money-gen] - step a digit = Just $ a * 10 + fromIntegral digit
986.96 s
[really-safe-money-gen] + step a digit = Just $ a + 10 + fromIntegral digit
986.96 s
[really-safe-money-gen] {-# INLINE step #-}
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
986.96 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:139:27-29
986.96 s
[really-safe-money-gen] @@ -136,7 +136,7 @@
986.96 s
[really-safe-money-gen] stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
986.96 s
[really-safe-money-gen] - step a digit = Just $ a * 1 0 + fromIntegral digit
986.96 s
[really-safe-money-gen] + step a digit = Just $ a * 0 + fromIntegral digit
986.96 s
[really-safe-money-gen] {-# INLINE step #-}
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
986.96 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:145:15-30
986.96 s
[really-safe-money-gen] @@ -142,7 +142,7 @@
986.96 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
986.96 s
[really-safe-money-gen] parseDigits f z = do
986.96 s
[really-safe-money-gen] c <- ReadP.satisfy Char.isDigit
986.96 s
[really-safe-money-gen] - let digit = Char.ord c - 48
986.96 s
[really-safe-money-gen] + let digit = Char.ord c * 48
986.96 s
[really-safe-money-gen] case f z digit of
986.96 s
[really-safe-money-gen] Nothing -> fail "Failed to step the first digit"
986.96 s
[really-safe-money-gen] Just a -> ReadP.look >>= go a
986.96 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-29
986.96 s
[really-safe-money-gen] @@ -136,7 +136,7 @@
986.96 s
[really-safe-money-gen] stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
986.96 s
[really-safe-money-gen] - step a digit = Just $ a * 10 + fromIntegral digit
986.96 s
[really-safe-money-gen] + step a digit = Just $ a - 10 + fromIntegral digit
986.96 s
[really-safe-money-gen] {-# INLINE step #-}
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
986.96 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:139:27-29
986.96 s
[really-safe-money-gen] @@ -136,7 +136,7 @@
986.96 s
[really-safe-money-gen] stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
986.96 s
[really-safe-money-gen] - step a digit = Just $ a * 1 0 + fromIntegral digit
986.96 s
[really-safe-money-gen] + step a digit = Just $ a * 1 + fromIntegral digit
986.96 s
[really-safe-money-gen] {-# INLINE step #-}
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
986.96 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-50
986.96 s
[really-safe-money-gen] @@ -136,7 +136,7 @@
986.96 s
[really-safe-money-gen] stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
986.96 s
[really-safe-money-gen]
986.96 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
986.96 s
[really-safe-money-gen] - step a digit = Just $ a * 10 + fromIntegral digit
986.96 s
[really-safe-money-gen] + step a digit = Just $ a * 10 * fromIntegral digit
986.96 s
[really-safe-money-gen] {-# INLINE step #-}
986.97 s
[really-safe-money-gen]
986.97 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
986.97 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:136:39-41
986.97 s
[really-safe-money-gen] @@ -133,7 +133,7 @@
986.97 s
[really-safe-money-gen]
986.97 s
[really-safe-money-gen] stepFraction :: (Natural, Word8) -> Int -> Maybe (Natural, Word8)
986.97 s
[really-safe-money-gen] stepFraction (_, 255) _ = Nothing
986.97 s
[really-safe-money-gen] - stepFraction (m, e) digit = Just (m * 1 0 + fromIntegral digit, succ e)
986.97 s
[really-safe-money-gen] + stepFraction (m, e) digit = Just (m * 1 + fromIntegral digit, succ e)
986.97 s
[really-safe-money-gen]
992.72 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
992.72 s
[really-safe-money-gen] step a digit = Just $ a * 10 + fromIntegral digit
992.74 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-41
992.74 s
[really-safe-money-gen] @@ -133,7 +133,7 @@
992.75 s
[really-safe-money-gen]
992.75 s
[really-safe-money-gen] stepFraction :: (Natural, Word8) -> Int -> Maybe (Natural, Word8)
992.75 s
[really-safe-money-gen] stepFraction (_, 255) _ = Nothing
992.75 s
[really-safe-money-gen] - stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
992.75 s
[really-safe-money-gen] + stepFraction (m, e) digit = Just (m + 10 + fromIntegral digit, succ e)
992.75 s
[really-safe-money-gen]
992.75 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
992.75 s
[really-safe-money-gen] step a digit = Just $ a * 10 + fromIntegral digit
992.75 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-62
992.75 s
[really-safe-money-gen] @@ -133,7 +133,7 @@
992.75 s
[really-safe-money-gen]
992.75 s
[really-safe-money-gen] stepFraction :: (Natural, Word8) -> Int -> Maybe (Natural, Word8)
992.75 s
[really-safe-money-gen] stepFraction (_, 255) _ = Nothing
992.75 s
[really-safe-money-gen] - stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
992.75 s
[really-safe-money-gen] + stepFraction (m, e) digit = Just (m * 10 - fromIntegral digit, succ e)
992.75 s
[really-safe-money-gen]
992.75 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
992.75 s
[really-safe-money-gen] step a digit = Just $ a * 10 + fromIntegral digit
992.75 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Numeric/DecimalLiteral.hs:136:29-71
992.75 s
[really-safe-money-gen] @@ -133,7 +133,7 @@
992.75 s
[really-safe-money-gen]
992.75 s
[really-safe-money-gen] stepFraction :: (Natural, Word8) -> Int -> Maybe (Natural, Word8)
992.75 s
[really-safe-money-gen] stepFraction (_, 255) _ = Nothing
992.75 s
[really-safe-money-gen] - stepFraction (m, e) digit = J u st (m * 10 + fr o m In t egral d i g i t, succ e)
992.75 s
[really-safe-money-gen] + stepFraction (m, e) digit = N o t h i n g
992.75 s
[really-safe-money-gen]
992.75 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
992.75 s
[really-safe-money-gen] step a digit = Just $ a * 10 + fromIntegral digit
992.75 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-62
992.75 s
[really-safe-money-gen] @@ -133,7 +133,7 @@
992.75 s
[really-safe-money-gen]
992.75 s
[really-safe-money-gen] stepFraction :: (Natural, Word8) -> Int -> Maybe (Natural, Word8)
992.76 s
[really-safe-money-gen] stepFraction (_, 255) _ = Nothing
992.76 s
[really-safe-money-gen] - stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
992.76 s
[really-safe-money-gen] + stepFraction (m, e) digit = Just (m * 10 * fromIntegral digit, succ e)
992.76 s
[really-safe-money-gen]
992.76 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
992.76 s
[really-safe-money-gen] step a digit = Just $ a * 10 + fromIntegral digit
992.76 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-30
992.76 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.76 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.76 s
[really-safe-money-gen] decimalLiteralP = do
992.76 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.76 s
[really-safe-money-gen] - isSignChar c = c = = ' -' || c == '+'
992.76 s
[really-safe-money-gen] + isSignChar c = F a ls e || c == '+'
992.76 s
[really-safe-money-gen]
992.76 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.76 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.76 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:34-42
992.76 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.76 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.76 s
[really-safe-money-gen] decimalLiteralP = do
992.76 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.76 s
[really-safe-money-gen] - isSignChar c = c == '-' || c == '+'
992.76 s
[really-safe-money-gen] + isSignChar c = c == '-' || F a ls e
992.76 s
[really-safe-money-gen]
992.76 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.76 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.76 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-30
992.76 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.76 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.76 s
[really-safe-money-gen] decimalLiteralP = do
992.76 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.76 s
[really-safe-money-gen] - isSignChar c = c = = ' - ' || c == '+'
992.76 s
[really-safe-money-gen] + isSignChar c = T ru e || c == '+'
992.76 s
[really-safe-money-gen]
992.76 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.76 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.76 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-42
992.76 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.76 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.76 s
[really-safe-money-gen] decimalLiteralP = do
992.76 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.76 s
[really-safe-money-gen] - isSignChar c = c == '- ' | | c = = ' + '
992.76 s
[really-safe-money-gen] + isSignChar c = T rue
992.76 s
[really-safe-money-gen]
992.77 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.77 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.77 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:119:34-42
992.77 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.77 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.77 s
[really-safe-money-gen] decimalLiteralP = do
992.77 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.77 s
[really-safe-money-gen] - isSignChar c = c == '-' || c == '+'
992.77 s
[really-safe-money-gen] + isSignChar c = c == '-' || n o t ( c == '+' )
992.77 s
[really-safe-money-gen]
992.77 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.77 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.77 s
[really-safe-money-gen] Testing mutation LogicOp at src/Numeric/DecimalLiteral.hs:119:22-42
992.77 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.77 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.77 s
[really-safe-money-gen] decimalLiteralP = do
992.77 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.77 s
[really-safe-money-gen] - isSignChar c = c == '-' | | c == '+'
992.77 s
[really-safe-money-gen] + isSignChar c = c == '-' & & c == '+'
992.77 s
[really-safe-money-gen]
992.77 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.77 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.77 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:119:22-42
992.77 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.77 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.77 s
[really-safe-money-gen] decimalLiteralP = do
992.77 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.77 s
[really-safe-money-gen] - isSignChar c = c == '-' || c == '+'
992.77 s
[really-safe-money-gen] + isSignChar c = n o t ( c == '-' || c == '+' )
992.77 s
[really-safe-money-gen]
992.77 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.77 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.77 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:123:19-34
992.77 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
992.77 s
[really-safe-money-gen]
992.77 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.77 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.77 s
[really-safe-money-gen] - pure $ Just $ s i gn Ch a r == '+ '
992.77 s
[really-safe-money-gen] + pure $ Just $ T r u e
992.77 s
[really-safe-money-gen]
992.77 s
[really-safe-money-gen] units <- parseDigits step 0
992.77 s
[really-safe-money-gen]
992.77 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:123:19-34
992.78 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
992.78 s
[really-safe-money-gen]
992.78 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.78 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.78 s
[really-safe-money-gen] - pure $ Just $ s i gn Ch a r == '+'
992.78 s
[really-safe-money-gen] + pure $ Just $ F a lse
992.78 s
[really-safe-money-gen]
992.78 s
[really-safe-money-gen] units <- parseDigits step 0
992.78 s
[really-safe-money-gen]
992.78 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:139:23-50
992.78 s
[really-safe-money-gen] @@ -136,7 +136,7 @@
992.78 s
[really-safe-money-gen] stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
992.78 s
[really-safe-money-gen]
992.78 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
992.78 s
[really-safe-money-gen] - step a digit = Just $ a * 10 + fromIntegral digit
992.78 s
[really-safe-money-gen] + step a digit = Just $ a * 10 - fromIntegral digit
992.78 s
[really-safe-money-gen] {-# INLINE step #-}
992.78 s
[really-safe-money-gen]
992.78 s
[really-safe-money-gen] parseDigits :: (a -> Int -> Maybe a) -> a -> ReadP a
992.78 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:34-42
992.78 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.78 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.78 s
[really-safe-money-gen] decimalLiteralP = do
992.78 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.78 s
[really-safe-money-gen] - isSignChar c = c == '-' || c == ' + '
992.78 s
[really-safe-money-gen] + isSignChar c = c == '-' || T rue
992.78 s
[really-safe-money-gen]
992.78 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
992.78 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
992.78 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:136:39-41
992.78 s
[really-safe-money-gen] @@ -133,7 +133,7 @@
992.78 s
[really-safe-money-gen]
992.78 s
[really-safe-money-gen] stepFraction :: (Natural, Word8) -> Int -> Maybe (Natural, Word8)
992.78 s
[really-safe-money-gen] stepFraction (_, 255) _ = Nothing
992.78 s
[really-safe-money-gen] - stepFraction (m, e) digit = Just (m * 1 0 + fromIntegral digit, succ e)
992.78 s
[really-safe-money-gen] + stepFraction (m, e) digit = Just (m * 0 + fromIntegral digit, succ e)
992.78 s
[really-safe-money-gen]
992.78 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
992.78 s
[really-safe-money-gen] step a digit = Just $ a * 10 + fromIntegral digit
992.78 s
[really-safe-money-gen] Testing mutation ConstBool at src/Numeric/DecimalLiteral.hs:119:22-42
992.78 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
992.78 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
992.78 s
[really-safe-money-gen] decimalLiteralP = do
992.78 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
992.78 s
[really-safe-money-gen] - isSignChar c = c == '-' || c == '+'
992.78 s
[really-safe-money-gen] + isSignChar c = F a ls e
992.78 s
[really-safe-money-gen]
997.57 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
997.57 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
997.57 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:119:22-30
997.57 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
997.57 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
997.57 s
[really-safe-money-gen] decimalLiteralP = do
997.57 s
[really-safe-money-gen] let isSignChar :: Char -> Bool
997.57 s
[really-safe-money-gen] - isSignChar c = c == '-' || c == '+'
997.57 s
[really-safe-money-gen] + isSignChar c = n o t ( c == '-' ) || c == '+'
997.57 s
[really-safe-money-gen]
997.57 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
997.57 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
997.57 s
[really-safe-money-gen] Testing mutation Arith at src/Numeric/DecimalLiteral.hs:136:35-41
997.57 s
[really-safe-money-gen] @@ -133,7 +133,7 @@
997.57 s
[really-safe-money-gen]
997.57 s
[really-safe-money-gen] stepFraction :: (Natural, Word8) -> Int -> Maybe (Natural, Word8)
997.57 s
[really-safe-money-gen] stepFraction (_, 255) _ = Nothing
997.57 s
[really-safe-money-gen] - stepFraction (m, e) digit = Just (m * 10 + fromIntegral digit, succ e)
997.58 s
[really-safe-money-gen] + stepFraction (m, e) digit = Just (m - 10 + fromIntegral digit, succ e)
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] step :: Natural -> Int -> Maybe Natural
997.58 s
[really-safe-money-gen] step a digit = Just $ a * 10 + fromIntegral digit
997.58 s
[really-safe-money-gen] Testing mutation Negate at src/Numeric/DecimalLiteral.hs:123:19-34
997.58 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] mSign <- ReadP.option Nothing $ do
997.58 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
997.58 s
[really-safe-money-gen] - pure $ Just $ signChar == '+'
997.58 s
[really-safe-money-gen] + pure $ Just $ n o t ( signChar == '+' )
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] units <- parseDigits step 0
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:127:44-45
997.58 s
[really-safe-money-gen] @@ -124,7 +124,7 @@
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] units <- parseDigits step 0
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] - ReadP.option (DecimalLiteral mSign units 0 ) $ do
997.58 s
[really-safe-money-gen] + ReadP.option (DecimalLiteral mSign units 1 ) $ do
997.58 s
[really-safe-money-gen] _ <- ReadP.satisfy (== '.')
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] (m, e) <- parseDigits stepFraction (units, 0)
997.58 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Numeric/DecimalLiteral.hs:112:17-21
997.58 s
[really-safe-money-gen] @@ -109,9 +109,8 @@
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] -- | Like 'fromString' but in a 'MonadFail'
997.58 s
[really-safe-money-gen] fromStringM :: (MonadFail m) => String -> m DecimalLiteral
997.58 s
[really-safe-money-gen] fromStringM s = case Numeric.DecimalLiteral.fromString s of
997.58 s
[really-safe-money-gen] - Nothing -> fail $ "Failed to parse decimal literal from: " <> show s
997.58 s
[really-safe-money-gen] Just dl -> pure dl
997.58 s
[really-safe-money-gen]
997.58 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
997.58 s
[really-safe-money-gen] decimalLiteralP = do
997.59 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Numeric/DecimalLiteral.hs:112:17-21
997.59 s
[really-safe-money-gen] @@ -109,9 +109,8 @@
997.59 s
[really-safe-money-gen]
997.59 s
[really-safe-money-gen] -- | Like 'fromString' but in a 'MonadFail'
997.59 s
[really-safe-money-gen] fromStringM :: (MonadFail m) => String -> m DecimalLiteral
997.59 s
[really-safe-money-gen] fromStringM s = case Numeric.DecimalLiteral.fromString s of
997.59 s
[really-safe-money-gen] Nothing -> fail $ "Failed to parse decimal literal from: " <> show s
997.59 s
[really-safe-money-gen] - Just dl -> pure dl
997.59 s
[really-safe-money-gen]
997.59 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
997.59 s
[really-safe-money-gen] decimalLiteralP = do
997.59 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Numeric/DecimalLiteral.hs:86:18-18
997.59 s
[really-safe-money-gen] @@ -83,9 +83,8 @@
997.59 s
[really-safe-money-gen] instance NFData DecimalLiteral
997.59 s
[really-safe-money-gen]
997.59 s
[really-safe-money-gen] instance IsString DecimalLiteral where
997.59 s
[really-safe-money-gen] fromString s = case Numeric.DecimalLiteral.fromString s of
997.59 s
[really-safe-money-gen] - Nothing -> error $ "Invalid DecimalLiteral: " <> show s
997.59 s
[really-safe-money-gen] Just dl -> dl
997.59 s
[really-safe-money-gen]
997.59 s
[really-safe-money-gen] -- | Parse a decimal literal from a string
997.59 s
[really-safe-money-gen] --
997.59 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Numeric/DecimalLiteral.hs:86:18-18
997.59 s
[really-safe-money-gen] @@ -83,9 +83,8 @@
997.59 s
[really-safe-money-gen] instance NFData DecimalLiteral
997.59 s
[really-safe-money-gen]
997.59 s
[really-safe-money-gen] instance IsString DecimalLiteral where
997.59 s
[really-safe-money-gen] fromString s = case Numeric.DecimalLiteral.fromString s of
997.59 s
[really-safe-money-gen] Nothing -> error $ "Invalid DecimalLiteral: " <> show s
997.59 s
[really-safe-money-gen] - Just dl -> dl
997.59 s
[really-safe-money-gen]
997.59 s
[really-safe-money-gen] -- | Parse a decimal literal from a string
997.59 s
[really-safe-money-gen] --
997.59 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
997.59 s
[really-safe-money-gen] @@ -177,11 +177,10 @@
997.59 s
[really-safe-money-gen]
997.59 s
[really-safe-money-gen] -- | See 'Account.distribute'
997.59 s
[really-safe-money-gen] distribute :: AccountOf currency -> Word16 -> AccountDistributionOf currency
997.59 s
[really-safe-money-gen] distribute (AccountOf a) w = case Account.distribute a w of
997.60 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
997.60 s
[really-safe-money-gen] - DistributedZero -> DistributedZero
997.60 s
[really-safe-money-gen] DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAccount a')
997.60 s
[really-safe-money-gen] DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAccount a1) w2 (fromAccount a2)
997.60 s
[really-safe-money-gen]
997.60 s
[really-safe-money-gen] -- | The result of 'distribute'
997.60 s
[really-safe-money-gen] type AccountDistributionOf (currency :: k) = Distribution (AccountOf currency)
997.60 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
997.60 s
[really-safe-money-gen] @@ -177,11 +177,10 @@
997.60 s
[really-safe-money-gen]
997.60 s
[really-safe-money-gen] -- | See 'Account.distribute'
997.60 s
[really-safe-money-gen] distribute :: AccountOf currency -> Word16 -> AccountDistributionOf currency
997.60 s
[really-safe-money-gen] distribute (AccountOf a) w = case Account.distribute a w of
997.60 s
[really-safe-money-gen] - DistributedIntoZeroChunks -> DistributedIntoZeroChunks
997.60 s
[really-safe-money-gen] DistributedZero -> DistributedZero
997.60 s
[really-safe-money-gen] DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAccount a')
997.60 s
[really-safe-money-gen] DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAccount a1) w2 (fromAccount a2)
997.60 s
[really-safe-money-gen]
997.60 s
[really-safe-money-gen] -- | The result of 'distribute'
997.60 s
[really-safe-money-gen] type AccountDistributionOf (currency :: k) = Distribution (AccountOf currency)
997.60 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
997.60 s
[really-safe-money-gen] @@ -177,11 +177,10 @@
997.60 s
[really-safe-money-gen]
997.60 s
[really-safe-money-gen] -- | See 'Account.distribute'
997.60 s
[really-safe-money-gen] distribute :: AccountOf currency -> Word16 -> AccountDistributionOf currency
997.60 s
[really-safe-money-gen] distribute (AccountOf a) w = case Account.distribute a w of
997.60 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
997.60 s
[really-safe-money-gen] DistributedZero -> DistributedZero
997.60 s
[really-safe-money-gen] - DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAccount a')
997.60 s
[really-safe-money-gen] DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAccount a1) w2 (fromAccount a2)
997.60 s
[really-safe-money-gen]
997.60 s
[really-safe-money-gen] -- | The result of 'distribute'
997.60 s
[really-safe-money-gen] type AccountDistributionOf (currency :: k) = Distribution (AccountOf currency)
997.60 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/AccountOf.hs:180:30-115
997.60 s
[really-safe-money-gen] @@ -177,11 +177,10 @@
997.60 s
[really-safe-money-gen]
997.60 s
[really-safe-money-gen] -- | See 'Account.distribute'
997.60 s
[really-safe-money-gen] distribute :: AccountOf currency -> Word16 -> AccountDistributionOf currency
997.61 s
[really-safe-money-gen] distribute (AccountOf a) w = case Account.distribute a w of
997.61 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
997.61 s
[really-safe-money-gen] DistributedZero -> DistributedZero
997.61 s
[really-safe-money-gen] DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAccount a')
997.61 s
[really-safe-money-gen] - DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAccount a1) w2 (fromAccount a2)
997.61 s
[really-safe-money-gen]
997.61 s
[really-safe-money-gen] -- | The result of 'distribute'
997.61 s
[really-safe-money-gen] type AccountDistributionOf (currency :: k) = Distribution (AccountOf currency)
997.61 s
[really-safe-money-gen] Testing mutation Arith at src/Money/ConversionRate.hs:132:3-24
997.61 s
[really-safe-money-gen] @@ -129,4 +129,4 @@
997.61 s
[really-safe-money-gen] -- | The factor to multiply by when converting currencies.
997.61 s
[really-safe-money-gen] conversionFactor :: QuantisationFactor -> ConversionRate -> QuantisationFactor -> Ratio Natural
997.61 s
[really-safe-money-gen] conversionFactor (QuantisationFactor qf1) (ConversionRate cr) (QuantisationFactor qf2) =
997.61 s
[really-safe-money-gen] - cr * fromIntegral qf2 / fromIntegral qf1
997.61 s
[really-safe-money-gen] + cr - fromIntegral qf2 / fromIntegral qf1
997.61 s
[really-safe-money-gen] Testing mutation Arith at src/Money/ConversionRate.hs:132:3-24
997.61 s
[really-safe-money-gen] @@ -129,4 +129,4 @@
997.61 s
[really-safe-money-gen] -- | The factor to multiply by when converting currencies.
997.61 s
[really-safe-money-gen] conversionFactor :: QuantisationFactor -> ConversionRate -> QuantisationFactor -> Ratio Natural
997.61 s
[really-safe-money-gen] conversionFactor (QuantisationFactor qf1) (ConversionRate cr) (QuantisationFactor qf2) =
997.61 s
[really-safe-money-gen] - cr * fromIntegral qf2 / fromIntegral qf1
997.61 s
[really-safe-money-gen] + cr + fromIntegral qf2 / fromIntegral qf1
997.61 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:130:48-49
997.61 s
[really-safe-money-gen] @@ -127,7 +127,7 @@
997.61 s
[really-safe-money-gen] ReadP.option (DecimalLiteral mSign units 0) $ do
997.61 s
[really-safe-money-gen] _ <- ReadP.satisfy (== '.')
997.61 s
[really-safe-money-gen]
997.61 s
[really-safe-money-gen] - (m, e) <- parseDigits stepFraction (units, 0 )
997.61 s
[really-safe-money-gen] + (m, e) <- parseDigits stepFraction (units, 1 )
997.61 s
[really-safe-money-gen]
997.61 s
[really-safe-money-gen] pure $ DecimalLiteral mSign m e
997.61 s
[really-safe-money-gen]
997.61 s
[really-safe-money-gen] Testing mutation Arith at src/Money/ConversionRate.hs:127:70-79
997.61 s
[really-safe-money-gen] @@ -124,7 +124,7 @@
997.61 s
[really-safe-money-gen] -- >>> compose (ConversionRate (2 % 1)) (ConversionRate (1 % 2))
997.61 s
[really-safe-money-gen] -- ConversionRate {unConversionRate = 1 % 1}
997.61 s
[really-safe-money-gen] compose :: ConversionRate -> ConversionRate -> ConversionRate
997.61 s
[really-safe-money-gen] - compose (ConversionRate cr1) (ConversionRate cr2) = ConversionRate $ cr1 * cr2
997.61 s
[really-safe-money-gen] + compose (ConversionRate cr1) (ConversionRate cr2) = ConversionRate $ cr1 - cr2
997.61 s
[really-safe-money-gen]
997.61 s
[really-safe-money-gen] -- | The factor to multiply by when converting currencies.
1002.86 s
[really-safe-money-gen] conversionFactor :: QuantisationFactor -> ConversionRate -> QuantisationFactor -> Ratio Natural
1002.88 s
[really-safe-money-gen] Testing mutation Arith at src/Money/ConversionRate.hs:127:70-79
1002.88 s
[really-safe-money-gen] @@ -124,7 +124,7 @@
1002.89 s
[really-safe-money-gen] -- >>> compose (ConversionRate (2 % 1)) (ConversionRate (1 % 2))
1002.89 s
[really-safe-money-gen] -- ConversionRate {unConversionRate = 1 % 1}
1002.89 s
[really-safe-money-gen] compose :: ConversionRate -> ConversionRate -> ConversionRate
1002.89 s
[really-safe-money-gen] - compose (ConversionRate cr1) (ConversionRate cr2) = ConversionRate $ cr1 * cr2
1002.89 s
[really-safe-money-gen] + compose (ConversionRate cr1) (ConversionRate cr2) = ConversionRate $ cr1 + cr2
1002.89 s
[really-safe-money-gen]
1002.89 s
[really-safe-money-gen] -- | The factor to multiply by when converting currencies.
1002.89 s
[really-safe-money-gen] conversionFactor :: QuantisationFactor -> ConversionRate -> QuantisationFactor -> Ratio Natural
1002.89 s
[really-safe-money-gen] Testing mutation IntLit at src/Numeric/DecimalLiteral.hs:125:29-30
1002.89 s
[really-safe-money-gen] @@ -122,7 +122,7 @@
1002.89 s
[really-safe-money-gen] signChar <- ReadP.satisfy isSignChar
1002.89 s
[really-safe-money-gen] pure $ Just $ signChar == '+'
1002.89 s
[really-safe-money-gen]
1002.89 s
[really-safe-money-gen] - units <- parseDigits step 0
1002.89 s
[really-safe-money-gen] + units <- parseDigits step 1
1002.89 s
[really-safe-money-gen]
1002.89 s
[really-safe-money-gen] ReadP.option (DecimalLiteral mSign units 0) $ do
1002.89 s
[really-safe-money-gen] _ <- ReadP.satisfy (== '.')
1002.89 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/ConversionRate.hs:72:25-26
1002.89 s
[really-safe-money-gen] @@ -69,7 +69,7 @@
1002.89 s
[really-safe-money-gen] -- >>> fromRational (0 % 1)
1002.89 s
[really-safe-money-gen] -- Nothing
1002.90 s
[really-safe-money-gen] fromRational :: Rational -> Maybe ConversionRate
1002.90 s
[really-safe-money-gen] - fromRational r = if r < 0 then Nothing else fromRatio (realToFrac r)
1002.90 s
[really-safe-money-gen] + fromRational r = if r < 1 then Nothing else fromRatio (realToFrac r)
1002.90 s
[really-safe-money-gen]
1002.90 s
[really-safe-money-gen] -- | Turn a 'ConversionRate' back into a 'Rational'
1002.90 s
[really-safe-money-gen] --
1002.90 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/ConversionRate.hs:72:21-26
1002.90 s
[really-safe-money-gen] @@ -69,7 +69,7 @@
1002.90 s
[really-safe-money-gen] -- >>> fromRational (0 % 1)
1002.90 s
[really-safe-money-gen] -- Nothing
1002.90 s
[really-safe-money-gen] fromRational :: Rational -> Maybe ConversionRate
1002.90 s
[really-safe-money-gen] - fromRational r = if r < 0 then Nothing else fromRatio (realToFrac r)
1002.90 s
[really-safe-money-gen] + fromRational r = if r < = 0 then Nothing else fromRatio (realToFrac r)
1002.90 s
[really-safe-money-gen]
1002.90 s
[really-safe-money-gen] -- | Turn a 'ConversionRate' back into a 'Rational'
1002.90 s
[really-safe-money-gen] --
1002.90 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/ConversionRate.hs:109:27-28
1002.90 s
[really-safe-money-gen] @@ -106,7 +106,7 @@
1002.90 s
[really-safe-money-gen]
1002.90 s
[really-safe-money-gen] -- | One-to-one conversion rate
1002.90 s
[really-safe-money-gen] oneToOne :: ConversionRate
1002.90 s
[really-safe-money-gen] - oneToOne = ConversionRate 1
1002.90 s
[really-safe-money-gen] + oneToOne = ConversionRate 0
1002.90 s
[really-safe-money-gen]
1002.90 s
[really-safe-money-gen] -- | Invert a 'ConversionRate', to convert in the other direction.
1002.90 s
[really-safe-money-gen] --
1002.90 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/ConversionRate.hs:72:21-26
1002.90 s
[really-safe-money-gen] @@ -69,7 +69,7 @@
1002.90 s
[really-safe-money-gen] -- >>> fromRational (0 % 1)
1002.91 s
[really-safe-money-gen] -- Nothing
1002.91 s
[really-safe-money-gen] fromRational :: Rational -> Maybe ConversionRate
1002.91 s
[really-safe-money-gen] - fromRational r = if r < 0 then Nothing else fromRatio (realToFrac r)
1002.91 s
[really-safe-money-gen] + fromRational r = if r > 0 then Nothing else fromRatio (realToFrac r)
1002.91 s
[really-safe-money-gen]
1002.91 s
[really-safe-money-gen] -- | Turn a 'ConversionRate' back into a 'Rational'
1002.91 s
[really-safe-money-gen] --
1002.91 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/ConversionRate.hs:72:21-26
1002.91 s
[really-safe-money-gen] @@ -69,7 +69,7 @@
1002.91 s
[really-safe-money-gen] -- >>> fromRational (0 % 1)
1002.91 s
[really-safe-money-gen] -- Nothing
1002.91 s
[really-safe-money-gen] fromRational :: Rational -> Maybe ConversionRate
1002.91 s
[really-safe-money-gen] - fromRational r = if r < 0 then Nothing else fromRatio (realToFrac r)
1002.91 s
[really-safe-money-gen] + fromRational r = if T r u e then Nothing else fromRatio (realToFrac r)
1002.91 s
[really-safe-money-gen]
1002.91 s
[really-safe-money-gen] -- | Turn a 'ConversionRate' back into a 'Rational'
1002.91 s
[really-safe-money-gen] --
1002.91 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:87:12-28
1002.91 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
1002.91 s
[really-safe-money-gen] fromDecimalLiteral dl = do
1002.91 s
[really-safe-money-gen] irat <-
1002.91 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
1002.91 s
[really-safe-money-gen] - in if n u m e rato r r == 0
1002.91 s
[really-safe-money-gen] + in if T r u e
1002.91 s
[really-safe-money-gen] then Nothing
1002.91 s
[really-safe-money-gen] else pure r
1002.91 s
[really-safe-money-gen]
1002.91 s
[really-safe-money-gen] Testing mutation Negate at src/Money/ConversionRate.hs:38:41-57
1002.91 s
[really-safe-money-gen] @@ -35,7 +35,7 @@
1002.91 s
[really-safe-money-gen] validate cr@(ConversionRate r) =
1002.91 s
[really-safe-money-gen] mconcat
1002.91 s
[really-safe-money-gen] [ genericValidate cr,
1002.91 s
[really-safe-money-gen] - declare "The rate is nonzero" $ numerator r /= 0
1002.91 s
[really-safe-money-gen] + declare "The rate is nonzero" $ n o t ( numerator r /= 0 )
1002.91 s
[really-safe-money-gen] ]
1002.91 s
[really-safe-money-gen]
1002.91 s
[really-safe-money-gen] instance NFData ConversionRate
1002.91 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/ConversionRate.hs:38:41-57
1002.91 s
[really-safe-money-gen] @@ -35,7 +35,7 @@
1002.91 s
[really-safe-money-gen] validate cr@(ConversionRate r) =
1002.92 s
[really-safe-money-gen] mconcat
1002.92 s
[really-safe-money-gen] [ genericValidate cr,
1002.92 s
[really-safe-money-gen] - declare "The rate is nonzero" $ n u m e rato r r /= 0
1002.92 s
[really-safe-money-gen] + declare "The rate is nonzero" $ T r u e
1002.92 s
[really-safe-money-gen] ]
1002.92 s
[really-safe-money-gen]
1002.92 s
[really-safe-money-gen] instance NFData ConversionRate
1002.92 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/ConversionRate.hs:116:45-46
1002.92 s
[really-safe-money-gen] @@ -113,7 +113,7 @@
1002.92 s
[really-safe-money-gen] -- >>> invert (ConversionRate (1 % 2))
1002.92 s
[really-safe-money-gen] -- ConversionRate {unConversionRate = 2 % 1}
1002.92 s
[really-safe-money-gen] invert :: ConversionRate -> ConversionRate
1002.92 s
[really-safe-money-gen] - invert (ConversionRate r) = ConversionRate ( 1 / r)
1002.92 s
[really-safe-money-gen] + invert (ConversionRate r) = ConversionRate ( 0 / r)
1002.92 s
[really-safe-money-gen]
1002.92 s
[really-safe-money-gen] -- | Compose two conversion rates
1002.92 s
[really-safe-money-gen] --
1002.92 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/ConversionRate.hs:109:27-28
1002.92 s
[really-safe-money-gen] @@ -106,7 +106,7 @@
1002.92 s
[really-safe-money-gen]
1002.92 s
[really-safe-money-gen] -- | One-to-one conversion rate
1002.92 s
[really-safe-money-gen] oneToOne :: ConversionRate
1002.92 s
[really-safe-money-gen] - oneToOne = ConversionRate 1
1002.92 s
[really-safe-money-gen] + oneToOne = ConversionRate - 1
1002.92 s
[really-safe-money-gen]
1002.92 s
[really-safe-money-gen] -- | Invert a 'ConversionRate', to convert in the other direction.
1002.92 s
[really-safe-money-gen] --
1002.92 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/ConversionRate.hs:116:45-46
1002.92 s
[really-safe-money-gen] @@ -113,7 +113,7 @@
1002.92 s
[really-safe-money-gen] -- >>> invert (ConversionRate (1 % 2))
1002.92 s
[really-safe-money-gen] -- ConversionRate {unConversionRate = 2 % 1}
1002.92 s
[really-safe-money-gen] invert :: ConversionRate -> ConversionRate
1002.92 s
[really-safe-money-gen] - invert (ConversionRate r) = ConversionRate ( 1 / r)
1002.92 s
[really-safe-money-gen] + invert (ConversionRate r) = ConversionRate ( - 1 / r)
1002.92 s
[really-safe-money-gen]
1002.92 s
[really-safe-money-gen] -- | Compose two conversion rates
1002.92 s
[really-safe-money-gen] --
1002.92 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/ConversionRate.hs:37:7-8
1002.92 s
[really-safe-money-gen] @@ -34,9 +34,7 @@
1002.92 s
[really-safe-money-gen] instance Validity ConversionRate where
1002.92 s
[really-safe-money-gen] validate cr@(ConversionRate r) =
1002.92 s
[really-safe-money-gen] mconcat
1002.92 s
[really-safe-money-gen] - [ genericValidate cr,
1002.92 s
[really-safe-money-gen] - declare "The rate is nonzero" $ numerator r /= 0
1002.93 s
[really-safe-money-gen] ]
1002.93 s
[really-safe-money-gen]
1002.93 s
[really-safe-money-gen] instance NFData ConversionRate
1002.93 s
[really-safe-money-gen]
1002.93 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/ConversionRate.hs:37:7-8
1002.93 s
[really-safe-money-gen] @@ -34,9 +34,8 @@
1002.93 s
[really-safe-money-gen] instance Validity ConversionRate where
1002.93 s
[really-safe-money-gen] validate cr@(ConversionRate r) =
1002.93 s
[really-safe-money-gen] mconcat
1002.93 s
[really-safe-money-gen] - [ genericValidate cr,
1002.93 s
[really-safe-money-gen] declare "The rate is nonzero" $ numerator r /= 0
1002.93 s
[really-safe-money-gen] ]
1002.93 s
[really-safe-money-gen]
1002.93 s
[really-safe-money-gen] instance NFData ConversionRate
1002.93 s
[really-safe-money-gen]
1002.93 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/ConversionRate.hs:38:41-57
1002.93 s
[really-safe-money-gen] @@ -35,7 +35,7 @@
1002.93 s
[really-safe-money-gen] validate cr@(ConversionRate r) =
1002.93 s
[really-safe-money-gen] mconcat
1002.93 s
[really-safe-money-gen] [ genericValidate cr,
1002.93 s
[really-safe-money-gen] - declare "The rate is nonzero" $ n u m er a t or r /= 0
1002.93 s
[really-safe-money-gen] + declare "The rate is nonzero" $ F a l s e
1002.93 s
[really-safe-money-gen] ]
1002.93 s
[really-safe-money-gen]
1002.93 s
[really-safe-money-gen] instance NFData ConversionRate
1002.93 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:87:27-28
1002.93 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
1002.93 s
[really-safe-money-gen] fromDecimalLiteral dl = do
1002.93 s
[really-safe-money-gen] irat <-
1002.93 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
1002.93 s
[really-safe-money-gen] - in if numerator r == 0
1002.93 s
[really-safe-money-gen] + in if numerator r == 1
1002.93 s
[really-safe-money-gen] then Nothing
1002.93 s
[really-safe-money-gen] else pure r
1002.93 s
[really-safe-money-gen]
1002.93 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/ConversionRate.hs:72:21-26
1002.93 s
[really-safe-money-gen] @@ -69,7 +69,7 @@
1002.93 s
[really-safe-money-gen] -- >>> fromRational (0 % 1)
1002.93 s
[really-safe-money-gen] -- Nothing
1002.93 s
[really-safe-money-gen] fromRational :: Rational -> Maybe ConversionRate
1002.93 s
[really-safe-money-gen] - fromRational r = if r < 0 then Nothing else fromRatio (realToFrac r)
1002.93 s
[really-safe-money-gen] + fromRational r = if Fal s e then Nothing else fromRatio (realToFrac r)
1002.93 s
[really-safe-money-gen]
1002.93 s
[really-safe-money-gen] -- | Turn a 'ConversionRate' back into a 'Rational'
1002.93 s
[really-safe-money-gen] --
1002.94 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/ConversionRate.hs:72:21-26
1002.94 s
[really-safe-money-gen] @@ -69,7 +69,7 @@
1002.94 s
[really-safe-money-gen] -- >>> fromRational (0 % 1)
1002.94 s
[really-safe-money-gen] -- Nothing
1002.94 s
[really-safe-money-gen] fromRational :: Rational -> Maybe ConversionRate
1002.94 s
[really-safe-money-gen] - fromRational r = if r < 0 then Nothing else fromRatio (realToFrac r)
1002.94 s
[really-safe-money-gen] + fromRational r = if r > = 0 then Nothing else fromRatio (realToFrac r)
1002.94 s
[really-safe-money-gen]
1002.94 s
[really-safe-money-gen] -- | Turn a 'ConversionRate' back into a 'Rational'
1002.94 s
[really-safe-money-gen] --
1002.94 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:87:12-28
1002.94 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
1002.94 s
[really-safe-money-gen] fromDecimalLiteral dl = do
1010.42 s
[really-safe-money-gen] irat <-
1010.42 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
1010.44 s
[really-safe-money-gen] - in if n u m er a t or r == 0
1010.44 s
[really-safe-money-gen] + in if F a l s e
1010.44 s
[really-safe-money-gen] then Nothing
1010.44 s
[really-safe-money-gen] else pure r
1010.44 s
[really-safe-money-gen]
1010.44 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/ConversionRate.hs:38:56-57
1010.44 s
[really-safe-money-gen] @@ -35,7 +35,7 @@
1010.44 s
[really-safe-money-gen] validate cr@(ConversionRate r) =
1010.44 s
[really-safe-money-gen] mconcat
1010.44 s
[really-safe-money-gen] [ genericValidate cr,
1010.44 s
[really-safe-money-gen] - declare "The rate is nonzero" $ numerator r /= 0
1010.44 s
[really-safe-money-gen] + declare "The rate is nonzero" $ numerator r /= 1
1010.44 s
[really-safe-money-gen] ]
1010.44 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] instance NFData ConversionRate
1010.45 s
[really-safe-money-gen] Testing mutation Negate at src/Money/ConversionRate.hs:72:21-26
1010.45 s
[really-safe-money-gen] @@ -69,7 +69,7 @@
1010.45 s
[really-safe-money-gen] -- >>> fromRational (0 % 1)
1010.45 s
[really-safe-money-gen] -- Nothing
1010.45 s
[really-safe-money-gen] fromRational :: Rational -> Maybe ConversionRate
1010.45 s
[really-safe-money-gen] - fromRational r = if r < 0 then Nothing else fromRatio (realToFrac r)
1010.45 s
[really-safe-money-gen] + fromRational r = if n o t ( r < 0 ) then Nothing else fromRatio (realToFrac r)
1010.45 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] -- | Turn a 'ConversionRate' back into a 'Rational'
1010.45 s
[really-safe-money-gen] --
1010.45 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:87:12-28
1010.45 s
[really-safe-money-gen] @@ -84,7 +84,7 @@
1010.45 s
[really-safe-money-gen] fromDecimalLiteral dl = do
1010.45 s
[really-safe-money-gen] irat <-
1010.45 s
[really-safe-money-gen] let r = DecimalLiteral.toRational dl
1010.45 s
[really-safe-money-gen] - in if numerator r == 0
1010.45 s
[really-safe-money-gen] + in if n o t ( numerator r == 0 )
1010.45 s
[really-safe-money-gen] then Nothing
1010.45 s
[really-safe-money-gen] else pure r
1010.45 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
1010.45 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
1010.45 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] rat <-
1010.45 s
[really-safe-money-gen] let r = 1 / irat
1010.45 s
[really-safe-money-gen] - in if r < 0
1010.45 s
[really-safe-money-gen] + in if r < = 0
1010.45 s
[really-safe-money-gen] then Nothing
1010.45 s
[really-safe-money-gen] else Just r
1010.45 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:93:16-17
1010.45 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
1010.45 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] rat <-
1010.45 s
[really-safe-money-gen] let r = 1 / irat
1010.45 s
[really-safe-money-gen] - in if r < 0
1010.45 s
[really-safe-money-gen] + in if r < 1
1010.45 s
[really-safe-money-gen] then Nothing
1010.45 s
[really-safe-money-gen] else Just r
1010.45 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
1010.45 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
1010.45 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] rat <-
1010.45 s
[really-safe-money-gen] let r = 1 / irat
1010.45 s
[really-safe-money-gen] - in if r < 0
1010.45 s
[really-safe-money-gen] + in if r > = 0
1010.45 s
[really-safe-money-gen] then Nothing
1010.45 s
[really-safe-money-gen] else Just r
1010.45 s
[really-safe-money-gen]
1010.45 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:93:12-17
1010.46 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] rat <-
1010.46 s
[really-safe-money-gen] let r = 1 / irat
1010.46 s
[really-safe-money-gen] - in if r < 0
1010.46 s
[really-safe-money-gen] + in if T r ue
1010.46 s
[really-safe-money-gen] then Nothing
1010.46 s
[really-safe-money-gen] else Just r
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:93:12-17
1010.46 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] rat <-
1010.46 s
[really-safe-money-gen] let r = 1 / irat
1010.46 s
[really-safe-money-gen] - in if r < 0
1010.46 s
[really-safe-money-gen] + in if n o t ( r < 0 )
1010.46 s
[really-safe-money-gen] then Nothing
1010.46 s
[really-safe-money-gen] else Just r
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:92:13-14
1010.46 s
[really-safe-money-gen] @@ -89,7 +89,7 @@
1010.46 s
[really-safe-money-gen] else pure r
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] rat <-
1010.46 s
[really-safe-money-gen] - let r = 1 / irat
1010.46 s
[really-safe-money-gen] + let r = - 1 / irat
1010.46 s
[really-safe-money-gen] in if r < 0
1010.46 s
[really-safe-money-gen] then Nothing
1010.46 s
[really-safe-money-gen] else Just r
1010.46 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:92:13-14
1010.46 s
[really-safe-money-gen] @@ -89,7 +89,7 @@
1010.46 s
[really-safe-money-gen] else pure r
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] rat <-
1010.46 s
[really-safe-money-gen] - let r = 1 / irat
1010.46 s
[really-safe-money-gen] + let r = 0 / irat
1010.46 s
[really-safe-money-gen] in if r < 0
1010.46 s
[really-safe-money-gen] then Nothing
1010.46 s
[really-safe-money-gen] else Just r
1010.46 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:93:12-17
1010.46 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] rat <-
1010.46 s
[really-safe-money-gen] let r = 1 / irat
1010.46 s
[really-safe-money-gen] - in if r < 0
1010.46 s
[really-safe-money-gen] + in if False
1010.46 s
[really-safe-money-gen] then Nothing
1010.46 s
[really-safe-money-gen] else Just r
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:98:8-28
1010.46 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
1010.46 s
[really-safe-money-gen] else Just r
1010.46 s
[really-safe-money-gen]
1010.46 s
[really-safe-money-gen] fac <-
1010.47 s
[really-safe-money-gen] - if d e nom inato r r a t == 1
1010.47 s
[really-safe-money-gen] + if T r ue
1010.47 s
[really-safe-money-gen] then Just (numerator rat)
1010.47 s
[really-safe-money-gen] else Nothing
1010.47 s
[really-safe-money-gen]
1010.47 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:98:27-28
1010.47 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
1010.47 s
[really-safe-money-gen] else Just r
1010.47 s
[really-safe-money-gen]
1010.47 s
[really-safe-money-gen] fac <-
1010.47 s
[really-safe-money-gen] - if denominator rat == 1
1010.47 s
[really-safe-money-gen] + if denominator rat == - 1
1010.47 s
[really-safe-money-gen] then Just (numerator rat)
1010.47 s
[really-safe-money-gen] else Nothing
1010.47 s
[really-safe-money-gen]
1010.47 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:98:27-28
1010.47 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
1010.47 s
[really-safe-money-gen] else Just r
1010.47 s
[really-safe-money-gen]
1010.47 s
[really-safe-money-gen] fac <-
1010.47 s
[really-safe-money-gen] - if denominator rat == 1
1010.47 s
[really-safe-money-gen] + if denominator rat == 0
1010.47 s
[really-safe-money-gen] then Just (numerator rat)
1010.47 s
[really-safe-money-gen] else Nothing
1010.47 s
[really-safe-money-gen]
1010.47 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/QuantisationFactor.hs:95:16-22
1010.47 s
[really-safe-money-gen] @@ -92,7 +92,7 @@
1010.47 s
[really-safe-money-gen] let r = 1 / irat
1010.47 s
[really-safe-money-gen] in if r < 0
1010.47 s
[really-safe-money-gen] then Nothing
1010.47 s
[really-safe-money-gen] - else J u s t r
1010.47 s
[really-safe-money-gen] + else No t h ing
1010.47 s
[really-safe-money-gen]
1010.47 s
[really-safe-money-gen] fac <-
1010.48 s
[really-safe-money-gen] if denominator rat == 1
1010.48 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:98:8-28
1010.48 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
1010.48 s
[really-safe-money-gen] else Just r
1010.48 s
[really-safe-money-gen]
1010.48 s
[really-safe-money-gen] fac <-
1010.48 s
[really-safe-money-gen] - if d e n omi n a t or rat == 1
1010.48 s
[really-safe-money-gen] + if F a lse
1010.48 s
[really-safe-money-gen] then Just (numerator rat)
1010.48 s
[really-safe-money-gen] else Nothing
1010.48 s
[really-safe-money-gen]
1010.48 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/QuantisationFactor.hs:99:12-32
1010.48 s
[really-safe-money-gen] @@ -96,7 +96,7 @@
1010.48 s
[really-safe-money-gen]
1010.48 s
[really-safe-money-gen] fac <-
1010.48 s
[really-safe-money-gen] if denominator rat == 1
1010.48 s
[really-safe-money-gen] - then J u s t ( n u m erator rat)
1010.48 s
[really-safe-money-gen] + then No t hi n g
1010.48 s
[really-safe-money-gen] else Nothing
1010.48 s
[really-safe-money-gen]
1010.48 s
[really-safe-money-gen] if fac <= fromIntegral (maxBound :: Word32)
1010.48 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
1010.48 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
1010.48 s
[really-safe-money-gen] then Just (numerator rat)
1010.48 s
[really-safe-money-gen] else Nothing
1010.48 s
[really-safe-money-gen]
1010.48 s
[really-safe-money-gen] - if fac < = fromIntegral (maxBound :: Word32)
1010.48 s
[really-safe-money-gen] + if fac > fromIntegral (maxBound :: Word32)
1010.48 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
1010.48 s
[really-safe-money-gen] else Nothing
1010.48 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
1010.48 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
1010.48 s
[really-safe-money-gen] then Just (numerator rat)
1010.48 s
[really-safe-money-gen] else Nothing
1010.48 s
[really-safe-money-gen]
1010.48 s
[really-safe-money-gen] - if fac < = fromIntegral (maxBound :: Word32)
1010.48 s
[really-safe-money-gen] + if fac < fromIntegral (maxBound :: Word32)
1010.48 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
1010.48 s
[really-safe-money-gen] else Nothing
1010.48 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:102:6-46
1010.48 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
1010.48 s
[really-safe-money-gen] then Just (numerator rat)
1010.48 s
[really-safe-money-gen] else Nothing
1010.49 s
[really-safe-money-gen]
1010.49 s
[really-safe-money-gen] - i f f a c <= f ro mInte g r a l (maxB o u n d : : Wor d 3 2)
1010.49 s
[really-safe-money-gen] + i f T r u e
1010.49 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
1010.49 s
[really-safe-money-gen] else Nothing
1010.49 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/QuantisationFactor.hs:93:12-17
1010.49 s
[really-safe-money-gen] @@ -90,7 +90,7 @@
1010.49 s
[really-safe-money-gen]
1010.49 s
[really-safe-money-gen] rat <-
1010.49 s
[really-safe-money-gen] let r = 1 / irat
1010.49 s
[really-safe-money-gen] - in if r < 0
1010.49 s
[really-safe-money-gen] + in if r > 0
1010.49 s
[really-safe-money-gen] then Nothing
1010.49 s
[really-safe-money-gen] else Just r
1010.49 s
[really-safe-money-gen]
1010.49 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:98:8-28
1010.49 s
[really-safe-money-gen] @@ -95,7 +95,7 @@
1010.49 s
[really-safe-money-gen] else Just r
1010.49 s
[really-safe-money-gen]
1010.49 s
[really-safe-money-gen] fac <-
1010.49 s
[really-safe-money-gen] - if denominator rat == 1
1010.49 s
[really-safe-money-gen] + if n o t ( denominator rat == 1 )
1010.49 s
[really-safe-money-gen] then Just (numerator rat)
1010.49 s
[really-safe-money-gen] else Nothing
1010.49 s
[really-safe-money-gen]
1010.49 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/QuantisationFactor.hs:102:6-46
1010.49 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
1010.49 s
[really-safe-money-gen] then Just (numerator rat)
1010.49 s
[really-safe-money-gen] else Nothing
1010.49 s
[really-safe-money-gen]
1010.49 s
[really-safe-money-gen] - if fac < = fromIntegral (maxBound :: Word32)
1016.24 s
[really-safe-money-gen] + if fac > = fromIntegral (maxBound :: Word32)
1016.27 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
1016.27 s
[really-safe-money-gen] else Nothing
1016.27 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:67:67-68
1016.27 s
[really-safe-money-gen] @@ -64,7 +64,7 @@
1016.27 s
[really-safe-money-gen] -- Just (DecimalLiteral Nothing 1 0)
1016.27 s
[really-safe-money-gen] toDecimalLiteral :: QuantisationFactor -> Maybe DecimalLiteral
1016.27 s
[really-safe-money-gen] toDecimalLiteral (QuantisationFactor qfw) =
1016.27 s
[really-safe-money-gen] - DecimalLiteral.setSignOptional <$> DecimalLiteral.fromRational ( 1 % fromIntegral qfw)
1016.27 s
[really-safe-money-gen] + DecimalLiteral.setSignOptional <$> DecimalLiteral.fromRational ( - 1 % fromIntegral qfw)
1016.27 s
[really-safe-money-gen]
1016.27 s
[really-safe-money-gen] -- | Parse a 'QuantisationFactor' from a 'DecimalLiteral' that represents the smallest unit
1016.27 s
[really-safe-money-gen] -- TODO explain that it's the inverse.
1016.27 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:40:57-63
1016.27 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
1016.27 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1016.27 s
[really-safe-money-gen] mconcat
1016.27 s
[really-safe-money-gen] [ genericValidate qf,
1016.27 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
1016.27 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ n o t ( w /= 0 )
1016.27 s
[really-safe-money-gen] ]
1016.27 s
[really-safe-money-gen]
1016.27 s
[really-safe-money-gen] instance NFData QuantisationFactor
1016.27 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:40:57-63
1016.27 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
1016.27 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1016.27 s
[really-safe-money-gen] mconcat
1016.28 s
[really-safe-money-gen] [ genericValidate qf,
1016.28 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
1016.28 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ F a lse
1016.28 s
[really-safe-money-gen] ]
1016.28 s
[really-safe-money-gen]
1016.28 s
[really-safe-money-gen] instance NFData QuantisationFactor
1016.28 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:67:67-68
1016.28 s
[really-safe-money-gen] @@ -64,7 +64,7 @@
1016.28 s
[really-safe-money-gen] -- Just (DecimalLiteral Nothing 1 0)
1016.28 s
[really-safe-money-gen] toDecimalLiteral :: QuantisationFactor -> Maybe DecimalLiteral
1016.28 s
[really-safe-money-gen] toDecimalLiteral (QuantisationFactor qfw) =
1016.28 s
[really-safe-money-gen] - DecimalLiteral.setSignOptional <$> DecimalLiteral.fromRational ( 1 % fromIntegral qfw)
1016.28 s
[really-safe-money-gen] + DecimalLiteral.setSignOptional <$> DecimalLiteral.fromRational ( 0 % fromIntegral qfw)
1016.28 s
[really-safe-money-gen]
1016.28 s
[really-safe-money-gen] -- | Parse a 'QuantisationFactor' from a 'DecimalLiteral' that represents the smallest unit
1016.28 s
[really-safe-money-gen] -- TODO explain that it's the inverse.
1016.28 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/QuantisationFactor.hs:103:10-54
1016.28 s
[really-safe-money-gen] @@ -100,5 +100,5 @@
1016.28 s
[really-safe-money-gen] else Nothing
1016.28 s
[really-safe-money-gen]
1016.28 s
[really-safe-money-gen] if fac <= fromIntegral (maxBound :: Word32)
1016.28 s
[really-safe-money-gen] - then J u st ( Quant isa t i o n F a ct or (fromInt e g r a l fac))
1016.28 s
[really-safe-money-gen] + then No t h i n g
1016.28 s
[really-safe-money-gen] else Nothing
1016.28 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:102:6-46
1016.28 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
1016.28 s
[really-safe-money-gen] then Just (numerator rat)
1016.28 s
[really-safe-money-gen] else Nothing
1016.28 s
[really-safe-money-gen]
1016.28 s
[really-safe-money-gen] - if f a c <= fr omInt e gral (maxBound :: Word32)
1016.28 s
[really-safe-money-gen] + if F a ls e
1016.28 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
1016.28 s
[really-safe-money-gen] else Nothing
1016.28 s
[really-safe-money-gen] Testing mutation Negate at src/Money/QuantisationFactor.hs:102:6-46
1016.28 s
[really-safe-money-gen] @@ -99,6 +99,6 @@
1016.28 s
[really-safe-money-gen] then Just (numerator rat)
1016.28 s
[really-safe-money-gen] else Nothing
1016.28 s
[really-safe-money-gen]
1016.28 s
[really-safe-money-gen] - if fac <= fromIntegral (maxBound :: Word32)
1016.28 s
[really-safe-money-gen] + if n o t ( fac <= fromIntegral (maxBound :: Word32) )
1016.28 s
[really-safe-money-gen] then Just (QuantisationFactor (fromIntegral fac))
1016.28 s
[really-safe-money-gen] else Nothing
1016.28 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:801:36-38
1016.28 s
[really-safe-money-gen] @@ -798,7 +798,7 @@
1016.28 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor 0) = "%f"
1016.28 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor qf) =
1016.28 s
[really-safe-money-gen] let decimals :: Int
1016.28 s
[really-safe-money-gen] - decimals = ceiling $ logBase 10 (fromIntegral qf :: Float)
1016.29 s
[really-safe-money-gen] + decimals = ceiling $ logBase - 10 (fromIntegral qf :: Float)
1016.29 s
[really-safe-money-gen] in printf "%%0.%df" decimals
1016.29 s
[really-safe-money-gen]
1016.29 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1016.29 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:720:6-40
1016.29 s
[really-safe-money-gen] @@ -717,7 +717,7 @@
1016.29 s
[really-safe-money-gen] rate _ _ _ (Amount 0) = Nothing
1016.29 s
[really-safe-money-gen] rate (QuantisationFactor qf1) (Amount a1) (QuantisationFactor qf2) (Amount a2) =
1016.29 s
[really-safe-money-gen] ConversionRate.fromRatio $
1016.29 s
[really-safe-money-gen] - (fromIntegral a2 * fromIntegral qf1)
1016.29 s
[really-safe-money-gen] + (fromIntegral a2 - fromIntegral qf1)
1016.29 s
[really-safe-money-gen] % (fromIntegral a1 * fromIntegral qf2)
1016.29 s
[really-safe-money-gen]
1016.29 s
[really-safe-money-gen] -- | Convert an amount of money of one currency into an amount of money of
1016.29 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:721:10-44
1016.29 s
[really-safe-money-gen] @@ -718,7 +718,7 @@
1016.29 s
[really-safe-money-gen] rate (QuantisationFactor qf1) (Amount a1) (QuantisationFactor qf2) (Amount a2) =
1016.29 s
[really-safe-money-gen] ConversionRate.fromRatio $
1016.29 s
[really-safe-money-gen] (fromIntegral a2 * fromIntegral qf1)
1016.29 s
[really-safe-money-gen] - % (fromIntegral a1 * fromIntegral qf2)
1016.29 s
[really-safe-money-gen] + % (fromIntegral a1 + fromIntegral qf2)
1016.29 s
[really-safe-money-gen]
1016.29 s
[really-safe-money-gen] -- | Convert an amount of money of one currency into an amount of money of
1016.29 s
[really-safe-money-gen] -- another currency using a conversion rate.
1016.29 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:569:10-19
1016.29 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
1016.29 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
1016.29 s
[really-safe-money-gen] smallerChunk :: Amount
1016.29 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
1016.29 s
[really-safe-money-gen] - in if r e s t == 0
1016.29 s
[really-safe-money-gen] + in if F al s e
1016.29 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
1016.29 s
[really-safe-money-gen] else
1016.29 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
1016.29 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:720:6-40
1016.29 s
[really-safe-money-gen] @@ -717,7 +717,7 @@
1016.29 s
[really-safe-money-gen] rate _ _ _ (Amount 0) = Nothing
1016.29 s
[really-safe-money-gen] rate (QuantisationFactor qf1) (Amount a1) (QuantisationFactor qf2) (Amount a2) =
1016.29 s
[really-safe-money-gen] ConversionRate.fromRatio $
1016.29 s
[really-safe-money-gen] - (fromIntegral a2 * fromIntegral qf1)
1016.30 s
[really-safe-money-gen] + (fromIntegral a2 + fromIntegral qf1)
1016.30 s
[really-safe-money-gen] % (fromIntegral a1 * fromIntegral qf2)
1016.30 s
[really-safe-money-gen]
1016.30 s
[really-safe-money-gen] -- | Convert an amount of money of one currency into an amount of money of
1016.30 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:569:10-19
1016.30 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
1016.30 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
1016.30 s
[really-safe-money-gen] smallerChunk :: Amount
1016.30 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
1016.30 s
[really-safe-money-gen] - in if rest == 0
1016.30 s
[really-safe-money-gen] + in if n o t ( rest == 0 )
1016.30 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
1016.30 s
[really-safe-money-gen] else
1016.30 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
1016.30 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:721:10-44
1016.30 s
[really-safe-money-gen] @@ -718,7 +718,7 @@
1016.30 s
[really-safe-money-gen] rate (QuantisationFactor qf1) (Amount a1) (QuantisationFactor qf2) (Amount a2) =
1016.30 s
[really-safe-money-gen] ConversionRate.fromRatio $
1016.30 s
[really-safe-money-gen] (fromIntegral a2 * fromIntegral qf1)
1016.30 s
[really-safe-money-gen] - % (fromIntegral a1 * fromIntegral qf2)
1016.30 s
[really-safe-money-gen] + % (fromIntegral a1 - fromIntegral qf2)
1016.30 s
[really-safe-money-gen]
1016.30 s
[really-safe-money-gen] -- | Convert an amount of money of one currency into an amount of money of
1016.30 s
[really-safe-money-gen] -- another currency using a conversion rate.
1016.30 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:801:36-38
1016.30 s
[really-safe-money-gen] @@ -798,7 +798,7 @@
1016.30 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor 0) = "%f"
1016.30 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor qf) =
1016.30 s
[really-safe-money-gen] let decimals :: Int
1016.30 s
[really-safe-money-gen] - decimals = ceiling $ logBase 1 0 (fromIntegral qf :: Float)
1016.30 s
[really-safe-money-gen] + decimals = ceiling $ logBase 1 (fromIntegral qf :: Float)
1016.30 s
[really-safe-money-gen] in printf "%%0.%df" decimals
1016.30 s
[really-safe-money-gen]
1016.30 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1016.30 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:577:39-63
1016.30 s
[really-safe-money-gen] @@ -574,7 +574,7 @@
1016.30 s
[really-safe-money-gen] numberOfLargerChunks :: Word32
1016.30 s
[really-safe-money-gen] numberOfLargerChunks = (fromIntegral :: Word64 -> Word32) rest
1016.30 s
[really-safe-money-gen] numberOfSmallerChunks :: Word32
1016.30 s
[really-safe-money-gen] - numberOfSmallerChunks = f - numberOfLargerChunks
1022.40 s
[really-safe-money-gen] + numberOfSmallerChunks = f + numberOfLargerChunks
1022.40 s
[really-safe-money-gen] largerChunk :: Amount
1022.42 s
[really-safe-money-gen] largerChunk = Amount $ succ smallerChunkSize
1022.42 s
[really-safe-money-gen] in DistributedIntoUnequalChunks
1022.42 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:577:39-63
1022.42 s
[really-safe-money-gen] @@ -574,7 +574,7 @@
1022.42 s
[really-safe-money-gen] numberOfLargerChunks :: Word32
1022.42 s
[really-safe-money-gen] numberOfLargerChunks = (fromIntegral :: Word64 -> Word32) rest
1022.42 s
[really-safe-money-gen] numberOfSmallerChunks :: Word32
1022.42 s
[really-safe-money-gen] - numberOfSmallerChunks = f - numberOfLargerChunks
1022.42 s
[really-safe-money-gen] + numberOfSmallerChunks = f * numberOfLargerChunks
1022.42 s
[really-safe-money-gen] largerChunk :: Amount
1022.42 s
[really-safe-money-gen] largerChunk = Amount $ succ smallerChunkSize
1022.43 s
[really-safe-money-gen] in DistributedIntoUnequalChunks
1022.43 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:544:10-23
1022.43 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
1022.43 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
1022.43 s
[really-safe-money-gen] r :: Integer
1022.43 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1022.43 s
[really-safe-money-gen] - in if r > maxBoundI
1022.43 s
[really-safe-money-gen] + in if r < maxBoundI
1022.43 s
[really-safe-money-gen] then Nothing
1022.43 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.43 s
[really-safe-money-gen]
1022.43 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:544:10-23
1022.43 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
1022.43 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
1022.43 s
[really-safe-money-gen] r :: Integer
1022.43 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1022.43 s
[really-safe-money-gen] - in if r > maxBoundI
1022.43 s
[really-safe-money-gen] + in if n o t ( r > maxBoundI )
1022.43 s
[really-safe-money-gen] then Nothing
1022.43 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.43 s
[really-safe-money-gen]
1022.43 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/Amount.hs:546:14-66
1022.43 s
[really-safe-money-gen] @@ -543,7 +543,7 @@
1022.43 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1022.43 s
[really-safe-money-gen] in if r > maxBoundI
1022.43 s
[really-safe-money-gen] then Nothing
1022.43 s
[really-safe-money-gen] - else J u s t ( Am o u n t ( (f rom I n t e g er :: Integer -> Word64) r))
1022.43 s
[really-safe-money-gen] + else N o t hi n g
1022.43 s
[really-safe-money-gen]
1022.43 s
[really-safe-money-gen] -- | Distribute an amount of money into chunks that are as evenly distributed as possible.
1022.43 s
[really-safe-money-gen] --
1022.43 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:517:11-18
1022.43 s
[really-safe-money-gen] @@ -514,7 +514,7 @@
1022.43 s
[really-safe-money-gen] i2 :: Integer
1022.43 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1022.43 s
[really-safe-money-gen] r :: Integer
1022.43 s
[really-safe-money-gen] - r = i1 - i2
1022.43 s
[really-safe-money-gen] + r = i1 * i2
1022.43 s
[really-safe-money-gen] in if r < 0
1022.43 s
[really-safe-money-gen] then Nothing
1022.43 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.43 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:518:14-15
1022.43 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1022.43 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1022.43 s
[really-safe-money-gen] r :: Integer
1022.44 s
[really-safe-money-gen] r = i1 - i2
1022.44 s
[really-safe-money-gen] - in if r < 0
1022.44 s
[really-safe-money-gen] + in if r < 1
1022.44 s
[really-safe-money-gen] then Nothing
1022.44 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.44 s
[really-safe-money-gen]
1022.44 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:518:10-15
1022.44 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1022.44 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1022.44 s
[really-safe-money-gen] r :: Integer
1022.44 s
[really-safe-money-gen] r = i1 - i2
1022.44 s
[really-safe-money-gen] - in if r < 0
1022.44 s
[really-safe-money-gen] + in if r < = 0
1022.44 s
[really-safe-money-gen] then Nothing
1022.44 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.44 s
[really-safe-money-gen]
1022.44 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:518:10-15
1022.44 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1022.44 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1022.44 s
[really-safe-money-gen] r :: Integer
1022.44 s
[really-safe-money-gen] r = i1 - i2
1022.44 s
[really-safe-money-gen] - in if r < 0
1022.44 s
[really-safe-money-gen] + in if r > 0
1022.44 s
[really-safe-money-gen] then Nothing
1022.44 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.44 s
[really-safe-money-gen]
1022.44 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:569:10-19
1022.44 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
1022.44 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
1022.44 s
[really-safe-money-gen] smallerChunk :: Amount
1022.44 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
1022.44 s
[really-safe-money-gen] - in if r e s t == 0
1022.44 s
[really-safe-money-gen] + in if T r u e
1022.44 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
1022.44 s
[really-safe-money-gen] else
1022.44 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
1022.44 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:544:10-23
1022.44 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
1022.44 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
1022.44 s
[really-safe-money-gen] r :: Integer
1022.44 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1022.44 s
[really-safe-money-gen] - in if r > maxBoundI
1022.44 s
[really-safe-money-gen] + in if r < = maxBoundI
1022.44 s
[really-safe-money-gen] then Nothing
1022.44 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.44 s
[really-safe-money-gen]
1022.44 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/QuantisationFactor.hs:40:62-63
1022.44 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
1022.44 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1022.44 s
[really-safe-money-gen] mconcat
1022.44 s
[really-safe-money-gen] [ genericValidate qf,
1022.44 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
1022.44 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ w /= 1
1022.44 s
[really-safe-money-gen] ]
1022.44 s
[really-safe-money-gen]
1022.44 s
[really-safe-money-gen] instance NFData QuantisationFactor
1022.44 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:544:10-23
1022.44 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
1022.44 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
1022.45 s
[really-safe-money-gen] r :: Integer
1022.45 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1022.45 s
[really-safe-money-gen] - in if r > maxBoundI
1022.45 s
[really-safe-money-gen] + in if r > = maxBoundI
1022.45 s
[really-safe-money-gen] then Nothing
1022.45 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.45 s
[really-safe-money-gen]
1022.45 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:518:10-15
1022.45 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1022.45 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1022.45 s
[really-safe-money-gen] r :: Integer
1022.45 s
[really-safe-money-gen] r = i1 - i2
1022.45 s
[really-safe-money-gen] - in if r < 0
1022.45 s
[really-safe-money-gen] + in if r > = 0
1022.45 s
[really-safe-money-gen] then Nothing
1022.45 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.45 s
[really-safe-money-gen]
1022.45 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:543:11-88
1022.45 s
[really-safe-money-gen] @@ -540,7 +540,7 @@
1022.45 s
[really-safe-money-gen] let maxBoundI :: Integer
1022.45 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
1022.45 s
[really-safe-money-gen] r :: Integer
1022.45 s
[really-safe-money-gen] - r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1022.45 s
[really-safe-money-gen] + r = (fromIntegral :: Word32 -> Integer) f + (fromIntegral :: Word64 -> Integer) a
1022.45 s
[really-safe-money-gen] in if r > maxBoundI
1022.45 s
[really-safe-money-gen] then Nothing
1022.45 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.45 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:543:11-88
1022.45 s
[really-safe-money-gen] @@ -540,7 +540,7 @@
1022.45 s
[really-safe-money-gen] let maxBoundI :: Integer
1022.45 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
1022.45 s
[really-safe-money-gen] r :: Integer
1022.45 s
[really-safe-money-gen] - r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1022.45 s
[really-safe-money-gen] + r = (fromIntegral :: Word32 -> Integer) f - (fromIntegral :: Word64 -> Integer) a
1022.45 s
[really-safe-money-gen] in if r > maxBoundI
1022.45 s
[really-safe-money-gen] then Nothing
1022.45 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1022.45 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:569:18-19
1022.45 s
[really-safe-money-gen] @@ -566,7 +566,7 @@
1022.45 s
[really-safe-money-gen] (smallerChunkSize, rest) = divMod a ((fromIntegral :: Word32 -> Word64) f)
1022.45 s
[really-safe-money-gen] smallerChunk :: Amount
1022.45 s
[really-safe-money-gen] smallerChunk = Amount smallerChunkSize
1022.45 s
[really-safe-money-gen] - in if rest == 0
1022.45 s
[really-safe-money-gen] + in if rest == 1
1022.45 s
[really-safe-money-gen] then DistributedIntoEqualChunks f smallerChunk
1022.45 s
[really-safe-money-gen] else
1022.46 s
[really-safe-money-gen] let -- This 'fromIntegral' is theoretically not safe, but it's
1022.46 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:544:10-23
1022.46 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
1022.46 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
1022.46 s
[really-safe-money-gen] r :: Integer
1022.46 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1022.46 s
[really-safe-money-gen] - in if r > max Bo u n d I
1022.46 s
[really-safe-money-gen] + in if T r u e
1022.46 s
[really-safe-money-gen] then Nothing
1028.45 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.45 s
[really-safe-money-gen]
1028.45 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/QuantisationFactor.hs:39:7-8
1028.48 s
[really-safe-money-gen] @@ -36,9 +36,8 @@
1028.48 s
[really-safe-money-gen] instance Validity QuantisationFactor where
1028.48 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1028.48 s
[really-safe-money-gen] mconcat
1028.48 s
[really-safe-money-gen] - [ genericValidate qf,
1028.48 s
[really-safe-money-gen] declare "The quantisation factor is not zero" $ w /= 0
1028.48 s
[really-safe-money-gen] ]
1028.48 s
[really-safe-money-gen]
1028.48 s
[really-safe-money-gen] instance NFData QuantisationFactor
1028.48 s
[really-safe-money-gen]
1028.48 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:801:36-38
1028.48 s
[really-safe-money-gen] @@ -798,7 +798,7 @@
1028.48 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor 0) = "%f"
1028.48 s
[really-safe-money-gen] quantisationFactorFormatString (QuantisationFactor qf) =
1028.48 s
[really-safe-money-gen] let decimals :: Int
1028.48 s
[really-safe-money-gen] - decimals = ceiling $ logBase 1 0 (fromIntegral qf :: Float)
1028.48 s
[really-safe-money-gen] + decimals = ceiling $ logBase 0 (fromIntegral qf :: Float)
1028.48 s
[really-safe-money-gen] in printf "%%0.%df" decimals
1028.48 s
[really-safe-money-gen]
1028.48 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1028.48 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/QuantisationFactor.hs:39:7-8
1028.48 s
[really-safe-money-gen] @@ -36,9 +36,7 @@
1028.48 s
[really-safe-money-gen] instance Validity QuantisationFactor where
1028.48 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1028.48 s
[really-safe-money-gen] mconcat
1028.48 s
[really-safe-money-gen] - [ genericValidate qf,
1028.48 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
1028.48 s
[really-safe-money-gen] ]
1028.48 s
[really-safe-money-gen]
1028.48 s
[really-safe-money-gen] instance NFData QuantisationFactor
1028.48 s
[really-safe-money-gen]
1028.48 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:475:11-18
1028.48 s
[really-safe-money-gen] @@ -472,7 +472,7 @@
1028.48 s
[really-safe-money-gen] maxBoundI :: Integer
1028.48 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1028.48 s
[really-safe-money-gen] r :: Integer
1028.48 s
[really-safe-money-gen] - r = i1 + i2
1028.48 s
[really-safe-money-gen] + r = i1 * i2
1028.48 s
[really-safe-money-gen] in if r > maxBoundI
1028.48 s
[really-safe-money-gen] then Nothing
1028.48 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:476:10-23
1028.49 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
1028.49 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1028.49 s
[really-safe-money-gen] r :: Integer
1028.49 s
[really-safe-money-gen] r = i1 + i2
1028.49 s
[really-safe-money-gen] - in if r > maxBoundI
1028.49 s
[really-safe-money-gen] + in if r > = maxBoundI
1028.49 s
[really-safe-money-gen] then Nothing
1028.49 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen]
1028.49 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:476:10-23
1028.49 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
1028.49 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1028.49 s
[really-safe-money-gen] r :: Integer
1028.49 s
[really-safe-money-gen] r = i1 + i2
1028.49 s
[really-safe-money-gen] - in if r > maxBoundI
1028.49 s
[really-safe-money-gen] + in if r < maxBoundI
1028.49 s
[really-safe-money-gen] then Nothing
1028.49 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen]
1028.49 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:476:10-23
1028.49 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
1028.49 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1028.49 s
[really-safe-money-gen] r :: Integer
1028.49 s
[really-safe-money-gen] r = i1 + i2
1028.49 s
[really-safe-money-gen] - in if r > max Bo u n d I
1028.49 s
[really-safe-money-gen] + in if T r u e
1028.49 s
[really-safe-money-gen] then Nothing
1028.49 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen]
1028.49 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:476:10-23
1028.49 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
1028.49 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1028.49 s
[really-safe-money-gen] r :: Integer
1028.49 s
[really-safe-money-gen] r = i1 + i2
1028.49 s
[really-safe-money-gen] - in if r > maxBoundI
1028.49 s
[really-safe-money-gen] + in if r < = maxBoundI
1028.49 s
[really-safe-money-gen] then Nothing
1028.49 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen]
1028.49 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:518:10-15
1028.49 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1028.49 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1028.49 s
[really-safe-money-gen] r :: Integer
1028.49 s
[really-safe-money-gen] r = i1 - i2
1028.49 s
[really-safe-money-gen] - in if r < 0
1028.49 s
[really-safe-money-gen] + in if False
1028.49 s
[really-safe-money-gen] then Nothing
1028.49 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen]
1028.49 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/Amount.hs:520:14-66
1028.49 s
[really-safe-money-gen] @@ -517,7 +517,7 @@
1028.49 s
[really-safe-money-gen] r = i1 - i2
1028.49 s
[really-safe-money-gen] in if r < 0
1028.49 s
[really-safe-money-gen] then Nothing
1028.49 s
[really-safe-money-gen] - else J u s t ( Am o u n t ( (f rom I n t e g er :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen] + else N o t hi n g
1028.49 s
[really-safe-money-gen]
1028.49 s
[really-safe-money-gen] -- | Multiply an amount of money by an integer scalar
1028.49 s
[really-safe-money-gen] --
1028.49 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/Amount.hs:478:14-66
1028.49 s
[really-safe-money-gen] @@ -475,7 +475,7 @@
1028.49 s
[really-safe-money-gen] r = i1 + i2
1028.49 s
[really-safe-money-gen] in if r > maxBoundI
1028.49 s
[really-safe-money-gen] then Nothing
1028.49 s
[really-safe-money-gen] - else J u s t ( Am o u n t ( (f rom I n t e g er :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen] + else N o t hi n g
1028.49 s
[really-safe-money-gen]
1028.49 s
[really-safe-money-gen] -- | Add a number of amounts of money together.
1028.49 s
[really-safe-money-gen] --
1028.49 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:388:5-16
1028.49 s
[really-safe-money-gen] @@ -385,7 +385,7 @@
1028.49 s
[really-safe-money-gen] -- Nothing
1028.49 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
1028.49 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
1028.49 s
[really-safe-money-gen] - | i s I nva lid r = Nothing
1028.49 s
[really-safe-money-gen] + | T r u e = Nothing
1028.49 s
[really-safe-money-gen] | r < 0 = Nothing
1028.49 s
[really-safe-money-gen] | otherwise =
1028.49 s
[really-safe-money-gen] let resultRational :: Rational
1028.49 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:388:5-16
1028.49 s
[really-safe-money-gen] @@ -385,7 +385,7 @@
1028.49 s
[really-safe-money-gen] -- Nothing
1028.49 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
1028.49 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
1028.49 s
[really-safe-money-gen] - | isInvalid r = Nothing
1028.49 s
[really-safe-money-gen] + | n o t ( isInvalid r ) = Nothing
1028.49 s
[really-safe-money-gen] | r < 0 = Nothing
1028.49 s
[really-safe-money-gen] | otherwise =
1028.49 s
[really-safe-money-gen] let resultRational :: Rational
1028.49 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:476:10-23
1028.49 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
1028.49 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1028.49 s
[really-safe-money-gen] r :: Integer
1028.49 s
[really-safe-money-gen] r = i1 + i2
1028.49 s
[really-safe-money-gen] - in if r > m a xB ound I
1028.49 s
[really-safe-money-gen] + in if F a l se
1028.49 s
[really-safe-money-gen] then Nothing
1028.49 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.49 s
[really-safe-money-gen]
1028.49 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:476:10-23
1028.49 s
[really-safe-money-gen] @@ -473,7 +473,7 @@
1028.49 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1028.49 s
[really-safe-money-gen] r :: Integer
1028.50 s
[really-safe-money-gen] r = i1 + i2
1028.50 s
[really-safe-money-gen] - in if r > maxBoundI
1028.50 s
[really-safe-money-gen] + in if n o t ( r > maxBoundI )
1028.50 s
[really-safe-money-gen] then Nothing
1028.50 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.50 s
[really-safe-money-gen]
1028.50 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:518:10-15
1028.50 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1028.50 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1028.50 s
[really-safe-money-gen] r :: Integer
1028.50 s
[really-safe-money-gen] r = i1 - i2
1028.50 s
[really-safe-money-gen] - in if r < 0
1028.50 s
[really-safe-money-gen] + in if n o t ( r < 0 )
1028.50 s
[really-safe-money-gen] then Nothing
1028.50 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.50 s
[really-safe-money-gen]
1028.50 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:518:10-15
1028.50 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1028.50 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1028.50 s
[really-safe-money-gen] r :: Integer
1028.50 s
[really-safe-money-gen] r = i1 - i2
1028.50 s
[really-safe-money-gen] - in if r < 0
1028.50 s
[really-safe-money-gen] + in if T r ue
1028.50 s
[really-safe-money-gen] then Nothing
1028.50 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1028.50 s
[really-safe-money-gen]
1028.50 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:389:5-10
1028.50 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
1028.50 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
1028.50 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
1028.50 s
[really-safe-money-gen] | isInvalid r = Nothing
1028.50 s
[really-safe-money-gen] - | r < 0 = Nothing
1028.50 s
[really-safe-money-gen] + | r > 0 = Nothing
1028.50 s
[really-safe-money-gen] | otherwise =
1028.50 s
[really-safe-money-gen] let resultRational :: Rational
1028.50 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
1028.50 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:544:10-23
1028.50 s
[really-safe-money-gen] @@ -541,7 +541,7 @@
1028.50 s
[really-safe-money-gen] maxBoundI = (fromIntegral :: Word64 -> Integer) (maxBound :: Word64)
1028.50 s
[really-safe-money-gen] r :: Integer
1028.50 s
[really-safe-money-gen] r = (fromIntegral :: Word32 -> Integer) f * (fromIntegral :: Word64 -> Integer) a
1028.50 s
[really-safe-money-gen] - in if r > m a xB ound I
1028.50 s
[really-safe-money-gen] + in if F a l se
1035.66 s
[really-safe-money-gen] then Nothing
1035.68 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1035.68 s
[really-safe-money-gen]
1035.68 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:399:18-83
1035.68 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
1035.68 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1035.69 s
[really-safe-money-gen] in if ceiled == floored
1035.69 s
[really-safe-money-gen] then
1035.69 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.69 s
[really-safe-money-gen] + if ceiled < (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.69 s
[really-safe-money-gen] then Nothing
1035.69 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1035.69 s
[really-safe-money-gen] else Nothing
1035.69 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:399:18-83
1035.69 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
1035.69 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1035.69 s
[really-safe-money-gen] in if ceiled == floored
1035.69 s
[really-safe-money-gen] then
1035.69 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.69 s
[really-safe-money-gen] + if ceiled > = (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.69 s
[really-safe-money-gen] then Nothing
1035.69 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1035.69 s
[really-safe-money-gen] else Nothing
1035.69 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:399:18-83
1035.69 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
1035.69 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1035.69 s
[really-safe-money-gen] in if ceiled == floored
1035.69 s
[really-safe-money-gen] then
1035.69 s
[really-safe-money-gen] - if c e il ed > ( f r o mI n t e g ra l :: Word64 -> Natural) (maxBound :: Word64)
1035.69 s
[really-safe-money-gen] + if T r u e
1035.69 s
[really-safe-money-gen] then Nothing
1035.69 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1035.69 s
[really-safe-money-gen] else Nothing
1035.69 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:399:18-83
1035.69 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
1035.69 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1035.69 s
[really-safe-money-gen] in if ceiled == floored
1035.69 s
[really-safe-money-gen] then
1035.69 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.69 s
[really-safe-money-gen] + if n o t ( ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64) )
1035.69 s
[really-safe-money-gen] then Nothing
1035.69 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1035.69 s
[really-safe-money-gen] else Nothing
1035.69 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:320:9-10
1035.69 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
1035.69 s
[really-safe-money-gen] Double ->
1035.69 s
[really-safe-money-gen] Maybe Amount
1035.69 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
1035.69 s
[really-safe-money-gen] - | d < 0 = Nothing
1035.70 s
[really-safe-money-gen] + | d < 1 = Nothing
1035.70 s
[really-safe-money-gen] | otherwise =
1035.70 s
[really-safe-money-gen] let resultDouble :: Double
1035.70 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
1035.70 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:399:18-83
1035.70 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
1035.70 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1035.70 s
[really-safe-money-gen] in if ceiled == floored
1035.70 s
[really-safe-money-gen] then
1035.70 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.70 s
[really-safe-money-gen] + if ceiled < = (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.70 s
[really-safe-money-gen] then Nothing
1035.70 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1035.70 s
[really-safe-money-gen] else Nothing
1035.70 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:320:5-10
1035.70 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
1035.70 s
[really-safe-money-gen] Double ->
1035.70 s
[really-safe-money-gen] Maybe Amount
1035.70 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
1035.70 s
[really-safe-money-gen] - | d < 0 = Nothing
1035.70 s
[really-safe-money-gen] + | d < = 0 = Nothing
1035.70 s
[really-safe-money-gen] | otherwise =
1035.70 s
[really-safe-money-gen] let resultDouble :: Double
1035.70 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
1035.70 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:517:11-18
1035.70 s
[really-safe-money-gen] @@ -514,7 +514,7 @@
1035.70 s
[really-safe-money-gen] i2 :: Integer
1035.70 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1035.70 s
[really-safe-money-gen] r :: Integer
1035.70 s
[really-safe-money-gen] - r = i1 - i2
1035.70 s
[really-safe-money-gen] + r = i1 + i2
1035.70 s
[really-safe-money-gen] in if r < 0
1035.70 s
[really-safe-money-gen] then Nothing
1035.70 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1035.70 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:320:5-10
1035.70 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
1035.70 s
[really-safe-money-gen] Double ->
1035.70 s
[really-safe-money-gen] Maybe Amount
1035.70 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
1035.70 s
[really-safe-money-gen] - | d < 0 = Nothing
1035.70 s
[really-safe-money-gen] + | d > = 0 = Nothing
1035.70 s
[really-safe-money-gen] | otherwise =
1035.70 s
[really-safe-money-gen] let resultDouble :: Double
1035.70 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
1035.70 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:475:11-18
1035.70 s
[really-safe-money-gen] @@ -472,7 +472,7 @@
1035.70 s
[really-safe-money-gen] maxBoundI :: Integer
1035.70 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1035.71 s
[really-safe-money-gen] r :: Integer
1035.71 s
[really-safe-money-gen] - r = i1 + i2
1035.71 s
[really-safe-money-gen] + r = i1 - i2
1035.71 s
[really-safe-money-gen] in if r > maxBoundI
1035.71 s
[really-safe-money-gen] then Nothing
1035.71 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1035.71 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:320:5-10
1035.71 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
1035.71 s
[really-safe-money-gen] Double ->
1035.71 s
[really-safe-money-gen] Maybe Amount
1035.71 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
1035.71 s
[really-safe-money-gen] - | d < 0 = Nothing
1035.71 s
[really-safe-money-gen] + | T r u e = Nothing
1035.71 s
[really-safe-money-gen] | otherwise =
1035.71 s
[really-safe-money-gen] let resultDouble :: Double
1035.71 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
1035.71 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:320:5-10
1035.71 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
1035.71 s
[really-safe-money-gen] Double ->
1035.71 s
[really-safe-money-gen] Maybe Amount
1035.71 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
1035.71 s
[really-safe-money-gen] - | d < 0 = Nothing
1035.71 s
[really-safe-money-gen] + | n o t ( d < 0 ) = Nothing
1035.71 s
[really-safe-money-gen] | otherwise =
1035.71 s
[really-safe-money-gen] let resultDouble :: Double
1035.71 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
1035.71 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:397:14-31
1035.71 s
[really-safe-money-gen] @@ -394,7 +394,7 @@
1035.71 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
1035.71 s
[really-safe-money-gen] floored :: Natural
1035.71 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1035.71 s
[really-safe-money-gen] - in if c e il ed = = fl oo r e d
1035.71 s
[really-safe-money-gen] + in if T r u e
1035.71 s
[really-safe-money-gen] then
1035.71 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.71 s
[really-safe-money-gen] then Nothing
1035.71 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:397:14-31
1035.71 s
[really-safe-money-gen] @@ -394,7 +394,7 @@
1035.71 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
1035.71 s
[really-safe-money-gen] floored :: Natural
1035.71 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1035.71 s
[really-safe-money-gen] - in if c e il ed = = f l oo r e d
1035.71 s
[really-safe-money-gen] + in if F a l s e
1035.71 s
[really-safe-money-gen] then
1035.71 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1035.71 s
[really-safe-money-gen] then Nothing
1035.71 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:389:5-10
1035.71 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
1035.71 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
1035.71 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
1035.71 s
[really-safe-money-gen] | isInvalid r = Nothing
1035.71 s
[really-safe-money-gen] - | r < 0 = Nothing
1035.71 s
[really-safe-money-gen] + | r > = 0 = Nothing
1035.71 s
[really-safe-money-gen] | otherwise =
1035.72 s
[really-safe-money-gen] let resultRational :: Rational
1035.72 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
1035.72 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:389:5-10
1035.72 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
1035.72 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
1035.72 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
1035.72 s
[really-safe-money-gen] | isInvalid r = Nothing
1035.72 s
[really-safe-money-gen] - | r < 0 = Nothing
1035.72 s
[really-safe-money-gen] + | n o t ( r < 0 ) = Nothing
1035.72 s
[really-safe-money-gen] | otherwise =
1035.72 s
[really-safe-money-gen] let resultRational :: Rational
1035.72 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
1035.72 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:392:28-71
1035.72 s
[really-safe-money-gen] @@ -389,7 +389,7 @@
1035.72 s
[really-safe-money-gen] | r < 0 = Nothing
1035.72 s
[really-safe-money-gen] | otherwise =
1035.72 s
[really-safe-money-gen] let resultRational :: Rational
1035.72 s
[really-safe-money-gen] - resultRational = r * (fromIntegral :: Word32 -> Rational) qf
1043.20 s
[really-safe-money-gen] + resultRational = r + (fromIntegral :: Word32 -> Rational) qf
1043.24 s
[really-safe-money-gen] ceiled :: Natural
1043.24 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
1043.24 s
[really-safe-money-gen] floored :: Natural
1043.24 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:392:28-71
1043.24 s
[really-safe-money-gen] @@ -389,7 +389,7 @@
1043.24 s
[really-safe-money-gen] | r < 0 = Nothing
1043.24 s
[really-safe-money-gen] | otherwise =
1043.24 s
[really-safe-money-gen] let resultRational :: Rational
1043.24 s
[really-safe-money-gen] - resultRational = r * (fromIntegral :: Word32 -> Rational) qf
1043.25 s
[really-safe-money-gen] + resultRational = r - (fromIntegral :: Word32 -> Rational) qf
1043.25 s
[really-safe-money-gen] ceiled :: Natural
1043.25 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
1043.25 s
[really-safe-money-gen] floored :: Natural
1043.25 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:328:9-21
1043.25 s
[really-safe-money-gen] @@ -325,7 +325,7 @@
1043.25 s
[really-safe-money-gen] where
1043.25 s
[really-safe-money-gen] go resultDouble
1043.25 s
[really-safe-money-gen] | isNaN d = Nothing
1043.25 s
[really-safe-money-gen] - | i s In fin i t e d = Nothing
1043.25 s
[really-safe-money-gen] + | T ru e = Nothing
1043.25 s
[really-safe-money-gen] | otherwise =
1043.25 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1043.25 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1043.25 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:323:26-67
1043.25 s
[really-safe-money-gen] @@ -320,7 +320,7 @@
1043.25 s
[really-safe-money-gen] | d < 0 = Nothing
1043.25 s
[really-safe-money-gen] | otherwise =
1043.25 s
[really-safe-money-gen] let resultDouble :: Double
1043.25 s
[really-safe-money-gen] - resultDouble = d * (fromIntegral :: Word32 -> Double) qf
1043.25 s
[really-safe-money-gen] + resultDouble = d + (fromIntegral :: Word32 -> Double) qf
1043.25 s
[really-safe-money-gen] in go resultDouble
1043.25 s
[really-safe-money-gen] where
1043.25 s
[really-safe-money-gen] go resultDouble
1043.25 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:332:14-40
1043.25 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1043.25 s
[really-safe-money-gen] | otherwise =
1043.25 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1043.25 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1043.25 s
[really-safe-money-gen] - if exponent resultDouble > 65
1043.25 s
[really-safe-money-gen] + if exponent resultDouble < 65
1043.25 s
[really-safe-money-gen] then Nothing
1043.25 s
[really-safe-money-gen] else
1043.25 s
[really-safe-money-gen] let ceiled :: Natural
1043.25 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:332:38-40
1043.25 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1043.25 s
[really-safe-money-gen] | otherwise =
1043.25 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1043.25 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1043.25 s
[really-safe-money-gen] - if exponent resultDouble > 6 5
1043.25 s
[really-safe-money-gen] + if exponent resultDouble > 0
1043.25 s
[really-safe-money-gen] then Nothing
1043.25 s
[really-safe-money-gen] else
1043.26 s
[really-safe-money-gen] let ceiled :: Natural
1043.26 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:389:5-10
1043.26 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
1043.26 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
1043.26 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
1043.26 s
[really-safe-money-gen] | isInvalid r = Nothing
1043.26 s
[really-safe-money-gen] - | r < 0 = Nothing
1043.26 s
[really-safe-money-gen] + | r < = 0 = Nothing
1043.26 s
[really-safe-money-gen] | otherwise =
1043.26 s
[really-safe-money-gen] let resultRational :: Rational
1043.26 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
1043.26 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:327:9-16
1043.26 s
[really-safe-money-gen] @@ -324,7 +324,7 @@
1043.26 s
[really-safe-money-gen] in go resultDouble
1043.26 s
[really-safe-money-gen] where
1043.26 s
[really-safe-money-gen] go resultDouble
1043.26 s
[really-safe-money-gen] - | isNaN d = Nothing
1043.26 s
[really-safe-money-gen] + | n o t ( isNaN d ) = Nothing
1043.26 s
[really-safe-money-gen] | isInfinite d = Nothing
1043.26 s
[really-safe-money-gen] | otherwise =
1043.26 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1043.26 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:323:26-67
1043.26 s
[really-safe-money-gen] @@ -320,7 +320,7 @@
1043.26 s
[really-safe-money-gen] | d < 0 = Nothing
1043.26 s
[really-safe-money-gen] | otherwise =
1043.26 s
[really-safe-money-gen] let resultDouble :: Double
1043.26 s
[really-safe-money-gen] - resultDouble = d * (fromIntegral :: Word32 -> Double) qf
1043.26 s
[really-safe-money-gen] + resultDouble = d - (fromIntegral :: Word32 -> Double) qf
1043.26 s
[really-safe-money-gen] in go resultDouble
1043.26 s
[really-safe-money-gen] where
1043.26 s
[really-safe-money-gen] go resultDouble
1043.26 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:327:9-16
1043.26 s
[really-safe-money-gen] @@ -324,7 +324,7 @@
1043.26 s
[really-safe-money-gen] in go resultDouble
1043.26 s
[really-safe-money-gen] where
1043.26 s
[really-safe-money-gen] go resultDouble
1043.26 s
[really-safe-money-gen] - | i s NaN d = Nothing
1043.26 s
[really-safe-money-gen] + | T rue = Nothing
1043.26 s
[really-safe-money-gen] | isInfinite d = Nothing
1043.26 s
[really-safe-money-gen] | otherwise =
1043.26 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1043.26 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:320:5-10
1043.26 s
[really-safe-money-gen] @@ -317,7 +317,7 @@
1043.26 s
[really-safe-money-gen] Double ->
1043.26 s
[really-safe-money-gen] Maybe Amount
1043.26 s
[really-safe-money-gen] fromDouble (QuantisationFactor qf) d
1043.26 s
[really-safe-money-gen] - | d < 0 = Nothing
1043.26 s
[really-safe-money-gen] + | d > 0 = Nothing
1043.26 s
[really-safe-money-gen] | otherwise =
1043.26 s
[really-safe-money-gen] let resultDouble :: Double
1043.26 s
[really-safe-money-gen] resultDouble = d * (fromIntegral :: Word32 -> Double) qf
1043.26 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:399:18-83
1043.26 s
[really-safe-money-gen] @@ -396,7 +396,7 @@
1043.26 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1043.26 s
[really-safe-money-gen] in if ceiled == floored
1043.26 s
[really-safe-money-gen] then
1043.26 s
[really-safe-money-gen] - if c e il ed > (fromIn tegral :: Word64 - > N a tura l ) (m ax Bound :: Word64)
1043.26 s
[really-safe-money-gen] + if F a l se
1043.26 s
[really-safe-money-gen] then Nothing
1043.26 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1043.26 s
[really-safe-money-gen] else Nothing
1043.26 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:397:14-31
1043.26 s
[really-safe-money-gen] @@ -394,7 +394,7 @@
1043.26 s
[really-safe-money-gen] ceiled = (ceiling :: Rational -> Natural) resultRational
1043.26 s
[really-safe-money-gen] floored :: Natural
1043.26 s
[really-safe-money-gen] floored = (floor :: Rational -> Natural) resultRational
1043.26 s
[really-safe-money-gen] - in if ceiled == floored
1043.26 s
[really-safe-money-gen] + in if n o t ( ceiled == floored )
1043.26 s
[really-safe-money-gen] then
1043.26 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1043.26 s
[really-safe-money-gen] then Nothing
1043.26 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:332:14-40
1043.26 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1043.26 s
[really-safe-money-gen] | otherwise =
1043.26 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1043.26 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1043.26 s
[really-safe-money-gen] - if e x pon ent r e s ult Do u b l e > 65
1043.26 s
[really-safe-money-gen] + if T r u e
1043.26 s
[really-safe-money-gen] then Nothing
1043.27 s
[really-safe-money-gen] else
1043.27 s
[really-safe-money-gen] let ceiled :: Natural
1043.27 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:339:22-39
1043.27 s
[really-safe-money-gen] @@ -336,7 +336,7 @@
1043.27 s
[really-safe-money-gen] ceiled = (ceiling :: Double -> Natural) resultDouble
1043.27 s
[really-safe-money-gen] floored :: Natural
1043.27 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1043.27 s
[really-safe-money-gen] - in if c e il ed = = fl oo r e d
1043.27 s
[really-safe-money-gen] + in if T r u e
1043.27 s
[really-safe-money-gen] then
1043.27 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1043.27 s
[really-safe-money-gen] then Nothing
1043.27 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:341:26-91
1043.27 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
1043.27 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1043.27 s
[really-safe-money-gen] in if ceiled == floored
1043.27 s
[really-safe-money-gen] then
1043.27 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1043.27 s
[really-safe-money-gen] + if ceiled < (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1043.27 s
[really-safe-money-gen] then Nothing
1043.27 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1043.27 s
[really-safe-money-gen] else Nothing
1043.27 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:341:26-91
1043.27 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
1043.27 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1043.27 s
[really-safe-money-gen] in if ceiled == floored
1043.27 s
[really-safe-money-gen] then
1043.27 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1043.27 s
[really-safe-money-gen] + if ceiled < = (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1047.33 s
[really-safe-money-gen] then Nothing
1047.33 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1047.34 s
[really-safe-money-gen] else Nothing
1047.34 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:341:26-91
1047.34 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
1047.34 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1047.34 s
[really-safe-money-gen] in if ceiled == floored
1047.34 s
[really-safe-money-gen] then
1047.34 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1047.34 s
[really-safe-money-gen] + if ceiled > = (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1047.34 s
[really-safe-money-gen] then Nothing
1047.34 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1047.34 s
[really-safe-money-gen] else Nothing
1047.34 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:341:26-91
1047.34 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
1047.34 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1047.34 s
[really-safe-money-gen] in if ceiled == floored
1047.34 s
[really-safe-money-gen] then
1047.34 s
[really-safe-money-gen] - if c e il ed > ( f r o mI n t e g ra l :: Word64 -> Natural) (maxBound :: Word64)
1047.34 s
[really-safe-money-gen] + if T r u e
1047.34 s
[really-safe-money-gen] then Nothing
1047.34 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1047.34 s
[really-safe-money-gen] else Nothing
1047.34 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:341:26-91
1047.34 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
1047.34 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1047.34 s
[really-safe-money-gen] in if ceiled == floored
1047.34 s
[really-safe-money-gen] then
1047.34 s
[really-safe-money-gen] - if c e il ed > (fromIn tegral :: Word64 - > N a tura l ) (m ax Bound :: Word64)
1047.34 s
[really-safe-money-gen] + if F a l se
1047.34 s
[really-safe-money-gen] then Nothing
1047.34 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1047.34 s
[really-safe-money-gen] else Nothing
1047.34 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:332:14-40
1047.34 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1047.34 s
[really-safe-money-gen] | otherwise =
1047.35 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1047.35 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1047.35 s
[really-safe-money-gen] - if e xp one nt r e s ultDoub l e > 65
1047.35 s
[really-safe-money-gen] + if Fa l s e
1047.35 s
[really-safe-money-gen] then Nothing
1047.35 s
[really-safe-money-gen] else
1047.35 s
[really-safe-money-gen] let ceiled :: Natural
1047.35 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:339:22-39
1047.35 s
[really-safe-money-gen] @@ -336,7 +336,7 @@
1047.35 s
[really-safe-money-gen] ceiled = (ceiling :: Double -> Natural) resultDouble
1047.35 s
[really-safe-money-gen] floored :: Natural
1047.35 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1047.35 s
[really-safe-money-gen] - in if ceiled == floored
1047.35 s
[really-safe-money-gen] + in if n o t ( ceiled == floored )
1047.35 s
[really-safe-money-gen] then
1047.35 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1047.35 s
[really-safe-money-gen] then Nothing
1047.35 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:332:14-40
1047.35 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1047.35 s
[really-safe-money-gen] | otherwise =
1047.35 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1047.35 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1047.35 s
[really-safe-money-gen] - if exponent resultDouble > 65
1047.35 s
[really-safe-money-gen] + if n o t ( exponent resultDouble > 65 )
1047.35 s
[really-safe-money-gen] then Nothing
1047.35 s
[really-safe-money-gen] else
1047.35 s
[really-safe-money-gen] let ceiled :: Natural
1047.35 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:339:22-39
1047.35 s
[really-safe-money-gen] @@ -336,7 +336,7 @@
1047.35 s
[really-safe-money-gen] ceiled = (ceiling :: Double -> Natural) resultDouble
1047.35 s
[really-safe-money-gen] floored :: Natural
1047.35 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1047.35 s
[really-safe-money-gen] - in if c e il ed = = f l oo r e d
1047.35 s
[really-safe-money-gen] + in if F a l s e
1047.35 s
[really-safe-money-gen] then
1047.35 s
[really-safe-money-gen] if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1047.35 s
[really-safe-money-gen] then Nothing
1047.35 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:332:14-40
1047.35 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1047.35 s
[really-safe-money-gen] | otherwise =
1047.36 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1047.36 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1047.36 s
[really-safe-money-gen] - if exponent resultDouble > 65
1047.36 s
[really-safe-money-gen] + if exponent resultDouble > = 65
1047.36 s
[really-safe-money-gen] then Nothing
1047.36 s
[really-safe-money-gen] else
1047.36 s
[really-safe-money-gen] let ceiled :: Natural
1047.36 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:389:5-10
1047.36 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
1047.36 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
1047.36 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
1047.36 s
[really-safe-money-gen] | isInvalid r = Nothing
1047.36 s
[really-safe-money-gen] - | r < 0 = Nothing
1047.36 s
[really-safe-money-gen] + | T r u e = Nothing
1047.36 s
[really-safe-money-gen] | otherwise =
1047.36 s
[really-safe-money-gen] let resultRational :: Rational
1047.36 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
1047.36 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:389:9-10
1047.36 s
[really-safe-money-gen] @@ -386,7 +386,7 @@
1047.36 s
[really-safe-money-gen] fromRational :: QuantisationFactor -> Rational -> Maybe Amount
1047.36 s
[really-safe-money-gen] fromRational (QuantisationFactor qf) r
1047.36 s
[really-safe-money-gen] | isInvalid r = Nothing
1047.36 s
[really-safe-money-gen] - | r < 0 = Nothing
1047.36 s
[really-safe-money-gen] + | r < 1 = Nothing
1047.36 s
[really-safe-money-gen] | otherwise =
1047.36 s
[really-safe-money-gen] let resultRational :: Rational
1047.36 s
[really-safe-money-gen] resultRational = r * (fromIntegral :: Word32 -> Rational) qf
1047.36 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:341:26-91
1047.36 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
1047.36 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1047.36 s
[really-safe-money-gen] in if ceiled == floored
1047.36 s
[really-safe-money-gen] then
1047.36 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1047.36 s
[really-safe-money-gen] + if n o t ( ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64) )
1047.36 s
[really-safe-money-gen] then Nothing
1047.36 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1047.36 s
[really-safe-money-gen] else Nothing
1047.36 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:332:14-40
1047.36 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1047.36 s
[really-safe-money-gen] | otherwise =
1047.36 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1047.36 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1047.36 s
[really-safe-money-gen] - if exponent resultDouble > 65
1047.36 s
[really-safe-money-gen] + if exponent resultDouble < = 65
1047.36 s
[really-safe-money-gen] then Nothing
1047.36 s
[really-safe-money-gen] else
1047.36 s
[really-safe-money-gen] let ceiled :: Natural
1047.36 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:494:96-97
1047.36 s
[really-safe-money-gen] @@ -491,7 +491,7 @@
1047.36 s
[really-safe-money-gen] let maxBoundI :: Integer
1047.36 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1047.36 s
[really-safe-money-gen] r :: Integer
1047.36 s
[really-safe-money-gen] - r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1047.36 s
[really-safe-money-gen] + r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 1 l
1047.36 s
[really-safe-money-gen] in if r > maxBoundI
1047.36 s
[really-safe-money-gen] then Nothing
1047.36 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1047.36 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:494:29-94
1047.36 s
[really-safe-money-gen] @@ -491,7 +491,7 @@
1047.36 s
[really-safe-money-gen] let maxBoundI :: Integer
1047.36 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1047.36 s
[really-safe-money-gen] r :: Integer
1047.36 s
[really-safe-money-gen] - r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1047.37 s
[really-safe-money-gen] + r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) * acc) 0 l
1047.37 s
[really-safe-money-gen] in if r > maxBoundI
1047.37 s
[really-safe-money-gen] then Nothing
1053.95 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1053.98 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:494:29-94
1053.98 s
[really-safe-money-gen] @@ -491,7 +491,7 @@
1053.98 s
[really-safe-money-gen] let maxBoundI :: Integer
1053.98 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1053.98 s
[really-safe-money-gen] r :: Integer
1053.98 s
[really-safe-money-gen] - r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1053.98 s
[really-safe-money-gen] + r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) - acc) 0 l
1053.98 s
[really-safe-money-gen] in if r > maxBoundI
1053.98 s
[really-safe-money-gen] then Nothing
1053.98 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1053.98 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/QuantisationFactor.hs:40:57-63
1053.98 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
1053.98 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1053.98 s
[really-safe-money-gen] mconcat
1053.98 s
[really-safe-money-gen] [ genericValidate qf,
1053.98 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
1053.98 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ Tru e
1053.98 s
[really-safe-money-gen] ]
1053.98 s
[really-safe-money-gen]
1053.98 s
[really-safe-money-gen] instance NFData QuantisationFactor
1053.99 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:495:10-23
1053.99 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
1053.99 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1053.99 s
[really-safe-money-gen] r :: Integer
1053.99 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1053.99 s
[really-safe-money-gen] - in if r > max Bo u n d I
1053.99 s
[really-safe-money-gen] + in if T r u e
1053.99 s
[really-safe-money-gen] then Nothing
1053.99 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1053.99 s
[really-safe-money-gen]
1053.99 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:495:10-23
1053.99 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
1053.99 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1053.99 s
[really-safe-money-gen] r :: Integer
1053.99 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1053.99 s
[really-safe-money-gen] - in if r > m a xB ound I
1053.99 s
[really-safe-money-gen] + in if F a l se
1053.99 s
[really-safe-money-gen] then Nothing
1053.99 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1053.99 s
[really-safe-money-gen]
1053.99 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:495:10-23
1053.99 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
1053.99 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1053.99 s
[really-safe-money-gen] r :: Integer
1053.99 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1053.99 s
[really-safe-money-gen] - in if r > maxBoundI
1053.99 s
[really-safe-money-gen] + in if r < maxBoundI
1053.99 s
[really-safe-money-gen] then Nothing
1053.99 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1053.99 s
[really-safe-money-gen]
1053.99 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:495:10-23
1053.99 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
1053.99 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1054.00 s
[really-safe-money-gen] r :: Integer
1054.00 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1054.00 s
[really-safe-money-gen] - in if r > maxBoundI
1054.00 s
[really-safe-money-gen] + in if r < = maxBoundI
1054.00 s
[really-safe-money-gen] then Nothing
1054.00 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1054.00 s
[really-safe-money-gen]
1054.00 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:495:10-23
1054.00 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
1054.00 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1054.00 s
[really-safe-money-gen] r :: Integer
1054.00 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1054.00 s
[really-safe-money-gen] - in if r > maxBoundI
1054.00 s
[really-safe-money-gen] + in if r > = maxBoundI
1054.00 s
[really-safe-money-gen] then Nothing
1054.00 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1054.00 s
[really-safe-money-gen]
1054.00 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:332:38-40
1054.00 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1054.00 s
[really-safe-money-gen] | otherwise =
1054.00 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1054.00 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1054.00 s
[really-safe-money-gen] - if exponent resultDouble > 65
1054.00 s
[really-safe-money-gen] + if exponent resultDouble > - 65
1054.00 s
[really-safe-money-gen] then Nothing
1054.00 s
[really-safe-money-gen] else
1054.00 s
[really-safe-money-gen] let ceiled :: Natural
1054.00 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:328:9-21
1054.00 s
[really-safe-money-gen] @@ -325,7 +325,7 @@
1054.00 s
[really-safe-money-gen] where
1054.00 s
[really-safe-money-gen] go resultDouble
1054.00 s
[really-safe-money-gen] | isNaN d = Nothing
1054.00 s
[really-safe-money-gen] - | isInfinite d = Nothing
1054.00 s
[really-safe-money-gen] + | n o t ( isInfinite d ) = Nothing
1054.00 s
[really-safe-money-gen] | otherwise =
1054.00 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1054.00 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1054.00 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:290:79-80
1054.00 s
[really-safe-money-gen] @@ -287,7 +287,7 @@
1054.00 s
[really-safe-money-gen] -- >>> toRatio (QuantisationFactor 100) (Amount 1)
1054.00 s
[really-safe-money-gen] -- 1 % 100
1054.00 s
[really-safe-money-gen] toRatio :: QuantisationFactor -> Amount -> Ratio Natural
1054.00 s
[really-safe-money-gen] - toRatio (QuantisationFactor 0) a = fromIntegral (toMinimalQuantisations a) :% 0
1054.00 s
[really-safe-money-gen] + toRatio (QuantisationFactor 0) a = fromIntegral (toMinimalQuantisations a) :% 1
1054.00 s
[really-safe-money-gen] toRatio (QuantisationFactor quantisationFactor) a =
1054.00 s
[really-safe-money-gen] (fromIntegral :: Word64 -> Natural) (toMinimalQuantisations a)
1054.00 s
[really-safe-money-gen] % (fromIntegral :: Word32 -> Natural) quantisationFactor
1054.00 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Amount.hs:668:17-30
1054.01 s
[really-safe-money-gen] @@ -665,10 +665,9 @@
1054.01 s
[really-safe-money-gen] theoreticalResult :: Ratio Natural
1054.01 s
[really-safe-money-gen] theoreticalResult = amountAsRatio * f
1054.01 s
[really-safe-money-gen] rounder :: Ratio Natural -> Natural
1054.01 s
[really-safe-money-gen] rounder = case r of
1054.01 s
[really-safe-money-gen] RoundUp -> ceiling
1054.01 s
[really-safe-money-gen] - RoundDown -> floor
1054.01 s
[really-safe-money-gen] RoundNearest -> round
1054.01 s
[really-safe-money-gen] roundedResult :: Natural
1054.01 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1054.01 s
[really-safe-money-gen] actualRate :: Ratio Natural
1054.01 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Amount.hs:668:17-30
1054.01 s
[really-safe-money-gen] @@ -665,10 +665,9 @@
1054.01 s
[really-safe-money-gen] theoreticalResult :: Ratio Natural
1054.01 s
[really-safe-money-gen] theoreticalResult = amountAsRatio * f
1054.01 s
[really-safe-money-gen] rounder :: Ratio Natural -> Natural
1054.01 s
[really-safe-money-gen] rounder = case r of
1054.01 s
[really-safe-money-gen] RoundUp -> ceiling
1054.01 s
[really-safe-money-gen] RoundDown -> floor
1054.01 s
[really-safe-money-gen] - RoundNearest -> round
1054.01 s
[really-safe-money-gen] roundedResult :: Natural
1054.01 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1054.01 s
[really-safe-money-gen] actualRate :: Ratio Natural
1054.01 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:681:12-37
1054.01 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
1054.01 s
[really-safe-money-gen] maxBoundN :: Natural
1054.01 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1054.01 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
1054.01 s
[really-safe-money-gen] - in ( if roundedResult > maxBoundN
1054.01 s
[really-safe-money-gen] + in ( if roundedResult < maxBoundN
1054.01 s
[really-safe-money-gen] then Nothing
1054.01 s
[really-safe-money-gen] else Just result,
1054.01 s
[really-safe-money-gen] actualRate
1054.01 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:250:15-16
1054.01 s
[really-safe-money-gen] @@ -247,7 +247,7 @@
1054.01 s
[really-safe-money-gen] -- >>> zero
1054.01 s
[really-safe-money-gen] -- Amount 0
1054.01 s
[really-safe-money-gen] zero :: Amount
1054.01 s
[really-safe-money-gen] - zero = Amount 0
1054.01 s
[really-safe-money-gen] + zero = Amount 1
1054.01 s
[really-safe-money-gen]
1054.01 s
[really-safe-money-gen] -- | Turn an amount into a number of minimal quantisations.
1054.01 s
[really-safe-money-gen] --
1054.01 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:681:12-37
1054.01 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
1054.01 s
[really-safe-money-gen] maxBoundN :: Natural
1054.01 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1054.01 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
1054.01 s
[really-safe-money-gen] - in ( if roundedResult > maxBoundN
1054.01 s
[really-safe-money-gen] + in ( if roundedResult < = maxBoundN
1054.01 s
[really-safe-money-gen] then Nothing
1054.01 s
[really-safe-money-gen] else Just result,
1054.01 s
[really-safe-money-gen] actualRate
1054.01 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:681:12-37
1054.01 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
1054.01 s
[really-safe-money-gen] maxBoundN :: Natural
1054.01 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1054.01 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
1054.01 s
[really-safe-money-gen] - in ( if roundedResult > maxBoundN
1054.01 s
[really-safe-money-gen] + in ( if roundedResult > = maxBoundN
1054.02 s
[really-safe-money-gen] then Nothing
1054.02 s
[really-safe-money-gen] else Just result,
1054.02 s
[really-safe-money-gen] actualRate
1054.02 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/Amount.hs:497:14-66
1054.02 s
[really-safe-money-gen] @@ -494,7 +494,7 @@
1054.02 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1054.02 s
[really-safe-money-gen] in if r > maxBoundI
1054.02 s
[really-safe-money-gen] then Nothing
1054.02 s
[really-safe-money-gen] - else J u s t ( Am o u n t ( (f rom I n t e g er :: Integer -> Word64) r))
1054.02 s
[really-safe-money-gen] + else N o t hi n g
1054.02 s
[really-safe-money-gen]
1054.02 s
[really-safe-money-gen] -- | Add two amounts of money.
1054.02 s
[really-safe-money-gen] --
1058.08 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:681:12-37
1058.08 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
1058.08 s
[really-safe-money-gen] maxBoundN :: Natural
1058.08 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1058.08 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
1058.08 s
[really-safe-money-gen] - in ( if r o u n ded R e s u lt > maxBoundN
1058.08 s
[really-safe-money-gen] + in ( if T r u e
1058.08 s
[really-safe-money-gen] then Nothing
1058.08 s
[really-safe-money-gen] else Just result,
1058.08 s
[really-safe-money-gen] actualRate
1058.08 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:681:12-37
1058.08 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
1058.08 s
[really-safe-money-gen] maxBoundN :: Natural
1058.08 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1058.08 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
1058.08 s
[really-safe-money-gen] - in ( if r ou nde dResult > m a xBo u ndN
1058.08 s
[really-safe-money-gen] + in ( if F a l se
1058.08 s
[really-safe-money-gen] then Nothing
1058.08 s
[really-safe-money-gen] else Just result,
1058.08 s
[really-safe-money-gen] actualRate
1058.08 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:666:27-44
1058.08 s
[really-safe-money-gen] @@ -663,7 +663,7 @@
1058.08 s
[really-safe-money-gen] let amountAsRatio :: Ratio Natural
1058.08 s
[really-safe-money-gen] amountAsRatio = (fromIntegral :: Word64 -> Ratio Natural) a
1058.08 s
[really-safe-money-gen] theoreticalResult :: Ratio Natural
1058.08 s
[really-safe-money-gen] - theoreticalResult = amountAsRatio * f
1058.08 s
[really-safe-money-gen] + theoreticalResult = amountAsRatio - f
1058.08 s
[really-safe-money-gen] rounder :: Ratio Natural -> Natural
1058.08 s
[really-safe-money-gen] rounder = case r of
1058.08 s
[really-safe-money-gen] RoundUp -> ceiling
1058.08 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:661:30-31
1058.08 s
[really-safe-money-gen] @@ -658,7 +658,7 @@
1058.08 s
[really-safe-money-gen] -- | The amount and the real rate that was used, considering the 'Rounding'
1058.08 s
[really-safe-money-gen] (Maybe Amount, Ratio Natural)
1058.09 s
[really-safe-money-gen] fraction _ (Amount 0) f = (Just zero, f)
1058.09 s
[really-safe-money-gen] - fraction _ _ 0 = (Just zero, 0 )
1058.09 s
[really-safe-money-gen] + fraction _ _ 0 = (Just zero, 1 )
1058.09 s
[really-safe-money-gen] fraction r (Amount a) f =
1058.09 s
[really-safe-money-gen] let amountAsRatio :: Ratio Natural
1058.09 s
[really-safe-money-gen] amountAsRatio = (fromIntegral :: Word64 -> Ratio Natural) a
1058.09 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:806:79-92
1058.09 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
1058.09 s
[really-safe-money-gen]
1058.09 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1058.09 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
1058.09 s
[really-safe-money-gen] - validateStrictlyPositive amount = declare "The Amount is strictly positive" $ a m o u n t > z e r o
1058.09 s
[really-safe-money-gen] + validateStrictlyPositive amount = declare "The Amount is strictly positive" $ Tr u e
1058.09 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:806:79-92
1058.09 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
1058.09 s
[really-safe-money-gen]
1058.09 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1058.09 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
1058.09 s
[really-safe-money-gen] - validateStrictlyPositive amount = declare "The Amount is strictly positive" $ a m ou nt > z e r o
1058.09 s
[really-safe-money-gen] + validateStrictlyPositive amount = declare "The Amount is strictly positive" $ F a ls e
1058.09 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/Amount.hs:661:19-28
1058.09 s
[really-safe-money-gen] @@ -658,7 +658,7 @@
1058.09 s
[really-safe-money-gen] -- | The amount and the real rate that was used, considering the 'Rounding'
1058.09 s
[really-safe-money-gen] (Maybe Amount, Ratio Natural)
1058.09 s
[really-safe-money-gen] fraction _ (Amount 0) f = (Just zero, f)
1058.09 s
[really-safe-money-gen] - fraction _ _ 0 = ( J u st ze r o , 0)
1058.09 s
[really-safe-money-gen] + fraction _ _ 0 = ( N o th in g , 0)
1058.09 s
[really-safe-money-gen] fraction r (Amount a) f =
1058.09 s
[really-safe-money-gen] let amountAsRatio :: Ratio Natural
1058.09 s
[really-safe-money-gen] amountAsRatio = (fromIntegral :: Word64 -> Ratio Natural) a
1058.09 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/Amount.hs:660:28-37
1058.09 s
[really-safe-money-gen] @@ -657,7 +657,7 @@
1058.10 s
[really-safe-money-gen] Ratio Natural ->
1058.10 s
[really-safe-money-gen] -- | The amount and the real rate that was used, considering the 'Rounding'
1058.10 s
[really-safe-money-gen] (Maybe Amount, Ratio Natural)
1058.10 s
[really-safe-money-gen] - fraction _ (Amount 0) f = ( J u st ze r o , f)
1058.10 s
[really-safe-money-gen] + fraction _ (Amount 0) f = ( N o th in g , f)
1058.10 s
[really-safe-money-gen] fraction _ _ 0 = (Just zero, 0)
1058.10 s
[really-safe-money-gen] fraction r (Amount a) f =
1058.10 s
[really-safe-money-gen] let amountAsRatio :: Ratio Natural
1058.10 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:762:40-49
1058.10 s
[really-safe-money-gen] @@ -759,7 +759,7 @@
1058.10 s
[really-safe-money-gen] let qf1r = Prelude.fromIntegral (QuantisationFactor.unQuantisationFactor qf1)
1058.10 s
[really-safe-money-gen] qf2r = Prelude.fromIntegral (QuantisationFactor.unQuantisationFactor qf2)
1058.10 s
[really-safe-money-gen] (ma, ar) = fraction rounding a (ConversionRate.conversionFactor qf1 cr qf2)
1058.10 s
[really-safe-money-gen] - in (ma, ConversionRate.fromRatio (ar * qf1r / qf2r))
1058.10 s
[really-safe-money-gen] + in (ma, ConversionRate.fromRatio (ar + qf1r / qf2r))
1058.10 s
[really-safe-money-gen]
1058.10 s
[really-safe-money-gen] -- | Format an amount of money without a symbol.
1058.10 s
[really-safe-money-gen] --
1058.10 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:806:79-92
1058.10 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
1058.10 s
[really-safe-money-gen]
1058.10 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1058.10 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
1058.10 s
[really-safe-money-gen] - validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount > zero
1058.10 s
[really-safe-money-gen] + validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount > = zero
1058.10 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:495:10-23
1058.10 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
1058.10 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1058.10 s
[really-safe-money-gen] r :: Integer
1058.10 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1058.10 s
[really-safe-money-gen] - in if r > maxBoundI
1058.10 s
[really-safe-money-gen] + in if n o t ( r > maxBoundI )
1058.10 s
[really-safe-money-gen] then Nothing
1058.10 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1058.10 s
[really-safe-money-gen]
1058.10 s
[really-safe-money-gen] Testing mutation IntLit at src/Money/Amount.hs:332:38-40
1058.10 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1058.10 s
[really-safe-money-gen] | otherwise =
1058.10 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1058.10 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1058.10 s
[really-safe-money-gen] - if exponent resultDouble > 6 5
1058.10 s
[really-safe-money-gen] + if exponent resultDouble > 1
1058.10 s
[really-safe-money-gen] then Nothing
1058.10 s
[really-safe-money-gen] else
1058.10 s
[really-safe-money-gen] let ceiled :: Natural
1058.10 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:762:40-49
1058.10 s
[really-safe-money-gen] @@ -759,7 +759,7 @@
1058.10 s
[really-safe-money-gen] let qf1r = Prelude.fromIntegral (QuantisationFactor.unQuantisationFactor qf1)
1058.10 s
[really-safe-money-gen] qf2r = Prelude.fromIntegral (QuantisationFactor.unQuantisationFactor qf2)
1058.10 s
[really-safe-money-gen] (ma, ar) = fraction rounding a (ConversionRate.conversionFactor qf1 cr qf2)
1058.10 s
[really-safe-money-gen] - in (ma, ConversionRate.fromRatio (ar * qf1r / qf2r))
1058.10 s
[really-safe-money-gen] + in (ma, ConversionRate.fromRatio (ar - qf1r / qf2r))
1058.10 s
[really-safe-money-gen]
1058.10 s
[really-safe-money-gen] -- | Format an amount of money without a symbol.
1058.10 s
[really-safe-money-gen] --
1058.10 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Amount.hs:668:17-30
1058.10 s
[really-safe-money-gen] @@ -665,10 +665,9 @@
1058.10 s
[really-safe-money-gen] theoreticalResult :: Ratio Natural
1058.10 s
[really-safe-money-gen] theoreticalResult = amountAsRatio * f
1058.10 s
[really-safe-money-gen] rounder :: Ratio Natural -> Natural
1058.10 s
[really-safe-money-gen] rounder = case r of
1058.10 s
[really-safe-money-gen] - RoundUp -> ceiling
1058.10 s
[really-safe-money-gen] RoundDown -> floor
1058.10 s
[really-safe-money-gen] RoundNearest -> round
1058.10 s
[really-safe-money-gen] roundedResult :: Natural
1058.10 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1058.10 s
[really-safe-money-gen] actualRate :: Ratio Natural
1058.10 s
[really-safe-money-gen] Testing mutation Arith at src/Money/Amount.hs:666:27-44
1058.10 s
[really-safe-money-gen] @@ -663,7 +663,7 @@
1058.10 s
[really-safe-money-gen] let amountAsRatio :: Ratio Natural
1058.10 s
[really-safe-money-gen] amountAsRatio = (fromIntegral :: Word64 -> Ratio Natural) a
1058.10 s
[really-safe-money-gen] theoreticalResult :: Ratio Natural
1058.10 s
[really-safe-money-gen] - theoreticalResult = amountAsRatio * f
1058.10 s
[really-safe-money-gen] + theoreticalResult = amountAsRatio + f
1058.11 s
[really-safe-money-gen] rounder :: Ratio Natural -> Natural
1058.11 s
[really-safe-money-gen] rounder = case r of
1058.11 s
[really-safe-money-gen] RoundUp -> ceiling
1058.11 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:806:79-92
1058.11 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
1058.11 s
[really-safe-money-gen]
1058.11 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1058.11 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
1058.11 s
[really-safe-money-gen] - validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount > zero
1058.11 s
[really-safe-money-gen] + validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount < = zero
1064.24 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:806:79-92
1064.24 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
1064.24 s
[really-safe-money-gen]
1064.27 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1064.27 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
1064.27 s
[really-safe-money-gen] - validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount > zero
1064.27 s
[really-safe-money-gen] + validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount < zero
1064.27 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:806:79-92
1064.27 s
[really-safe-money-gen] @@ -803,4 +803,4 @@
1064.27 s
[really-safe-money-gen]
1064.27 s
[really-safe-money-gen] -- | Validate that an 'Amount' is strictly positive. I.e. not 'zero'.
1064.27 s
[really-safe-money-gen] validateStrictlyPositive :: Amount -> Validation
1064.27 s
[really-safe-money-gen] - validateStrictlyPositive amount = declare "The Amount is strictly positive" $ amount > zero
1064.27 s
[really-safe-money-gen] + validateStrictlyPositive amount = declare "The Amount is strictly positive" $ n o t ( amount > zero )
1064.27 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:607:15-22
1064.27 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
1064.27 s
[really-safe-money-gen] case ad of
1064.27 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.27 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1064.27 s
[really-safe-money-gen] - a 1 > a 2
1064.27 s
[really-safe-money-gen] + F a l s e
1064.27 s
[really-safe-money-gen] _ -> valid
1064.27 s
[really-safe-money-gen] ]
1064.27 s
[really-safe-money-gen]
1064.27 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:607:15-22
1064.27 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
1064.27 s
[really-safe-money-gen] case ad of
1064.27 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.27 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1064.27 s
[really-safe-money-gen] - a1 > a2
1064.27 s
[really-safe-money-gen] + n o t ( a1 > a2 )
1064.27 s
[really-safe-money-gen] _ -> valid
1064.27 s
[really-safe-money-gen] ]
1064.27 s
[really-safe-money-gen]
1064.27 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:607:15-22
1064.27 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
1064.27 s
[really-safe-money-gen] case ad of
1064.27 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.27 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1064.27 s
[really-safe-money-gen] - a1 > a2
1064.27 s
[really-safe-money-gen] + a1 < = a2
1064.27 s
[really-safe-money-gen] _ -> valid
1064.27 s
[really-safe-money-gen] ]
1064.27 s
[really-safe-money-gen]
1064.27 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:607:15-22
1064.27 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
1064.27 s
[really-safe-money-gen] case ad of
1064.27 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.28 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1064.28 s
[really-safe-money-gen] - a1 > a2
1064.28 s
[really-safe-money-gen] + a1 > = a2
1064.28 s
[really-safe-money-gen] _ -> valid
1064.28 s
[really-safe-money-gen] ]
1064.28 s
[really-safe-money-gen]
1064.28 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount.hs:607:15-22
1064.28 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
1064.28 s
[really-safe-money-gen] case ad of
1064.28 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.28 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1064.28 s
[really-safe-money-gen] - a 1 > a2
1064.28 s
[really-safe-money-gen] + T rue
1064.28 s
[really-safe-money-gen] _ -> valid
1064.28 s
[really-safe-money-gen] ]
1064.28 s
[really-safe-money-gen]
1064.28 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount.hs:607:15-22
1064.28 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
1064.28 s
[really-safe-money-gen] case ad of
1064.28 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.28 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1064.28 s
[really-safe-money-gen] - a1 > a2
1064.28 s
[really-safe-money-gen] + a1 < a2
1064.28 s
[really-safe-money-gen] _ -> valid
1064.28 s
[really-safe-money-gen] ]
1064.28 s
[really-safe-money-gen]
1064.28 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount.hs:681:12-37
1064.28 s
[really-safe-money-gen] @@ -678,7 +678,7 @@
1064.28 s
[really-safe-money-gen] maxBoundN :: Natural
1064.28 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1064.28 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
1064.28 s
[really-safe-money-gen] - in ( if roundedResult > maxBoundN
1064.28 s
[really-safe-money-gen] + in ( if n o t ( roundedResult > maxBoundN )
1064.28 s
[really-safe-money-gen] then Nothing
1064.28 s
[really-safe-money-gen] else Just result,
1064.28 s
[really-safe-money-gen] actualRate
1064.28 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/Amount.hs:683:16-27
1064.28 s
[really-safe-money-gen] @@ -680,7 +680,7 @@
1064.28 s
[really-safe-money-gen] result = Amount ((fromIntegral :: Natural -> Word64) roundedResult)
1064.28 s
[really-safe-money-gen] in ( if roundedResult > maxBoundN
1064.28 s
[really-safe-money-gen] then Nothing
1064.28 s
[really-safe-money-gen] - else J us t r es ul t ,
1064.28 s
[really-safe-money-gen] + else No t hi n g ,
1064.28 s
[really-safe-money-gen] actualRate
1064.28 s
[really-safe-money-gen] )
1064.28 s
[really-safe-money-gen]
1064.28 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount.hs:603:7-8
1064.28 s
[really-safe-money-gen] @@ -600,13 +600,12 @@
1064.28 s
[really-safe-money-gen] instance (Validity amount, Ord amount) => Validity (Distribution amount) where
1064.28 s
[really-safe-money-gen] validate ad =
1064.28 s
[really-safe-money-gen] mconcat
1064.28 s
[really-safe-money-gen] - [ genericValidate ad,
1064.28 s
[really-safe-money-gen] case ad of
1064.28 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.28 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1064.28 s
[really-safe-money-gen] a1 > a2
1064.28 s
[really-safe-money-gen] _ -> valid
1064.28 s
[really-safe-money-gen] ]
1064.28 s
[really-safe-money-gen]
1064.28 s
[really-safe-money-gen] instance (NFData amount) => NFData (Distribution amount)
1064.28 s
[really-safe-money-gen]
1064.28 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount.hs:603:7-8
1064.28 s
[really-safe-money-gen] @@ -600,13 +600,7 @@
1064.28 s
[really-safe-money-gen] instance (Validity amount, Ord amount) => Validity (Distribution amount) where
1064.28 s
[really-safe-money-gen] validate ad =
1064.28 s
[really-safe-money-gen] mconcat
1064.28 s
[really-safe-money-gen] - [ genericValidate ad,
1064.28 s
[really-safe-money-gen] - case ad of
1064.28 s
[really-safe-money-gen] - DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.28 s
[really-safe-money-gen] - declare "The larger chunks are larger" $
1064.29 s
[really-safe-money-gen] - a1 > a2
1064.29 s
[really-safe-money-gen] - _ -> valid
1064.29 s
[really-safe-money-gen] ]
1064.29 s
[really-safe-money-gen]
1064.29 s
[really-safe-money-gen] instance (NFData amount) => NFData (Distribution amount)
1064.29 s
[really-safe-money-gen]
1064.29 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Amount.hs:604:9-21
1064.29 s
[really-safe-money-gen] @@ -601,11 +601,10 @@
1064.29 s
[really-safe-money-gen] validate ad =
1064.29 s
[really-safe-money-gen] mconcat
1064.29 s
[really-safe-money-gen] [ genericValidate ad,
1064.29 s
[really-safe-money-gen] case ad of
1064.29 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.29 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1064.29 s
[really-safe-money-gen] a1 > a2
1064.29 s
[really-safe-money-gen] - _ -> valid
1064.29 s
[really-safe-money-gen] ]
1064.29 s
[really-safe-money-gen]
1064.29 s
[really-safe-money-gen] instance (NFData amount) => NFData (Distribution amount)
1064.29 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
1064.29 s
[really-safe-money-gen] @@ -156,10 +156,9 @@
1064.29 s
[really-safe-money-gen] fmap
1064.29 s
[really-safe-money-gen] ( ( \theoreticalResult ->
1064.29 s
[really-safe-money-gen] let rounder :: Ratio Natural -> Natural
1064.29 s
[really-safe-money-gen] rounder = case r of
1064.29 s
[really-safe-money-gen] - RoundUp -> ceiling
1064.29 s
[really-safe-money-gen] RoundDown -> floor
1064.29 s
[really-safe-money-gen] RoundNearest -> round
1064.29 s
[really-safe-money-gen] roundedResult :: Natural
1064.29 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1064.29 s
[really-safe-money-gen] maxBoundN :: Natural
1064.29 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
1064.29 s
[really-safe-money-gen] @@ -156,10 +156,9 @@
1064.29 s
[really-safe-money-gen] fmap
1064.29 s
[really-safe-money-gen] ( ( \theoreticalResult ->
1064.29 s
[really-safe-money-gen] let rounder :: Ratio Natural -> Natural
1064.29 s
[really-safe-money-gen] rounder = case r of
1064.29 s
[really-safe-money-gen] RoundUp -> ceiling
1064.29 s
[really-safe-money-gen] - RoundDown -> floor
1064.29 s
[really-safe-money-gen] RoundNearest -> round
1064.29 s
[really-safe-money-gen] roundedResult :: Natural
1064.29 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1064.29 s
[really-safe-money-gen] maxBoundN :: Natural
1064.29 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Amount.hs:604:9-21
1064.29 s
[really-safe-money-gen] @@ -601,11 +601,8 @@
1064.29 s
[really-safe-money-gen] validate ad =
1064.29 s
[really-safe-money-gen] mconcat
1064.29 s
[really-safe-money-gen] [ genericValidate ad,
1064.29 s
[really-safe-money-gen] case ad of
1064.29 s
[really-safe-money-gen] - DistributedIntoUnequalChunks _ a1 _ a2 ->
1064.29 s
[really-safe-money-gen] - declare "The larger chunks are larger" $
1064.29 s
[really-safe-money-gen] - a1 > a2
1064.29 s
[really-safe-money-gen] _ -> valid
1064.29 s
[really-safe-money-gen] ]
1064.29 s
[really-safe-money-gen]
1064.29 s
[really-safe-money-gen] instance (NFData amount) => NFData (Distribution amount)
1064.29 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/MultiAmount.hs:99:28-34
1064.29 s
[really-safe-money-gen] @@ -96,7 +96,7 @@
1064.29 s
[really-safe-money-gen]
1064.29 s
[really-safe-money-gen] -- | Add an 'Amount' to a 'MultiAmount'
1064.29 s
[really-safe-money-gen] addAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1064.29 s
[really-safe-money-gen] - addAmount m _ (Amount 0) = J u s t m
1064.29 s
[really-safe-money-gen] + addAmount m _ (Amount 0) = No t h ing
1064.29 s
[really-safe-money-gen] addAmount (MultiAmount m) currency amount =
1064.29 s
[really-safe-money-gen] fmap MultiAmount $ case M.lookup currency m of
1064.29 s
[really-safe-money-gen] Nothing -> Just $ M.insert currency amount m
1064.29 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:106:12-28
1064.29 s
[really-safe-money-gen] @@ -103,7 +103,7 @@
1064.29 s
[really-safe-money-gen] Just a -> do
1064.29 s
[really-safe-money-gen] r <- Amount.add a amount
1064.29 s
[really-safe-money-gen] Just $
1064.29 s
[really-safe-money-gen] - if r == A mount .z e ro
1064.29 s
[really-safe-money-gen] + if Fal s e
1064.29 s
[really-safe-money-gen] then M.delete currency m
1064.30 s
[really-safe-money-gen] else M.insert currency r m
1064.30 s
[really-safe-money-gen]
1064.30 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:106:12-28
1064.30 s
[really-safe-money-gen] @@ -103,7 +103,7 @@
1064.30 s
[really-safe-money-gen] Just a -> do
1064.30 s
[really-safe-money-gen] r <- Amount.add a amount
1064.30 s
[really-safe-money-gen] Just $
1064.30 s
[really-safe-money-gen] - if r == Amount.zero
1069.85 s
[really-safe-money-gen] + if n o t ( r == Amount.zero )
1069.88 s
[really-safe-money-gen] then M.delete currency m
1069.88 s
[really-safe-money-gen] else M.insert currency r m
1069.88 s
[really-safe-money-gen]
1069.88 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:114:22-37
1069.88 s
[really-safe-money-gen] @@ -111,14 +111,8 @@
1069.88 s
[really-safe-money-gen] subtractAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1069.88 s
[really-safe-money-gen] subtractAmount m _ (Amount 0) = Just m
1069.88 s
[really-safe-money-gen] subtractAmount (MultiAmount m) currency amount =
1069.88 s
[really-safe-money-gen] fmap MultiAmount $ case M.lookup currency m of
1069.88 s
[really-safe-money-gen] Nothing -> Nothing -- Can't go below zero
1069.88 s
[really-safe-money-gen] - Just a -> do
1069.88 s
[really-safe-money-gen] - r <- Amount.subtract a amount
1069.88 s
[really-safe-money-gen] - Just $
1069.88 s
[really-safe-money-gen] - if r == Amount.zero
1069.88 s
[really-safe-money-gen] - then M.delete currency m
1069.88 s
[really-safe-money-gen] - else M.insert currency r m
1069.88 s
[really-safe-money-gen]
1069.88 s
[really-safe-money-gen] -- | Try to convert every amount to one currency.
1069.88 s
[really-safe-money-gen] --
1069.88 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:101:22-37
1069.88 s
[really-safe-money-gen] @@ -98,14 +98,13 @@
1069.88 s
[really-safe-money-gen] addAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1069.88 s
[really-safe-money-gen] addAmount m _ (Amount 0) = Just m
1069.88 s
[really-safe-money-gen] addAmount (MultiAmount m) currency amount =
1069.89 s
[really-safe-money-gen] fmap MultiAmount $ case M.lookup currency m of
1069.89 s
[really-safe-money-gen] - Nothing -> Just $ M.insert currency amount m
1069.89 s
[really-safe-money-gen] Just a -> do
1069.89 s
[really-safe-money-gen] r <- Amount.add a amount
1069.89 s
[really-safe-money-gen] Just $
1069.89 s
[really-safe-money-gen] if r == Amount.zero
1069.89 s
[really-safe-money-gen] then M.delete currency m
1069.89 s
[really-safe-money-gen] else M.insert currency r m
1069.89 s
[really-safe-money-gen]
1069.89 s
[really-safe-money-gen] -- | Subtract an 'Amount' from a 'MultiAmount'
1069.89 s
[really-safe-money-gen] subtractAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1069.89 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:106:12-28
1069.89 s
[really-safe-money-gen] @@ -103,7 +103,7 @@
1069.89 s
[really-safe-money-gen] Just a -> do
1069.89 s
[really-safe-money-gen] r <- Amount.add a amount
1069.89 s
[really-safe-money-gen] Just $
1069.89 s
[really-safe-money-gen] - if r == Am o u n t. z e r o
1069.89 s
[really-safe-money-gen] + if T r u e
1069.89 s
[really-safe-money-gen] then M.delete currency m
1069.89 s
[really-safe-money-gen] else M.insert currency r m
1069.89 s
[really-safe-money-gen]
1069.89 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:101:22-37
1069.89 s
[really-safe-money-gen] @@ -98,14 +98,8 @@
1069.89 s
[really-safe-money-gen] addAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1069.89 s
[really-safe-money-gen] addAmount m _ (Amount 0) = Just m
1069.89 s
[really-safe-money-gen] addAmount (MultiAmount m) currency amount =
1069.89 s
[really-safe-money-gen] fmap MultiAmount $ case M.lookup currency m of
1069.89 s
[really-safe-money-gen] Nothing -> Just $ M.insert currency amount m
1069.89 s
[really-safe-money-gen] - Just a -> do
1069.89 s
[really-safe-money-gen] - r <- Amount.add a amount
1069.89 s
[really-safe-money-gen] - Just $
1069.89 s
[really-safe-money-gen] - if r == Amount.zero
1069.89 s
[really-safe-money-gen] - then M.delete currency m
1069.89 s
[really-safe-money-gen] - else M.insert currency r m
1069.89 s
[really-safe-money-gen]
1069.89 s
[really-safe-money-gen] -- | Subtract an 'Amount' from a 'MultiAmount'
1069.89 s
[really-safe-money-gen] subtractAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1069.90 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:73:6-27
1069.90 s
[really-safe-money-gen] @@ -70,7 +70,7 @@
1069.90 s
[really-safe-money-gen]
1069.90 s
[really-safe-money-gen] fromAmount :: currency -> Amount -> MultiAmount currency
1069.90 s
[really-safe-money-gen] fromAmount currency amount =
1069.90 s
[really-safe-money-gen] - if a m o u n t == Amoun t.z e ro
1069.90 s
[really-safe-money-gen] + if Tr u e
1069.90 s
[really-safe-money-gen] then zero
1069.90 s
[really-safe-money-gen] else MultiAmount $ M.singleton currency amount
1069.90 s
[really-safe-money-gen]
1069.90 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:73:6-27
1069.90 s
[really-safe-money-gen] @@ -70,7 +70,7 @@
1069.90 s
[really-safe-money-gen]
1069.90 s
[really-safe-money-gen] fromAmount :: currency -> Amount -> MultiAmount currency
1069.90 s
[really-safe-money-gen] fromAmount currency amount =
1069.90 s
[really-safe-money-gen] - if a m o unt == A mou n t.z e ro
1069.90 s
[really-safe-money-gen] + if F a ls e
1069.90 s
[really-safe-money-gen] then zero
1069.90 s
[really-safe-money-gen] else MultiAmount $ M.singleton currency amount
1069.90 s
[really-safe-money-gen]
1069.90 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:73:6-27
1069.90 s
[really-safe-money-gen] @@ -70,7 +70,7 @@
1069.90 s
[really-safe-money-gen]
1069.90 s
[really-safe-money-gen] fromAmount :: currency -> Amount -> MultiAmount currency
1069.90 s
[really-safe-money-gen] fromAmount currency amount =
1069.90 s
[really-safe-money-gen] - if amount == Amount.zero
1069.90 s
[really-safe-money-gen] + if n o t ( amount == Amount.zero )
1069.90 s
[really-safe-money-gen] then zero
1069.90 s
[really-safe-money-gen] else MultiAmount $ M.singleton currency amount
1069.90 s
[really-safe-money-gen]
1069.90 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:66:13-29
1069.90 s
[really-safe-money-gen] @@ -63,7 +63,7 @@
1069.90 s
[really-safe-money-gen] [ genericValidate ma,
1069.90 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1069.90 s
[really-safe-money-gen] declare "The amount is not zero" $
1069.90 s
[really-safe-money-gen] - a / = A mo u nt .z e ro
1069.90 s
[really-safe-money-gen] + Tr u e
1069.90 s
[really-safe-money-gen] ]
1069.90 s
[really-safe-money-gen]
1069.90 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
1069.90 s
[really-safe-money-gen] Testing mutation Arith at src/Money/MultiAmount.hs:182:15-106
1069.90 s
[really-safe-money-gen] @@ -179,7 +179,7 @@
1069.90 s
[really-safe-money-gen] . traverse
1069.90 s
[really-safe-money-gen] ( \(currency, a) ->
1069.90 s
[really-safe-money-gen] ( \(cr, qf2) ->
1069.90 s
[really-safe-money-gen] - fromIntegral (Amount.toMinimalQuantisations a) * ConversionRate.conversionFactor qf2 cr qf1
1069.90 s
[really-safe-money-gen] + fromIntegral (Amount.toMinimalQuantisations a) + ConversionRate.conversionFactor qf2 cr qf1
1069.90 s
[really-safe-money-gen] )
1069.90 s
[really-safe-money-gen] <$> func currency
1069.90 s
[really-safe-money-gen] )
1069.90 s
[really-safe-money-gen] Testing mutation Arith at src/Money/MultiAmount.hs:182:15-106
1069.90 s
[really-safe-money-gen] @@ -179,7 +179,7 @@
1069.90 s
[really-safe-money-gen] . traverse
1069.91 s
[really-safe-money-gen] ( \(currency, a) ->
1069.91 s
[really-safe-money-gen] ( \(cr, qf2) ->
1069.91 s
[really-safe-money-gen] - fromIntegral (Amount.toMinimalQuantisations a) * ConversionRate.conversionFactor qf2 cr qf1
1069.91 s
[really-safe-money-gen] + fromIntegral (Amount.toMinimalQuantisations a) - ConversionRate.conversionFactor qf2 cr qf1
1069.91 s
[really-safe-money-gen] )
1069.91 s
[really-safe-money-gen] <$> func currency
1069.91 s
[really-safe-money-gen] )
1069.91 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/MultiAmount.hs:168:20-45
1069.91 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
1069.91 s
[really-safe-money-gen] maxBoundN :: Natural
1069.91 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1069.91 s
[really-safe-money-gen] actualResult =
1069.91 s
[really-safe-money-gen] - if roundedResult > maxBoundN
1069.91 s
[really-safe-money-gen] + if roundedResult > = maxBoundN
1069.91 s
[really-safe-money-gen] then Nothing
1069.91 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1069.91 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1069.91 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:119:12-28
1069.91 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
1069.91 s
[really-safe-money-gen] Just a -> do
1069.91 s
[really-safe-money-gen] r <- Amount.subtract a amount
1069.91 s
[really-safe-money-gen] Just $
1069.91 s
[really-safe-money-gen] - if r == A mount .z e ro
1069.91 s
[really-safe-money-gen] + if Fal s e
1069.91 s
[really-safe-money-gen] then M.delete currency m
1069.91 s
[really-safe-money-gen] else M.insert currency r m
1069.91 s
[really-safe-money-gen]
1069.91 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:119:12-28
1069.91 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
1069.91 s
[really-safe-money-gen] Just a -> do
1069.91 s
[really-safe-money-gen] r <- Amount.subtract a amount
1069.91 s
[really-safe-money-gen] Just $
1069.91 s
[really-safe-money-gen] - if r == Amount.zero
1069.91 s
[really-safe-money-gen] + if n o t ( r == Amount.zero )
1069.91 s
[really-safe-money-gen] then M.delete currency m
1069.91 s
[really-safe-money-gen] else M.insert currency r m
1069.91 s
[really-safe-money-gen]
1069.91 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:168:20-45
1069.91 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
1069.91 s
[really-safe-money-gen] maxBoundN :: Natural
1069.91 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1069.91 s
[really-safe-money-gen] actualResult =
1069.91 s
[really-safe-money-gen] - if r o u n ded R e s u lt > maxBoundN
1069.91 s
[really-safe-money-gen] + if T r u e
1069.91 s
[really-safe-money-gen] then Nothing
1069.91 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1069.91 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1069.91 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:66:13-29
1069.92 s
[really-safe-money-gen] @@ -63,7 +63,7 @@
1069.92 s
[really-safe-money-gen] [ genericValidate ma,
1069.92 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1069.92 s
[really-safe-money-gen] declare "The amount is not zero" $
1069.92 s
[really-safe-money-gen] - a / = Am ount .z e ro
1069.92 s
[really-safe-money-gen] + F a l s e
1069.92 s
[really-safe-money-gen] ]
1069.92 s
[really-safe-money-gen]
1069.92 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
1069.92 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
1069.92 s
[really-safe-money-gen] @@ -168,10 +168,9 @@
1069.92 s
[really-safe-money-gen] if roundedResult > maxBoundN
1069.92 s
[really-safe-money-gen] then Nothing
1069.92 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1074.26 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1074.26 s
[really-safe-money-gen] - LT -> RoundedDown
1074.27 s
[really-safe-money-gen] EQ -> DidNotRound
1074.27 s
[really-safe-money-gen] GT -> RoundedUp
1074.27 s
[really-safe-money-gen] in (Amount.fromMinimalQuantisations <$> actualResult, rounded)
1074.27 s
[really-safe-money-gen] )
1074.27 s
[really-safe-money-gen] . Prelude.sum
1074.27 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
1074.27 s
[really-safe-money-gen] @@ -168,10 +168,9 @@
1074.27 s
[really-safe-money-gen] if roundedResult > maxBoundN
1074.27 s
[really-safe-money-gen] then Nothing
1074.27 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1074.27 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1074.27 s
[really-safe-money-gen] LT -> RoundedDown
1074.27 s
[really-safe-money-gen] EQ -> DidNotRound
1074.27 s
[really-safe-money-gen] - GT -> RoundedUp
1074.27 s
[really-safe-money-gen] in (Amount.fromMinimalQuantisations <$> actualResult, rounded)
1074.27 s
[really-safe-money-gen] )
1074.27 s
[really-safe-money-gen] . Prelude.sum
1074.27 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/MultiAmount.hs:170:24-57
1074.27 s
[really-safe-money-gen] @@ -167,7 +167,7 @@
1074.27 s
[really-safe-money-gen] actualResult =
1074.27 s
[really-safe-money-gen] if roundedResult > maxBoundN
1074.27 s
[really-safe-money-gen] then Nothing
1074.27 s
[really-safe-money-gen] - else J u st (fr o mI n t e gral ro u n d e dResult)
1074.27 s
[really-safe-money-gen] + else N o t hi n g
1074.27 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1074.27 s
[really-safe-money-gen] LT -> RoundedDown
1074.27 s
[really-safe-money-gen] EQ -> DidNotRound
1074.27 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:171:25-32
1074.27 s
[really-safe-money-gen] @@ -168,10 +168,9 @@
1074.27 s
[really-safe-money-gen] if roundedResult > maxBoundN
1074.27 s
[really-safe-money-gen] then Nothing
1074.27 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1074.27 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1074.27 s
[really-safe-money-gen] LT -> RoundedDown
1074.27 s
[really-safe-money-gen] - EQ -> DidNotRound
1074.27 s
[really-safe-money-gen] GT -> RoundedUp
1074.27 s
[really-safe-money-gen] in (Amount.fromMinimalQuantisations <$> actualResult, rounded)
1074.27 s
[really-safe-money-gen] )
1074.27 s
[really-safe-money-gen] . Prelude.sum
1074.27 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:114:22-37
1074.28 s
[really-safe-money-gen] @@ -111,14 +111,13 @@
1074.28 s
[really-safe-money-gen] subtractAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1074.28 s
[really-safe-money-gen] subtractAmount m _ (Amount 0) = Just m
1074.28 s
[really-safe-money-gen] subtractAmount (MultiAmount m) currency amount =
1074.28 s
[really-safe-money-gen] fmap MultiAmount $ case M.lookup currency m of
1074.28 s
[really-safe-money-gen] - Nothing -> Nothing -- Can't go below zero
1074.28 s
[really-safe-money-gen] Just a -> do
1074.28 s
[really-safe-money-gen] r <- Amount.subtract a amount
1074.28 s
[really-safe-money-gen] Just $
1074.28 s
[really-safe-money-gen] if r == Amount.zero
1074.28 s
[really-safe-money-gen] then M.delete currency m
1074.28 s
[really-safe-money-gen] else M.insert currency r m
1074.28 s
[really-safe-money-gen]
1074.28 s
[really-safe-money-gen] -- | Try to convert every amount to one currency.
1074.28 s
[really-safe-money-gen] --
1074.28 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:168:20-45
1074.28 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
1074.28 s
[really-safe-money-gen] maxBoundN :: Natural
1074.28 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1074.28 s
[really-safe-money-gen] actualResult =
1074.28 s
[really-safe-money-gen] - if roundedResult > maxBoundN
1074.28 s
[really-safe-money-gen] + if n o t ( roundedResult > maxBoundN )
1074.28 s
[really-safe-money-gen] then Nothing
1074.28 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1074.28 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1074.28 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:119:12-28
1074.28 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
1074.28 s
[really-safe-money-gen] Just a -> do
1074.28 s
[really-safe-money-gen] r <- Amount.subtract a amount
1074.28 s
[really-safe-money-gen] Just $
1074.28 s
[really-safe-money-gen] - if r == Am o u n t. z e r o
1074.28 s
[really-safe-money-gen] + if T r u e
1074.28 s
[really-safe-money-gen] then M.delete currency m
1074.28 s
[really-safe-money-gen] else M.insert currency r m
1074.28 s
[really-safe-money-gen]
1074.28 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAmount.hs:168:20-45
1074.28 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
1074.28 s
[really-safe-money-gen] maxBoundN :: Natural
1074.28 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1074.28 s
[really-safe-money-gen] actualResult =
1074.28 s
[really-safe-money-gen] - if r ou nde dResult > m a xBo u ndN
1074.28 s
[really-safe-money-gen] + if F a l se
1074.28 s
[really-safe-money-gen] then Nothing
1074.28 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1074.28 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1074.28 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAmount.hs:66:13-29
1074.28 s
[really-safe-money-gen] @@ -63,7 +63,7 @@
1074.28 s
[really-safe-money-gen] [ genericValidate ma,
1074.28 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1074.28 s
[really-safe-money-gen] declare "The amount is not zero" $
1074.28 s
[really-safe-money-gen] - a /= Amount.zero
1074.28 s
[really-safe-money-gen] + n o t ( a /= Amount.zero )
1074.28 s
[really-safe-money-gen] ]
1074.28 s
[really-safe-money-gen]
1074.28 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
1074.28 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/MultiAmount.hs:112:33-39
1074.28 s
[really-safe-money-gen] @@ -109,7 +109,7 @@
1074.28 s
[really-safe-money-gen]
1074.28 s
[really-safe-money-gen] -- | Subtract an 'Amount' from a 'MultiAmount'
1074.28 s
[really-safe-money-gen] subtractAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1074.28 s
[really-safe-money-gen] - subtractAmount m _ (Amount 0) = J u s t m
1074.28 s
[really-safe-money-gen] + subtractAmount m _ (Amount 0) = No t h ing
1074.28 s
[really-safe-money-gen] subtractAmount (MultiAmount m) currency amount =
1074.28 s
[really-safe-money-gen] fmap MultiAmount $ case M.lookup currency m of
1074.28 s
[really-safe-money-gen] Nothing -> Nothing -- Can't go below zero
1074.28 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:129:23-37
1074.28 s
[really-safe-money-gen] @@ -126,14 +126,13 @@
1074.28 s
[really-safe-money-gen] subtractAccount m _ (Positive (Amount 0)) = Just m
1074.28 s
[really-safe-money-gen] subtractAccount m _ (Negative (Amount 0)) = Just m
1074.28 s
[really-safe-money-gen] subtractAccount (MultiAccount m) currency account =
1074.28 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1074.28 s
[really-safe-money-gen] - Nothing -> Just $ M.insert currency (Account.negate account) m
1074.28 s
[really-safe-money-gen] Just a -> do
1074.28 s
[really-safe-money-gen] r <- Account.subtract a account
1074.28 s
[really-safe-money-gen] Just $
1074.28 s
[really-safe-money-gen] if r == Account.zero
1074.28 s
[really-safe-money-gen] then M.delete currency m
1074.28 s
[really-safe-money-gen] else M.insert currency r m
1074.28 s
[really-safe-money-gen]
1074.28 s
[really-safe-money-gen] -- | Try to convert every account to one currency.
1074.28 s
[really-safe-money-gen] --
1074.28 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:129:23-37
1074.29 s
[really-safe-money-gen] @@ -126,14 +126,8 @@
1074.29 s
[really-safe-money-gen] subtractAccount m _ (Positive (Amount 0)) = Just m
1074.29 s
[really-safe-money-gen] subtractAccount m _ (Negative (Amount 0)) = Just m
1074.29 s
[really-safe-money-gen] subtractAccount (MultiAccount m) currency account =
1074.29 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1074.29 s
[really-safe-money-gen] Nothing -> Just $ M.insert currency (Account.negate account) m
1074.29 s
[really-safe-money-gen] - Just a -> do
1074.29 s
[really-safe-money-gen] - r <- Account.subtract a account
1074.29 s
[really-safe-money-gen] - Just $
1074.29 s
[really-safe-money-gen] - if r == Account.zero
1074.29 s
[really-safe-money-gen] - then M.delete currency m
1074.29 s
[really-safe-money-gen] - else M.insert currency r m
1074.29 s
[really-safe-money-gen]
1074.29 s
[really-safe-money-gen] -- | Try to convert every account to one currency.
1074.29 s
[really-safe-money-gen] --
1074.29 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/MultiAccount.hs:112:40-46
1074.29 s
[really-safe-money-gen] @@ -109,7 +109,7 @@
1074.29 s
[really-safe-money-gen]
1074.29 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1074.29 s
[really-safe-money-gen] addAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1074.29 s
[really-safe-money-gen] - addAccount m _ (Positive (Amount 0)) = J u s t m
1074.29 s
[really-safe-money-gen] + addAccount m _ (Positive (Amount 0)) = No t h ing
1074.29 s
[really-safe-money-gen] addAccount m _ (Negative (Amount 0)) = Just m
1074.29 s
[really-safe-money-gen] addAccount (MultiAccount m) currency account =
1074.29 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1074.29 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
1074.29 s
[really-safe-money-gen] @@ -212,11 +212,10 @@
1074.29 s
[really-safe-money-gen]
1074.29 s
[really-safe-money-gen] -- | See 'Amount.distribute'
1074.29 s
[really-safe-money-gen] distribute :: AmountOf currency -> Word32 -> AmountDistributionOf currency
1074.29 s
[really-safe-money-gen] distribute (AmountOf a) f = case Amount.distribute a f of
1074.29 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
1074.29 s
[really-safe-money-gen] DistributedZero -> DistributedZero
1074.29 s
[really-safe-money-gen] DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAmount a')
1074.29 s
[really-safe-money-gen] - DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAmount a1) w2 (fromAmount a2)
1074.29 s
[really-safe-money-gen]
1074.29 s
[really-safe-money-gen] type AmountDistributionOf (currency :: k) = Distribution (AmountOf currency)
1074.29 s
[really-safe-money-gen]
1074.29 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
1074.29 s
[really-safe-money-gen] @@ -171,10 +171,9 @@
1074.29 s
[really-safe-money-gen] fmap
1074.29 s
[really-safe-money-gen] ( ( \theoreticalResult ->
1074.29 s
[really-safe-money-gen] let rounder :: Rational -> Integer
1074.29 s
[really-safe-money-gen] rounder = case r of
1074.29 s
[really-safe-money-gen] - RoundUp -> ceiling
1074.29 s
[really-safe-money-gen] RoundDown -> floor
1078.39 s
[really-safe-money-gen] RoundNearest -> round
1078.39 s
[really-safe-money-gen] roundedResult :: Integer
1078.39 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1078.46 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1078.46 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAccount.hs:134:12-29
1078.46 s
[really-safe-money-gen] @@ -131,7 +131,7 @@
1078.46 s
[really-safe-money-gen] Just a -> do
1078.46 s
[really-safe-money-gen] r <- Account.subtract a account
1078.46 s
[really-safe-money-gen] Just $
1078.47 s
[really-safe-money-gen] - if r == Acc o u n t. z e r o
1078.47 s
[really-safe-money-gen] + if T r u e
1078.47 s
[really-safe-money-gen] then M.delete currency m
1078.47 s
[really-safe-money-gen] else M.insert currency r m
1078.47 s
[really-safe-money-gen]
1078.47 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAccount.hs:134:12-29
1078.47 s
[really-safe-money-gen] @@ -131,7 +131,7 @@
1078.47 s
[really-safe-money-gen] Just a -> do
1078.47 s
[really-safe-money-gen] r <- Account.subtract a account
1078.47 s
[really-safe-money-gen] Just $
1078.47 s
[really-safe-money-gen] - if r == Accou n t .z e ro
1078.47 s
[really-safe-money-gen] + if F als e
1078.47 s
[really-safe-money-gen] then M.delete currency m
1078.47 s
[really-safe-money-gen] else M.insert currency r m
1078.47 s
[really-safe-money-gen]
1078.47 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
1078.47 s
[really-safe-money-gen] @@ -177,10 +177,9 @@
1078.47 s
[really-safe-money-gen] RoundNearest -> round
1078.47 s
[really-safe-money-gen] roundedResult :: Integer
1078.47 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1078.47 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1078.47 s
[really-safe-money-gen] - LT -> RoundedDown
1078.47 s
[really-safe-money-gen] EQ -> DidNotRound
1078.47 s
[really-safe-money-gen] GT -> RoundedUp
1078.47 s
[really-safe-money-gen] in (Account.fromMinimalQuantisations roundedResult, rounded)
1078.47 s
[really-safe-money-gen] )
1078.47 s
[really-safe-money-gen] . Prelude.sum
1078.47 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/MultiAccount.hs:127:45-51
1078.47 s
[really-safe-money-gen] @@ -124,7 +124,7 @@
1078.47 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1078.47 s
[really-safe-money-gen] subtractAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1078.47 s
[really-safe-money-gen] subtractAccount m _ (Positive (Amount 0)) = Just m
1078.47 s
[really-safe-money-gen] - subtractAccount m _ (Negative (Amount 0)) = J u s t m
1078.47 s
[really-safe-money-gen] + subtractAccount m _ (Negative (Amount 0)) = No t h ing
1078.47 s
[really-safe-money-gen] subtractAccount (MultiAccount m) currency account =
1078.47 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1078.47 s
[really-safe-money-gen] Nothing -> Just $ M.insert currency (Account.negate account) m
1078.47 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
1078.48 s
[really-safe-money-gen] @@ -171,10 +171,9 @@
1078.48 s
[really-safe-money-gen] fmap
1078.48 s
[really-safe-money-gen] ( ( \theoreticalResult ->
1078.48 s
[really-safe-money-gen] let rounder :: Rational -> Integer
1078.48 s
[really-safe-money-gen] rounder = case r of
1078.48 s
[really-safe-money-gen] RoundUp -> ceiling
1078.48 s
[really-safe-money-gen] RoundDown -> floor
1078.48 s
[really-safe-money-gen] - RoundNearest -> round
1078.48 s
[really-safe-money-gen] roundedResult :: Integer
1078.48 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1078.48 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1078.48 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
1078.48 s
[really-safe-money-gen] @@ -212,11 +212,10 @@
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] -- | See 'Amount.distribute'
1078.48 s
[really-safe-money-gen] distribute :: AmountOf currency -> Word32 -> AmountDistributionOf currency
1078.48 s
[really-safe-money-gen] distribute (AmountOf a) f = case Amount.distribute a f of
1078.48 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
1078.48 s
[really-safe-money-gen] DistributedZero -> DistributedZero
1078.48 s
[really-safe-money-gen] - DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAmount a')
1078.48 s
[really-safe-money-gen] DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAmount a1) w2 (fromAmount a2)
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] type AmountDistributionOf (currency :: k) = Distribution (AmountOf currency)
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
1078.48 s
[really-safe-money-gen] @@ -212,11 +212,10 @@
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] -- | See 'Amount.distribute'
1078.48 s
[really-safe-money-gen] distribute :: AmountOf currency -> Word32 -> AmountDistributionOf currency
1078.48 s
[really-safe-money-gen] distribute (AmountOf a) f = case Amount.distribute a f of
1078.48 s
[really-safe-money-gen] - DistributedIntoZeroChunks -> DistributedIntoZeroChunks
1078.48 s
[really-safe-money-gen] DistributedZero -> DistributedZero
1078.48 s
[really-safe-money-gen] DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAmount a')
1078.48 s
[really-safe-money-gen] DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAmount a1) w2 (fromAmount a2)
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] type AmountDistributionOf (currency :: k) = Distribution (AmountOf currency)
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/AmountOf.hs:215:29-113
1078.48 s
[really-safe-money-gen] @@ -212,11 +212,10 @@
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] -- | See 'Amount.distribute'
1078.48 s
[really-safe-money-gen] distribute :: AmountOf currency -> Word32 -> AmountDistributionOf currency
1078.48 s
[really-safe-money-gen] distribute (AmountOf a) f = case Amount.distribute a f of
1078.48 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
1078.48 s
[really-safe-money-gen] - DistributedZero -> DistributedZero
1078.48 s
[really-safe-money-gen] DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAmount a')
1078.48 s
[really-safe-money-gen] DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAmount a1) w2 (fromAmount a2)
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] type AmountDistributionOf (currency :: k) = Distribution (AmountOf currency)
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/MultiAmount.hs:63:7-8
1078.48 s
[really-safe-money-gen] @@ -60,11 +60,10 @@
1078.48 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAmount currency) where
1078.48 s
[really-safe-money-gen] validate ma@(MultiAmount m) =
1078.48 s
[really-safe-money-gen] mconcat
1078.48 s
[really-safe-money-gen] - [ genericValidate ma,
1078.48 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1078.48 s
[really-safe-money-gen] declare "The amount is not zero" $
1078.48 s
[really-safe-money-gen] a /= Amount.zero
1078.48 s
[really-safe-money-gen] ]
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/MultiAmount.hs:63:7-8
1078.48 s
[really-safe-money-gen] @@ -60,11 +60,7 @@
1078.48 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAmount currency) where
1078.48 s
[really-safe-money-gen] validate ma@(MultiAmount m) =
1078.48 s
[really-safe-money-gen] mconcat
1078.48 s
[really-safe-money-gen] - [ genericValidate ma,
1078.48 s
[really-safe-money-gen] - decorateMap m $ \_ a ->
1078.48 s
[really-safe-money-gen] - declare "The amount is not zero" $
1078.48 s
[really-safe-money-gen] - a /= Amount.zero
1078.48 s
[really-safe-money-gen] ]
1078.48 s
[really-safe-money-gen]
1078.48 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
1078.48 s
[really-safe-money-gen]
1078.49 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAccount.hs:134:12-29
1078.49 s
[really-safe-money-gen] @@ -131,7 +131,7 @@
1078.49 s
[really-safe-money-gen] Just a -> do
1078.49 s
[really-safe-money-gen] r <- Account.subtract a account
1078.49 s
[really-safe-money-gen] Just $
1078.49 s
[really-safe-money-gen] - if r == Account.zero
1078.49 s
[really-safe-money-gen] + if n o t ( r == Account.zero )
1078.49 s
[really-safe-money-gen] then M.delete currency m
1078.49 s
[really-safe-money-gen] else M.insert currency r m
1078.49 s
[really-safe-money-gen]
1078.49 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/MultiAmount.hs:168:20-45
1078.49 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
1078.49 s
[really-safe-money-gen] maxBoundN :: Natural
1078.49 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1078.49 s
[really-safe-money-gen] actualResult =
1078.49 s
[really-safe-money-gen] - if roundedResult > maxBoundN
1078.49 s
[really-safe-money-gen] + if roundedResult < = maxBoundN
1078.49 s
[really-safe-money-gen] then Nothing
1078.49 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1078.49 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1078.49 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/MultiAmount.hs:168:20-45
1078.49 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
1078.49 s
[really-safe-money-gen] maxBoundN :: Natural
1078.49 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1078.49 s
[really-safe-money-gen] actualResult =
1078.49 s
[really-safe-money-gen] - if roundedResult > maxBoundN
1078.49 s
[really-safe-money-gen] + if roundedResult < maxBoundN
1078.49 s
[really-safe-money-gen] then Nothing
1078.49 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1078.49 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1078.49 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/MultiAccount.hs:113:40-46
1078.49 s
[really-safe-money-gen] @@ -110,7 +110,7 @@
1078.49 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1078.49 s
[really-safe-money-gen] addAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1078.49 s
[really-safe-money-gen] addAccount m _ (Positive (Amount 0)) = Just m
1078.49 s
[really-safe-money-gen] - addAccount m _ (Negative (Amount 0)) = J u s t m
1078.49 s
[really-safe-money-gen] + addAccount m _ (Negative (Amount 0)) = No t h ing
1078.49 s
[really-safe-money-gen] addAccount (MultiAccount m) currency account =
1078.49 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1078.49 s
[really-safe-money-gen] Nothing -> Just $ M.insert currency account m
1078.49 s
[really-safe-money-gen] Testing mutation MaybeOp at src/Money/MultiAccount.hs:126:45-51
1078.49 s
[really-safe-money-gen] @@ -123,7 +123,7 @@
1078.49 s
[really-safe-money-gen]
1078.49 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1078.49 s
[really-safe-money-gen] subtractAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1081.45 s
[really-safe-money-gen] - subtractAccount m _ (Positive (Amount 0)) = J u s t m
1081.45 s
[really-safe-money-gen] + subtractAccount m _ (Positive (Amount 0)) = No t h ing
1081.45 s
[really-safe-money-gen] subtractAccount m _ (Negative (Amount 0)) = Just m
1081.45 s
[really-safe-money-gen] subtractAccount (MultiAccount m) currency account =
1081.45 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1081.45 s
[really-safe-money-gen] Testing mutation Arith at src/Money/MultiAccount.hs:192:19-51
1081.45 s
[really-safe-money-gen] @@ -189,8 +189,8 @@
1081.45 s
[really-safe-money-gen] ( \(currency, a) ->
1081.45 s
[really-safe-money-gen] ( \(cr, qf2) ->
1081.45 s
[really-safe-money-gen] let factor = ConversionRate.conversionFactor qf2 cr qf1
1081.45 s
[really-safe-money-gen] in Account.toMinimalQuantisations a
1081.45 s
[really-safe-money-gen] - * toInteger (numerator factor)
1081.45 s
[really-safe-money-gen] + - toInteger (numerator factor)
1081.45 s
[really-safe-money-gen] % toInteger (denominator factor)
1081.45 s
[really-safe-money-gen] )
1081.45 s
[really-safe-money-gen] <$> func currency
1081.45 s
[really-safe-money-gen] Testing mutation Arith at src/Money/MultiAccount.hs:192:19-51
1081.45 s
[really-safe-money-gen] @@ -189,8 +189,8 @@
1081.45 s
[really-safe-money-gen] ( \(currency, a) ->
1081.45 s
[really-safe-money-gen] ( \(cr, qf2) ->
1081.45 s
[really-safe-money-gen] let factor = ConversionRate.conversionFactor qf2 cr qf1
1081.45 s
[really-safe-money-gen] in Account.toMinimalQuantisations a
1081.45 s
[really-safe-money-gen] - * toInteger (numerator factor)
1081.45 s
[really-safe-money-gen] + + toInteger (numerator factor)
1081.45 s
[really-safe-money-gen] % toInteger (denominator factor)
1081.45 s
[really-safe-money-gen] )
1081.45 s
[really-safe-money-gen] <$> func currency
1081.45 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
1081.45 s
[really-safe-money-gen] @@ -177,10 +177,9 @@
1081.45 s
[really-safe-money-gen] RoundNearest -> round
1081.45 s
[really-safe-money-gen] roundedResult :: Integer
1081.46 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1081.46 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1081.46 s
[really-safe-money-gen] LT -> RoundedDown
1081.46 s
[really-safe-money-gen] EQ -> DidNotRound
1081.46 s
[really-safe-money-gen] - GT -> RoundedUp
1081.46 s
[really-safe-money-gen] in (Account.fromMinimalQuantisations roundedResult, rounded)
1081.46 s
[really-safe-money-gen] )
1081.46 s
[really-safe-money-gen] . Prelude.sum
1081.46 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:180:25-32
1081.46 s
[really-safe-money-gen] @@ -177,10 +177,9 @@
1081.46 s
[really-safe-money-gen] RoundNearest -> round
1081.46 s
[really-safe-money-gen] roundedResult :: Integer
1081.46 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1081.46 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1081.46 s
[really-safe-money-gen] LT -> RoundedDown
1081.46 s
[really-safe-money-gen] - EQ -> DidNotRound
1081.46 s
[really-safe-money-gen] GT -> RoundedUp
1081.46 s
[really-safe-money-gen] in (Account.fromMinimalQuantisations roundedResult, rounded)
1081.46 s
[really-safe-money-gen] )
1081.46 s
[really-safe-money-gen] . Prelude.sum
1081.46 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAccount.hs:69:13-30
1081.46 s
[really-safe-money-gen] @@ -66,7 +66,7 @@
1081.46 s
[really-safe-money-gen] [ genericValidate ma,
1081.46 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1081.46 s
[really-safe-money-gen] declare "The account is not zero" $
1081.46 s
[really-safe-money-gen] - a / = Acco u nt .z e ro
1081.46 s
[really-safe-money-gen] + F a ls e
1081.46 s
[really-safe-money-gen] ]
1081.46 s
[really-safe-money-gen]
1081.46 s
[really-safe-money-gen] -- TODO no empty currencies
1081.46 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:174:25-38
1081.47 s
[really-safe-money-gen] @@ -171,10 +171,9 @@
1081.47 s
[really-safe-money-gen] fmap
1081.47 s
[really-safe-money-gen] ( ( \theoreticalResult ->
1081.47 s
[really-safe-money-gen] let rounder :: Rational -> Integer
1081.47 s
[really-safe-money-gen] rounder = case r of
1081.47 s
[really-safe-money-gen] RoundUp -> ceiling
1081.47 s
[really-safe-money-gen] - RoundDown -> floor
1081.47 s
[really-safe-money-gen] RoundNearest -> round
1081.47 s
[really-safe-money-gen] roundedResult :: Integer
1081.47 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1081.47 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1081.47 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/MultiAccount.hs:66:7-8
1081.47 s
[really-safe-money-gen] @@ -63,11 +63,7 @@
1081.47 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAccount currency) where
1081.47 s
[really-safe-money-gen] validate ma@(MultiAccount m) =
1081.47 s
[really-safe-money-gen] mconcat
1081.47 s
[really-safe-money-gen] - [ genericValidate ma,
1081.47 s
[really-safe-money-gen] - decorateMap m $ \_ a ->
1081.47 s
[really-safe-money-gen] - declare "The account is not zero" $
1081.47 s
[really-safe-money-gen] - a /= Account.zero
1081.47 s
[really-safe-money-gen] ]
1081.47 s
[really-safe-money-gen]
1081.47 s
[really-safe-money-gen] -- TODO no empty currencies
1081.47 s
[really-safe-money-gen]
1081.47 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/MultiAccount.hs:66:7-8
1081.47 s
[really-safe-money-gen] @@ -63,11 +63,10 @@
1081.47 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAccount currency) where
1081.47 s
[really-safe-money-gen] validate ma@(MultiAccount m) =
1081.47 s
[really-safe-money-gen] mconcat
1081.47 s
[really-safe-money-gen] - [ genericValidate ma,
1081.47 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1081.48 s
[really-safe-money-gen] declare "The account is not zero" $
1081.48 s
[really-safe-money-gen] a /= Account.zero
1081.48 s
[really-safe-money-gen] ]
1081.48 s
[really-safe-money-gen]
1081.48 s
[really-safe-money-gen] -- TODO no empty currencies
1081.48 s
[really-safe-money-gen]
1081.48 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/QuantisationFactor/Codec.hs:41:11-26
1081.48 s
[really-safe-money-gen] @@ -38,6 +38,5 @@
1081.48 s
[really-safe-money-gen] codec
1081.48 s
[really-safe-money-gen] <?> "QuantisationFactor"
1081.48 s
[really-safe-money-gen] where
1081.48 s
[really-safe-money-gen] f w = case QuantisationFactor.fromWord32 w of
1081.48 s
[really-safe-money-gen] - Nothing -> Left $ "Unable to parse as a quantisation factor: " <> show w
1081.48 s
[really-safe-money-gen] Just qf -> Right qf
1081.48 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/QuantisationFactor/Codec.hs:41:11-26
1081.48 s
[really-safe-money-gen] @@ -38,6 +38,5 @@
1081.48 s
[really-safe-money-gen] codec
1081.48 s
[really-safe-money-gen] <?> "QuantisationFactor"
1081.48 s
[really-safe-money-gen] where
1081.48 s
[really-safe-money-gen] f w = case QuantisationFactor.fromWord32 w of
1081.48 s
[really-safe-money-gen] Nothing -> Left $ "Unable to parse as a quantisation factor: " <> show w
1081.48 s
[really-safe-money-gen] - Just qf -> Right qf
1081.48 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAmount.hs:159:25-38
1081.48 s
[really-safe-money-gen] @@ -156,10 +156,9 @@
1081.48 s
[really-safe-money-gen] fmap
1081.48 s
[really-safe-money-gen] ( ( \theoreticalResult ->
1081.48 s
[really-safe-money-gen] let rounder :: Ratio Natural -> Natural
1081.48 s
[really-safe-money-gen] rounder = case r of
1081.48 s
[really-safe-money-gen] RoundUp -> ceiling
1081.48 s
[really-safe-money-gen] RoundDown -> floor
1081.48 s
[really-safe-money-gen] - RoundNearest -> round
1081.48 s
[really-safe-money-gen] roundedResult :: Natural
1081.48 s
[really-safe-money-gen] roundedResult = rounder theoreticalResult
1081.48 s
[really-safe-money-gen] maxBoundN :: Natural
1081.48 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
1081.48 s
[really-safe-money-gen] @@ -46,7 +46,7 @@
1081.48 s
[really-safe-money-gen] f s = case readMaybe s of
1081.48 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1081.48 s
[really-safe-money-gen] Just i ->
1081.48 s
[really-safe-money-gen] - if (i :: Integer) < toInteger (minBound :: Word64)
1081.48 s
[really-safe-money-gen] + if (i :: Integer) > toInteger (minBound :: Word64)
1081.48 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1081.49 s
[really-safe-money-gen] else
1081.49 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1081.49 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
1081.49 s
[really-safe-money-gen] @@ -46,7 +46,7 @@
1081.49 s
[really-safe-money-gen] f s = case readMaybe s of
1081.49 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1081.49 s
[really-safe-money-gen] Just i ->
1081.49 s
[really-safe-money-gen] - if (i :: Integer) < toInteger (minBound :: Word64)
1081.49 s
[really-safe-money-gen] + if (i :: Integer) < = toInteger (minBound :: Word64)
1081.49 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1081.49 s
[really-safe-money-gen] else
1081.49 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1081.49 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount/Codec.hs:47:33-75
1081.49 s
[really-safe-money-gen] @@ -44,7 +44,6 @@
1081.49 s
[really-safe-money-gen] where
1081.49 s
[really-safe-money-gen] f :: String -> Either String Amount
1081.49 s
[really-safe-money-gen] f s = case readMaybe s of
1081.49 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1081.49 s
[really-safe-money-gen] Just i ->
1081.49 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1081.49 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1081.49 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAccount.hs:69:13-30
1081.49 s
[really-safe-money-gen] @@ -66,7 +66,7 @@
1081.49 s
[really-safe-money-gen] [ genericValidate ma,
1081.49 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1081.49 s
[really-safe-money-gen] declare "The account is not zero" $
1081.49 s
[really-safe-money-gen] - a /= Account.zero
1081.49 s
[really-safe-money-gen] + n o t ( a /= Account.zero )
1081.49 s
[really-safe-money-gen] ]
1081.49 s
[really-safe-money-gen]
1081.49 s
[really-safe-money-gen] -- TODO no empty currencies
1081.49 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount/Codec.hs:47:33-75
1081.49 s
[really-safe-money-gen] @@ -44,7 +44,6 @@
1081.49 s
[really-safe-money-gen] where
1081.49 s
[really-safe-money-gen] f :: String -> Either String Amount
1081.49 s
[really-safe-money-gen] f s = case readMaybe s of
1081.49 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1081.49 s
[really-safe-money-gen] Just i ->
1081.49 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1081.49 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1081.50 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount/Codec.hs:49:12-59
1081.50 s
[really-safe-money-gen] @@ -46,7 +46,7 @@
1081.50 s
[really-safe-money-gen] f s = case readMaybe s of
1081.50 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1081.50 s
[really-safe-money-gen] Just i ->
1081.50 s
[really-safe-money-gen] - if (i :: Integer) < toInteger (minBound :: Word64)
1081.50 s
[really-safe-money-gen] + if (i :: Integer) > = toInteger (minBound :: Word64)
1085.96 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.05 s
[really-safe-money-gen] else
1086.05 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1086.05 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAccount.hs:69:13-30
1086.05 s
[really-safe-money-gen] @@ -66,7 +66,7 @@
1086.05 s
[really-safe-money-gen] [ genericValidate ma,
1086.05 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1086.05 s
[really-safe-money-gen] declare "The account is not zero" $
1086.05 s
[really-safe-money-gen] - a / = Ac co u nt .z e ro
1086.05 s
[really-safe-money-gen] + T r u e
1086.05 s
[really-safe-money-gen] ]
1086.05 s
[really-safe-money-gen]
1086.05 s
[really-safe-money-gen] -- TODO no empty currencies
1086.06 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAccount.hs:78:6-28
1086.06 s
[really-safe-money-gen] @@ -75,7 +75,7 @@
1086.06 s
[really-safe-money-gen]
1086.06 s
[really-safe-money-gen] fromAccount :: currency -> Account -> MultiAccount currency
1086.06 s
[really-safe-money-gen] fromAccount currency amount =
1086.06 s
[really-safe-money-gen] - if amount == Account.zero
1086.06 s
[really-safe-money-gen] + if n o t ( amount == Account.zero )
1086.06 s
[really-safe-money-gen] then zero
1086.06 s
[really-safe-money-gen] else MultiAccount $ M.singleton currency amount
1086.06 s
[really-safe-money-gen]
1086.06 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAccount.hs:120:12-29
1086.06 s
[really-safe-money-gen] @@ -117,7 +117,7 @@
1086.06 s
[really-safe-money-gen] Just a -> do
1086.06 s
[really-safe-money-gen] r <- Account.add a account
1086.06 s
[really-safe-money-gen] Just $
1086.06 s
[really-safe-money-gen] - if r == Accou n t .z e ro
1086.06 s
[really-safe-money-gen] + if F als e
1086.06 s
[really-safe-money-gen] then M.delete currency m
1086.06 s
[really-safe-money-gen] else M.insert currency r m
1086.06 s
[really-safe-money-gen]
1086.06 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAccount.hs:78:6-28
1086.06 s
[really-safe-money-gen] @@ -75,7 +75,7 @@
1086.06 s
[really-safe-money-gen]
1086.06 s
[really-safe-money-gen] fromAccount :: currency -> Account -> MultiAccount currency
1086.06 s
[really-safe-money-gen] fromAccount currency amount =
1086.06 s
[really-safe-money-gen] - if a m o unt == Accoun t.z e ro
1086.06 s
[really-safe-money-gen] + if F a ls e
1086.06 s
[really-safe-money-gen] then zero
1086.06 s
[really-safe-money-gen] else MultiAccount $ M.singleton currency amount
1086.06 s
[really-safe-money-gen]
1086.06 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAccount.hs:78:6-28
1086.06 s
[really-safe-money-gen] @@ -75,7 +75,7 @@
1086.06 s
[really-safe-money-gen]
1086.06 s
[really-safe-money-gen] fromAccount :: currency -> Account -> MultiAccount currency
1086.06 s
[really-safe-money-gen] fromAccount currency amount =
1086.07 s
[really-safe-money-gen] - if a m o unt == A cco u n t.z e ro
1086.07 s
[really-safe-money-gen] + if Tr u e
1086.07 s
[really-safe-money-gen] then zero
1086.07 s
[really-safe-money-gen] else MultiAccount $ M.singleton currency amount
1086.07 s
[really-safe-money-gen]
1086.07 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:115:23-37
1086.07 s
[really-safe-money-gen] @@ -112,14 +112,8 @@
1086.07 s
[really-safe-money-gen] addAccount m _ (Positive (Amount 0)) = Just m
1086.07 s
[really-safe-money-gen] addAccount m _ (Negative (Amount 0)) = Just m
1086.07 s
[really-safe-money-gen] addAccount (MultiAccount m) currency account =
1086.07 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1086.07 s
[really-safe-money-gen] Nothing -> Just $ M.insert currency account m
1086.07 s
[really-safe-money-gen] - Just a -> do
1086.07 s
[really-safe-money-gen] - r <- Account.add a account
1086.07 s
[really-safe-money-gen] - Just $
1086.07 s
[really-safe-money-gen] - if r == Account.zero
1086.07 s
[really-safe-money-gen] - then M.delete currency m
1086.07 s
[really-safe-money-gen] - else M.insert currency r m
1086.07 s
[really-safe-money-gen]
1086.07 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1086.07 s
[really-safe-money-gen] subtractAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1086.07 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/MultiAccount.hs:120:12-29
1086.07 s
[really-safe-money-gen] @@ -117,7 +117,7 @@
1086.07 s
[really-safe-money-gen] Just a -> do
1086.07 s
[really-safe-money-gen] r <- Account.add a account
1086.07 s
[really-safe-money-gen] Just $
1086.07 s
[really-safe-money-gen] - if r == Acc o u n t. z e r o
1086.07 s
[really-safe-money-gen] + if T r u e
1086.07 s
[really-safe-money-gen] then M.delete currency m
1086.07 s
[really-safe-money-gen] else M.insert currency r m
1086.07 s
[really-safe-money-gen]
1086.07 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/MultiAccount.hs:115:23-37
1086.07 s
[really-safe-money-gen] @@ -112,14 +112,13 @@
1086.07 s
[really-safe-money-gen] addAccount m _ (Positive (Amount 0)) = Just m
1086.07 s
[really-safe-money-gen] addAccount m _ (Negative (Amount 0)) = Just m
1086.07 s
[really-safe-money-gen] addAccount (MultiAccount m) currency account =
1086.07 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1086.08 s
[really-safe-money-gen] - Nothing -> Just $ M.insert currency account m
1086.08 s
[really-safe-money-gen] Just a -> do
1086.08 s
[really-safe-money-gen] r <- Account.add a account
1086.08 s
[really-safe-money-gen] Just $
1086.08 s
[really-safe-money-gen] if r == Account.zero
1086.08 s
[really-safe-money-gen] then M.delete currency m
1086.08 s
[really-safe-money-gen] else M.insert currency r m
1086.08 s
[really-safe-money-gen]
1086.08 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1086.08 s
[really-safe-money-gen] subtractAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1086.08 s
[really-safe-money-gen] Testing mutation Negate at src/Money/MultiAccount.hs:120:12-29
1086.08 s
[really-safe-money-gen] @@ -117,7 +117,7 @@
1086.08 s
[really-safe-money-gen] Just a -> do
1086.08 s
[really-safe-money-gen] r <- Account.add a account
1086.08 s
[really-safe-money-gen] Just $
1086.08 s
[really-safe-money-gen] - if r == Account.zero
1086.08 s
[really-safe-money-gen] + if n o t ( r == Account.zero )
1086.08 s
[really-safe-money-gen] then M.delete currency m
1086.08 s
[really-safe-money-gen] else M.insert currency r m
1086.08 s
[really-safe-money-gen]
1086.08 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
1086.08 s
[really-safe-money-gen] @@ -49,7 +49,7 @@
1086.08 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1086.08 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.08 s
[really-safe-money-gen] else
1086.08 s
[really-safe-money-gen] - if (i :: Integer) > toInteger (maxBound :: Word64)
1086.08 s
[really-safe-money-gen] + if (i :: Integer) < toInteger (maxBound :: Word64)
1086.08 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.08 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.08 s
[really-safe-money-gen] g :: Amount -> String
1086.08 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount/Codec.hs:49:12-59
1086.08 s
[really-safe-money-gen] @@ -46,7 +46,7 @@
1086.08 s
[really-safe-money-gen] f s = case readMaybe s of
1086.08 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1086.09 s
[really-safe-money-gen] Just i ->
1086.09 s
[really-safe-money-gen] - if ( i :: Intege r ) < t oIn t e g er (minBound :: Word64)
1086.09 s
[really-safe-money-gen] + if T r u e
1086.09 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.09 s
[really-safe-money-gen] else
1086.09 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1086.09 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount/Codec.hs:50:31-84
1086.09 s
[really-safe-money-gen] @@ -47,7 +47,6 @@
1086.09 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1086.09 s
[really-safe-money-gen] Just i ->
1086.09 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1086.09 s
[really-safe-money-gen] - then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.09 s
[really-safe-money-gen] else
1086.09 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1086.09 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.09 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount/Codec.hs:50:31-84
1086.09 s
[really-safe-money-gen] @@ -47,7 +47,6 @@
1086.09 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1086.09 s
[really-safe-money-gen] Just i ->
1086.09 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1086.09 s
[really-safe-money-gen] - then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.09 s
[really-safe-money-gen] else
1086.09 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1086.09 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.09 s
[really-safe-money-gen] Testing mutation ListLit at src/Numeric/DecimalLiteral/Codec.hs:40:33-82
1086.09 s
[really-safe-money-gen] @@ -37,5 +37,4 @@
1086.09 s
[really-safe-money-gen] where
1086.09 s
[really-safe-money-gen] f :: String -> Either String DecimalLiteral
1086.09 s
[really-safe-money-gen] f s = case DecimalLiteral.fromString s of
1086.09 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as a DecimalLiteral:", s]
1086.09 s
[really-safe-money-gen] Just a -> Right a
1086.09 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account/Codec.hs:50:11-24
1086.09 s
[really-safe-money-gen] @@ -47,9 +47,8 @@
1086.09 s
[really-safe-money-gen] codecViaString = bimapCodec f g stringCodec <?> "Account"
1086.09 s
[really-safe-money-gen] where
1086.09 s
[really-safe-money-gen] f :: String -> Either String Account
1086.09 s
[really-safe-money-gen] f s = case readMaybe s >>= Account.fromMinimalQuantisations of
1086.09 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Account:", s]
1086.09 s
[really-safe-money-gen] - Just a -> Right a
1086.09 s
[really-safe-money-gen] g :: Account -> String
1086.09 s
[really-safe-money-gen] g = show . Account.toMinimalQuantisations
1086.10 s
[really-safe-money-gen]
1086.10 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Numeric/DecimalLiteral/Codec.hs:39:11-24
1086.10 s
[really-safe-money-gen] @@ -36,6 +36,5 @@
1086.10 s
[really-safe-money-gen] codecViaString = bimapCodec f DecimalLiteral.toString stringCodec <?> "DecimalLiteral"
1086.10 s
[really-safe-money-gen] where
1086.10 s
[really-safe-money-gen] f :: String -> Either String DecimalLiteral
1086.10 s
[really-safe-money-gen] f s = case DecimalLiteral.fromString s of
1086.10 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as a DecimalLiteral:", s]
1086.10 s
[really-safe-money-gen] - Just a -> Right a
1086.10 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Account/Codec.hs:51:33-76
1086.10 s
[really-safe-money-gen] @@ -48,7 +48,6 @@
1086.10 s
[really-safe-money-gen] where
1086.10 s
[really-safe-money-gen] f :: String -> Either String Account
1086.10 s
[really-safe-money-gen] f s = case readMaybe s >>= Account.fromMinimalQuantisations of
1086.10 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as an Account:", s]
1086.10 s
[really-safe-money-gen] Just a -> Right a
1086.10 s
[really-safe-money-gen] g :: Account -> String
1086.10 s
[really-safe-money-gen] g = show . Account.toMinimalQuantisations
1086.10 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Account/Codec.hs:51:33-76
1086.10 s
[really-safe-money-gen] @@ -48,7 +48,6 @@
1086.10 s
[really-safe-money-gen] where
1086.10 s
[really-safe-money-gen] f :: String -> Either String Account
1086.10 s
[really-safe-money-gen] f s = case readMaybe s >>= Account.fromMinimalQuantisations of
1086.10 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as an Account:", s]
1086.10 s
[really-safe-money-gen] Just a -> Right a
1086.10 s
[really-safe-money-gen] g :: Account -> String
1086.10 s
[really-safe-money-gen] g = show . Account.toMinimalQuantisations
1086.10 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Numeric/DecimalLiteral/Codec.hs:39:11-24
1086.10 s
[really-safe-money-gen] @@ -36,6 +36,5 @@
1086.10 s
[really-safe-money-gen] codecViaString = bimapCodec f DecimalLiteral.toString stringCodec <?> "DecimalLiteral"
1086.10 s
[really-safe-money-gen] where
1086.10 s
[really-safe-money-gen] f :: String -> Either String DecimalLiteral
1086.10 s
[really-safe-money-gen] f s = case DecimalLiteral.fromString s of
1086.10 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as a DecimalLiteral:", s]
1086.10 s
[really-safe-money-gen] Just a -> Right a
1086.10 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Amount/Codec.hs:46:11-86
1086.10 s
[really-safe-money-gen] @@ -43,15 +43,8 @@
1086.10 s
[really-safe-money-gen] codecViaString = bimapCodec f g stringCodec <?> "Amount"
1086.10 s
[really-safe-money-gen] where
1086.10 s
[really-safe-money-gen] f :: String -> Either String Amount
1086.10 s
[really-safe-money-gen] f s = case readMaybe s of
1086.10 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1086.10 s
[really-safe-money-gen] - Just i ->
1086.10 s
[really-safe-money-gen] - if (i :: Integer) < toInteger (minBound :: Word64)
1086.11 s
[really-safe-money-gen] - then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.11 s
[really-safe-money-gen] - else
1086.11 s
[really-safe-money-gen] - if (i :: Integer) > toInteger (maxBound :: Word64)
1086.11 s
[really-safe-money-gen] - then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.11 s
[really-safe-money-gen] - else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.11 s
[really-safe-money-gen] g :: Amount -> String
1086.11 s
[really-safe-money-gen] g = show . Amount.toMinimalQuantisations
1086.11 s
[really-safe-money-gen]
1086.11 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount/Codec.hs:49:12-59
1086.11 s
[really-safe-money-gen] @@ -46,7 +46,7 @@
1086.11 s
[really-safe-money-gen] f s = case readMaybe s of
1086.11 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1086.11 s
[really-safe-money-gen] Just i ->
1086.11 s
[really-safe-money-gen] - if ( i :: Integer) < toInteger (minBound :: Word64)
1086.11 s
[really-safe-money-gen] + if n o t ( ( i :: Integer) < toInteger (minBound :: Word64) )
1086.11 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.11 s
[really-safe-money-gen] else
1086.11 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1086.11 s
[really-safe-money-gen] Testing mutation ListLit at src/Numeric/DecimalLiteral/Codec.hs:40:33-82
1086.11 s
[really-safe-money-gen] @@ -37,5 +37,4 @@
1086.11 s
[really-safe-money-gen] where
1086.11 s
[really-safe-money-gen] f :: String -> Either String DecimalLiteral
1086.11 s
[really-safe-money-gen] f s = case DecimalLiteral.fromString s of
1086.11 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as a DecimalLiteral:", s]
1086.11 s
[really-safe-money-gen] Just a -> Right a
1086.11 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount/Codec.hs:52:16-63
1086.11 s
[really-safe-money-gen] @@ -49,7 +49,7 @@
1086.11 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1086.11 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.11 s
[really-safe-money-gen] else
1086.11 s
[really-safe-money-gen] - if ( i :: Intege r ) > t oIn t e g er (maxBound :: Word64)
1086.11 s
[really-safe-money-gen] + if T r u e
1086.11 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.11 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.11 s
[really-safe-money-gen] g :: Amount -> String
1086.11 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount/Codec.hs:53:35-90
1086.11 s
[really-safe-money-gen] @@ -50,7 +50,6 @@
1086.11 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.11 s
[really-safe-money-gen] else
1086.11 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1086.11 s
[really-safe-money-gen] - then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.11 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.11 s
[really-safe-money-gen] g :: Amount -> String
1086.12 s
[really-safe-money-gen] g = show . Amount.toMinimalQuantisations
1086.12 s
[really-safe-money-gen] Testing mutation Negate at src/Money/Amount/Codec.hs:52:16-63
1086.12 s
[really-safe-money-gen] @@ -49,7 +49,7 @@
1086.12 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1086.12 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.12 s
[really-safe-money-gen] else
1086.12 s
[really-safe-money-gen] - if ( i :: Integer) > toInteger (maxBound :: Word64)
1086.12 s
[really-safe-money-gen] + if n o t ( ( i :: Integer) > toInteger (maxBound :: Word64) )
1086.12 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.12 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.12 s
[really-safe-money-gen] g :: Amount -> String
1086.12 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount/Codec.hs:52:16-63
1086.12 s
[really-safe-money-gen] @@ -49,7 +49,7 @@
1086.12 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1086.12 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.12 s
[really-safe-money-gen] else
1086.12 s
[really-safe-money-gen] - if ( i :: Intege r) > toInteg er ( m a xBo u n d :: Word64)
1086.12 s
[really-safe-money-gen] + if F a l s e
1086.12 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.12 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.12 s
[really-safe-money-gen] g :: Amount -> String
1086.12 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
1086.12 s
[really-safe-money-gen] @@ -49,7 +49,7 @@
1086.12 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1086.12 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.12 s
[really-safe-money-gen] else
1086.12 s
[really-safe-money-gen] - if (i :: Integer) > toInteger (maxBound :: Word64)
1086.12 s
[really-safe-money-gen] + if (i :: Integer) > = toInteger (maxBound :: Word64)
1086.12 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.12 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.12 s
[really-safe-money-gen] g :: Amount -> String
1086.12 s
[really-safe-money-gen] Testing mutation Cmp at src/Money/Amount/Codec.hs:52:16-63
1086.12 s
[really-safe-money-gen] @@ -49,7 +49,7 @@
1086.12 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1086.12 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.12 s
[really-safe-money-gen] else
1086.12 s
[really-safe-money-gen] - if (i :: Integer) > toInteger (maxBound :: Word64)
1086.12 s
[really-safe-money-gen] + if (i :: Integer) < = toInteger (maxBound :: Word64)
1086.13 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.13 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.13 s
[really-safe-money-gen] g :: Amount -> String
1086.13 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account/Codec.hs:50:11-24
1086.13 s
[really-safe-money-gen] @@ -47,9 +47,8 @@
1086.13 s
[really-safe-money-gen] codecViaString = bimapCodec f g stringCodec <?> "Account"
1086.13 s
[really-safe-money-gen] where
1086.13 s
[really-safe-money-gen] f :: String -> Either String Account
1086.13 s
[really-safe-money-gen] f s = case readMaybe s >>= Account.fromMinimalQuantisations of
1086.13 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as an Account:", s]
1086.13 s
[really-safe-money-gen] Just a -> Right a
1086.13 s
[really-safe-money-gen] g :: Account -> String
1086.13 s
[really-safe-money-gen] g = show . Account.toMinimalQuantisations
1086.13 s
[really-safe-money-gen]
1086.13 s
[really-safe-money-gen] Testing mutation ListLit at src/Money/Amount/Codec.hs:53:35-90
1086.13 s
[really-safe-money-gen] @@ -50,7 +50,6 @@
1086.13 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1086.13 s
[really-safe-money-gen] else
1086.13 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1086.13 s
[really-safe-money-gen] - then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1086.13 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1086.13 s
[really-safe-money-gen] g :: Amount -> String
1086.13 s
[really-safe-money-gen] g = show . Amount.toMinimalQuantisations
1086.13 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account/Codec.hs:79:11-24
1086.13 s
[really-safe-money-gen] @@ -76,6 +76,5 @@
1086.13 s
[really-safe-money-gen] <?> "Account"
1086.13 s
[really-safe-money-gen] where
1086.13 s
[really-safe-money-gen] f :: Integer -> Either String Account
1086.13 s
[really-safe-money-gen] f i = case Account.fromMinimalQuantisations i of
1086.13 s
[really-safe-money-gen] - Nothing -> Left $ "Number did not fit into an account value: " <> show i
1086.13 s
[really-safe-money-gen] Just a -> Right a
1086.13 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Account/Codec.hs:79:11-24
1086.13 s
[really-safe-money-gen] @@ -76,6 +76,5 @@
1105.52 s
[really-safe-money-gen] <?> "AKilled: 426
1105.52 s
[really-safe-money-gen] (of which timed out: 0 )
1105.52 s
[really-safe-money-gen] Survived: 58
1105.55 s
[really-safe-money-gen] Uncovered: 40
1105.55 s
[really-safe-money-gen]
1105.55 s
[really-safe-money-gen] Surviving mutations:
1105.55 s
[really-safe-money-gen]
1105.55 s
[really-safe-money-gen] ListLit at src/Money/MultiAccount.hs:66:7-8
1105.55 s
[really-safe-money-gen] @@ -63,11 +63,10 @@
1105.55 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAccount currency) where
1105.55 s
[really-safe-money-gen] validate ma@(MultiAccount m) =
1105.55 s
[really-safe-money-gen] mconcat
1105.55 s
[really-safe-money-gen] - [ genericValidate ma,
1105.55 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1105.55 s
[really-safe-money-gen] declare "The account is not zero" $
1105.55 s
[really-safe-money-gen] a /= Account.zero
1105.55 s
[really-safe-money-gen] ]
1105.55 s
[really-safe-money-gen]
1105.55 s
[really-safe-money-gen] -- TODO no empty currencies
1105.55 s
[really-safe-money-gen]
1105.55 s
[really-safe-money-gen]
1105.55 s
[really-safe-money-gen] ListLit at src/Money/MultiAccount.hs:66:7-8
1105.55 s
[really-safe-money-gen] @@ -63,11 +63,7 @@
1105.55 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAccount currency) where
1105.55 s
[really-safe-money-gen] validate ma@(MultiAccount m) =
1105.55 s
[really-safe-money-gen] mconcat
1105.55 s
[really-safe-money-gen] - [ genericValidate ma,
1105.55 s
[really-safe-money-gen] - decorateMap m $ \_ a ->
1105.55 s
[really-safe-money-gen] - declare "The account is not zero" $
1105.55 s
[really-safe-money-gen] - a /= Account.zero
1105.55 s
[really-safe-money-gen] ]
1105.55 s
[really-safe-money-gen]
1105.55 s
[really-safe-money-gen] -- TODO no empty currencies
1105.55 s
[really-safe-money-gen]
1105.55 s
[really-safe-money-gen]
1105.55 s
[really-safe-money-gen] ConstBool at src/Money/MultiAccount.hs:69:13-30
1105.56 s
[really-safe-money-gen] @@ -66,7 +66,7 @@
1105.56 s
[really-safe-money-gen] [ genericValidate ma,
1105.56 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1105.56 s
[really-safe-money-gen] declare "The account is not zero" $
1105.56 s
[really-safe-money-gen] - a / = Ac co u nt .z e ro
1105.56 s
[really-safe-money-gen] + T r u e
1105.56 s
[really-safe-money-gen] ]
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen] -- TODO no empty currencies
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen] ConstBool at src/Money/MultiAccount.hs:78:6-28
1105.56 s
[really-safe-money-gen] @@ -75,7 +75,7 @@
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen] fromAccount :: currency -> Account -> MultiAccount currency
1105.56 s
[really-safe-money-gen] fromAccount currency amount =
1105.56 s
[really-safe-money-gen] - if a m o unt == A cco u n t.z e ro
1105.56 s
[really-safe-money-gen] + if Tr u e
1105.56 s
[really-safe-money-gen] then zero
1105.56 s
[really-safe-money-gen] else MultiAccount $ M.singleton currency amount
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen] MaybeOp at src/Money/MultiAccount.hs:113:40-46
1105.56 s
[really-safe-money-gen] @@ -110,7 +110,7 @@
1105.56 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1105.56 s
[really-safe-money-gen] addAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1105.56 s
[really-safe-money-gen] addAccount m _ (Positive (Amount 0)) = Just m
1105.56 s
[really-safe-money-gen] - addAccount m _ (Negative (Amount 0)) = J u s t m
1105.56 s
[really-safe-money-gen] + addAccount m _ (Negative (Amount 0)) = No t h ing
1105.56 s
[really-safe-money-gen] addAccount (MultiAccount m) currency account =
1105.56 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1105.56 s
[really-safe-money-gen] Nothing -> Just $ M.insert currency account m
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen] MaybeOp at src/Money/MultiAccount.hs:127:45-51
1105.56 s
[really-safe-money-gen] @@ -124,7 +124,7 @@
1105.56 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1105.56 s
[really-safe-money-gen] subtractAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1105.56 s
[really-safe-money-gen] subtractAccount m _ (Positive (Amount 0)) = Just m
1105.56 s
[really-safe-money-gen] - subtractAccount m _ (Negative (Amount 0)) = J u s t m
1105.56 s
[really-safe-money-gen] + subtractAccount m _ (Negative (Amount 0)) = No t h ing
1105.56 s
[really-safe-money-gen] subtractAccount (MultiAccount m) currency account =
1105.56 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1105.56 s
[really-safe-money-gen] Nothing -> Just $ M.insert currency (Account.negate account) m
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen] MaybeOp at src/Money/MultiAccount.hs:126:45-51
1105.56 s
[really-safe-money-gen] @@ -123,7 +123,7 @@
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen] -- | Add an 'Account' to a 'MultiAccount'
1105.56 s
[really-safe-money-gen] subtractAccount :: (Ord currency) => MultiAccount currency -> currency -> Account -> Maybe (MultiAccount currency)
1105.56 s
[really-safe-money-gen] - subtractAccount m _ (Positive (Amount 0)) = J u s t m
1105.56 s
[really-safe-money-gen] + subtractAccount m _ (Positive (Amount 0)) = No t h ing
1105.56 s
[really-safe-money-gen] subtractAccount m _ (Negative (Amount 0)) = Just m
1105.56 s
[really-safe-money-gen] subtractAccount (MultiAccount m) currency account =
1105.56 s
[really-safe-money-gen] fmap MultiAccount $ case M.lookup currency m of
1105.56 s
[really-safe-money-gen]
1105.56 s
[really-safe-money-gen] ListLit at src/Money/MultiAmount.hs:63:7-8
1105.56 s
[really-safe-money-gen] @@ -60,11 +60,10 @@
1105.56 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAmount currency) where
1105.56 s
[really-safe-money-gen] validate ma@(MultiAmount m) =
1105.56 s
[really-safe-money-gen] mconcat
1105.56 s
[really-safe-money-gen] - [ genericValidate ma,
1105.56 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1105.56 s
[really-safe-money-gen] declare "The amount is not zero" $
1105.56 s
[really-safe-money-gen] a /= Amount.zero
1105.57 s
[really-safe-money-gen] ]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] ListLit at src/Money/MultiAmount.hs:63:7-8
1105.57 s
[really-safe-money-gen] @@ -60,11 +60,7 @@
1105.57 s
[really-safe-money-gen] instance (Validity currency, Show currency, Ord currency) => Validity (MultiAmount currency) where
1105.57 s
[really-safe-money-gen] validate ma@(MultiAmount m) =
1105.57 s
[really-safe-money-gen] mconcat
1105.57 s
[really-safe-money-gen] - [ genericValidate ma,
1105.57 s
[really-safe-money-gen] - decorateMap m $ \_ a ->
1105.57 s
[really-safe-money-gen] - declare "The amount is not zero" $
1105.57 s
[really-safe-money-gen] - a /= Amount.zero
1105.57 s
[really-safe-money-gen] ]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] ConstBool at src/Money/MultiAmount.hs:66:13-29
1105.57 s
[really-safe-money-gen] @@ -63,7 +63,7 @@
1105.57 s
[really-safe-money-gen] [ genericValidate ma,
1105.57 s
[really-safe-money-gen] decorateMap m $ \_ a ->
1105.57 s
[really-safe-money-gen] declare "The amount is not zero" $
1105.57 s
[really-safe-money-gen] - a / = A mo u nt .z e ro
1105.57 s
[really-safe-money-gen] + Tr u e
1105.57 s
[really-safe-money-gen] ]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] instance (NFData currency) => NFData (MultiAmount currency)
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] ConstBool at src/Money/MultiAmount.hs:106:12-28
1105.57 s
[really-safe-money-gen] @@ -103,7 +103,7 @@
1105.57 s
[really-safe-money-gen] Just a -> do
1105.57 s
[really-safe-money-gen] r <- Amount.add a amount
1105.57 s
[really-safe-money-gen] Just $
1105.57 s
[really-safe-money-gen] - if r == A mount .z e ro
1105.57 s
[really-safe-money-gen] + if Fal s e
1105.57 s
[really-safe-money-gen] then M.delete currency m
1105.57 s
[really-safe-money-gen] else M.insert currency r m
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] Negate at src/Money/MultiAmount.hs:119:12-28
1105.57 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
1105.57 s
[really-safe-money-gen] Just a -> do
1105.57 s
[really-safe-money-gen] r <- Amount.subtract a amount
1105.57 s
[really-safe-money-gen] Just $
1105.57 s
[really-safe-money-gen] - if r == Amount.zero
1105.57 s
[really-safe-money-gen] + if n o t ( r == Amount.zero )
1105.57 s
[really-safe-money-gen] then M.delete currency m
1105.57 s
[really-safe-money-gen] else M.insert currency r m
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] ConstBool at src/Money/MultiAmount.hs:119:12-28
1105.57 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
1105.57 s
[really-safe-money-gen] Just a -> do
1105.57 s
[really-safe-money-gen] r <- Amount.subtract a amount
1105.57 s
[really-safe-money-gen] Just $
1105.57 s
[really-safe-money-gen] - if r == A mount .z e ro
1105.57 s
[really-safe-money-gen] + if Fal s e
1105.57 s
[really-safe-money-gen] then M.delete currency m
1105.57 s
[really-safe-money-gen] else M.insert currency r m
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] ConstBool at src/Money/MultiAmount.hs:119:12-28
1105.57 s
[really-safe-money-gen] @@ -116,7 +116,7 @@
1105.57 s
[really-safe-money-gen] Just a -> do
1105.57 s
[really-safe-money-gen] r <- Amount.subtract a amount
1105.57 s
[really-safe-money-gen] Just $
1105.57 s
[really-safe-money-gen] - if r == Am o u n t. z e r o
1105.57 s
[really-safe-money-gen] + if T r u e
1105.57 s
[really-safe-money-gen] then M.delete currency m
1105.57 s
[really-safe-money-gen] else M.insert currency r m
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] MaybeOp at src/Money/MultiAmount.hs:112:33-39
1105.57 s
[really-safe-money-gen] @@ -109,7 +109,7 @@
1105.57 s
[really-safe-money-gen]
1105.57 s
[really-safe-money-gen] -- | Subtract an 'Amount' from a 'MultiAmount'
1105.57 s
[really-safe-money-gen] subtractAmount :: (Ord currency) => MultiAmount currency -> currency -> Amount -> Maybe (MultiAmount currency)
1105.57 s
[really-safe-money-gen] - subtractAmount m _ (Amount 0) = J u s t m
1105.57 s
[really-safe-money-gen] + subtractAmount m _ (Amount 0) = No t h ing
1105.57 s
[really-safe-money-gen] subtractAmount (MultiAmount m) currency amount =
1105.57 s
[really-safe-money-gen] fmap MultiAmount $ case M.lookup currency m of
1105.57 s
[really-safe-money-gen] Nothing -> Nothing -- Can't go below zero
1105.57 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] Cmp at src/Money/MultiAmount.hs:168:20-45
1105.58 s
[really-safe-money-gen] @@ -165,7 +165,7 @@
1105.58 s
[really-safe-money-gen] maxBoundN :: Natural
1105.58 s
[really-safe-money-gen] maxBoundN = fromIntegral (maxBound :: Word64)
1105.58 s
[really-safe-money-gen] actualResult =
1105.58 s
[really-safe-money-gen] - if roundedResult > maxBoundN
1105.58 s
[really-safe-money-gen] + if roundedResult > = maxBoundN
1105.58 s
[really-safe-money-gen] then Nothing
1105.58 s
[really-safe-money-gen] else Just (fromIntegral roundedResult)
1105.58 s
[really-safe-money-gen] rounded = case compare (fromIntegral roundedResult) theoreticalResult of
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] ListLit at src/Money/Amount.hs:603:7-8
1105.58 s
[really-safe-money-gen] @@ -600,13 +600,12 @@
1105.58 s
[really-safe-money-gen] instance (Validity amount, Ord amount) => Validity (Distribution amount) where
1105.58 s
[really-safe-money-gen] validate ad =
1105.58 s
[really-safe-money-gen] mconcat
1105.58 s
[really-safe-money-gen] - [ genericValidate ad,
1105.58 s
[really-safe-money-gen] case ad of
1105.58 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1105.58 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1105.58 s
[really-safe-money-gen] a1 > a2
1105.58 s
[really-safe-money-gen] _ -> valid
1105.58 s
[really-safe-money-gen] ]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] instance (NFData amount) => NFData (Distribution amount)
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] ListLit at src/Money/Amount.hs:603:7-8
1105.58 s
[really-safe-money-gen] @@ -600,13 +600,7 @@
1105.58 s
[really-safe-money-gen] instance (Validity amount, Ord amount) => Validity (Distribution amount) where
1105.58 s
[really-safe-money-gen] validate ad =
1105.58 s
[really-safe-money-gen] mconcat
1105.58 s
[really-safe-money-gen] - [ genericValidate ad,
1105.58 s
[really-safe-money-gen] - case ad of
1105.58 s
[really-safe-money-gen] - DistributedIntoUnequalChunks _ a1 _ a2 ->
1105.58 s
[really-safe-money-gen] - declare "The larger chunks are larger" $
1105.58 s
[really-safe-money-gen] - a1 > a2
1105.58 s
[really-safe-money-gen] - _ -> valid
1105.58 s
[really-safe-money-gen] ]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] instance (NFData amount) => NFData (Distribution amount)
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] RemoveCase at src/Money/Amount.hs:604:9-21
1105.58 s
[really-safe-money-gen] @@ -601,11 +601,8 @@
1105.58 s
[really-safe-money-gen] validate ad =
1105.58 s
[really-safe-money-gen] mconcat
1105.58 s
[really-safe-money-gen] [ genericValidate ad,
1105.58 s
[really-safe-money-gen] case ad of
1105.58 s
[really-safe-money-gen] - DistributedIntoUnequalChunks _ a1 _ a2 ->
1105.58 s
[really-safe-money-gen] - declare "The larger chunks are larger" $
1105.58 s
[really-safe-money-gen] - a1 > a2
1105.58 s
[really-safe-money-gen] _ -> valid
1105.58 s
[really-safe-money-gen] ]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] instance (NFData amount) => NFData (Distribution amount)
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] ConstBool at src/Money/Amount.hs:607:15-22
1105.58 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
1105.58 s
[really-safe-money-gen] case ad of
1105.58 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1105.58 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1105.58 s
[really-safe-money-gen] - a 1 > a2
1105.58 s
[really-safe-money-gen] + T rue
1105.58 s
[really-safe-money-gen] _ -> valid
1105.58 s
[really-safe-money-gen] ]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] Cmp at src/Money/Amount.hs:607:15-22
1105.58 s
[really-safe-money-gen] @@ -604,7 +604,7 @@
1105.58 s
[really-safe-money-gen] case ad of
1105.58 s
[really-safe-money-gen] DistributedIntoUnequalChunks _ a1 _ a2 ->
1105.58 s
[really-safe-money-gen] declare "The larger chunks are larger" $
1105.58 s
[really-safe-money-gen] - a1 > a2
1105.58 s
[really-safe-money-gen] + a1 > = a2
1105.58 s
[really-safe-money-gen] _ -> valid
1105.58 s
[really-safe-money-gen] ]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] MaybeOp at src/Money/Amount.hs:661:19-28
1105.58 s
[really-safe-money-gen] @@ -658,7 +658,7 @@
1105.58 s
[really-safe-money-gen] -- | The amount and the real rate that was used, considering the 'Rounding'
1105.58 s
[really-safe-money-gen] (Maybe Amount, Ratio Natural)
1105.58 s
[really-safe-money-gen] fraction _ (Amount 0) f = (Just zero, f)
1105.58 s
[really-safe-money-gen] - fraction _ _ 0 = ( J u st ze r o , 0)
1105.58 s
[really-safe-money-gen] + fraction _ _ 0 = ( N o th in g , 0)
1105.58 s
[really-safe-money-gen] fraction r (Amount a) f =
1105.58 s
[really-safe-money-gen] let amountAsRatio :: Ratio Natural
1105.58 s
[really-safe-money-gen] amountAsRatio = (fromIntegral :: Word64 -> Ratio Natural) a
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] Cmp at src/Money/Amount.hs:495:10-23
1105.58 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
1105.58 s
[really-safe-money-gen] maxBoundI = fromIntegral (maxBound :: Word64)
1105.58 s
[really-safe-money-gen] r :: Integer
1105.58 s
[really-safe-money-gen] r = foldl' (\acc a -> (toInteger :: Word64 -> Integer) (toMinimalQuantisations a) + acc) 0 l
1105.58 s
[really-safe-money-gen] - in if r > maxBoundI
1105.58 s
[really-safe-money-gen] + in if r > = maxBoundI
1105.58 s
[really-safe-money-gen] then Nothing
1105.58 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen]
1105.58 s
[really-safe-money-gen] Cmp at src/Money/Amount.hs:341:26-91
1105.58 s
[really-safe-money-gen] @@ -338,7 +338,7 @@
1105.59 s
[really-safe-money-gen] floored = (floor :: Double -> Natural) resultDouble
1105.59 s
[really-safe-money-gen] in if ceiled == floored
1105.59 s
[really-safe-money-gen] then
1105.59 s
[really-safe-money-gen] - if ceiled > (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1105.59 s
[really-safe-money-gen] + if ceiled > = (fromIntegral :: Word64 -> Natural) (maxBound :: Word64)
1105.59 s
[really-safe-money-gen] then Nothing
1105.59 s
[really-safe-money-gen] else Just $ Amount (fromIntegral ceiled)
1105.59 s
[really-safe-money-gen] else Nothing
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen] ConstBool at src/Money/Amount.hs:332:14-40
1105.59 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1105.59 s
[really-safe-money-gen] | otherwise =
1105.59 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1105.59 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1105.59 s
[really-safe-money-gen] - if e xp one nt r e s ultDoub l e > 65
1105.59 s
[really-safe-money-gen] + if Fa l s e
1105.59 s
[really-safe-money-gen] then Nothing
1105.59 s
[really-safe-money-gen] else
1105.59 s
[really-safe-money-gen] let ceiled :: Natural
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen] Cmp at src/Money/Amount.hs:332:14-40
1105.59 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1105.59 s
[really-safe-money-gen] | otherwise =
1105.59 s
[really-safe-money-gen] -- Shortcut for numbers that are way too big anyway
1105.59 s
[really-safe-money-gen] -- so that we don't have to compute the according 'Natural' values.
1105.59 s
[really-safe-money-gen] - if exponent resultDouble > 65
1105.59 s
[really-safe-money-gen] + if exponent resultDouble > = 65
1105.59 s
[really-safe-money-gen] then Nothing
1105.59 s
[really-safe-money-gen] else
1105.59 s
[really-safe-money-gen] let ceiled :: Natural
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen] MaybeOp at src/Money/Amount.hs:520:14-66
1105.59 s
[really-safe-money-gen] @@ -517,7 +517,7 @@
1105.59 s
[really-safe-money-gen] r = i1 - i2
1105.59 s
[really-safe-money-gen] in if r < 0
1105.59 s
[really-safe-money-gen] then Nothing
1105.59 s
[really-safe-money-gen] - else J u s t ( Am o u n t ( (f rom I n t e g er :: Integer -> Word64) r))
1105.59 s
[really-safe-money-gen] + else N o t hi n g
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen] -- | Multiply an amount of money by an integer scalar
1105.59 s
[really-safe-money-gen] --
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen] ConstBool at src/Money/Amount.hs:518:10-15
1105.59 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1105.59 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1105.59 s
[really-safe-money-gen] r :: Integer
1105.59 s
[really-safe-money-gen] r = i1 - i2
1105.59 s
[really-safe-money-gen] - in if r < 0
1105.59 s
[really-safe-money-gen] + in if T r ue
1105.59 s
[really-safe-money-gen] then Nothing
1105.59 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen] Cmp at src/Money/Amount.hs:518:10-15
1105.59 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1105.59 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1105.59 s
[really-safe-money-gen] r :: Integer
1105.59 s
[really-safe-money-gen] r = i1 - i2
1105.59 s
[really-safe-money-gen] - in if r < 0
1105.59 s
[really-safe-money-gen] + in if r < = 0
1105.59 s
[really-safe-money-gen] then Nothing
1105.59 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen]
1105.59 s
[really-safe-money-gen] IntLit at src/Money/Amount.hs:518:14-15
1105.59 s
[really-safe-money-gen] @@ -515,7 +515,7 @@
1105.60 s
[really-safe-money-gen] i2 = (fromIntegral :: Word64 -> Integer) a2
1105.60 s
[really-safe-money-gen] r :: Integer
1105.60 s
[really-safe-money-gen] r = i1 - i2
1105.60 s
[really-safe-money-gen] - in if r < 0
1105.60 s
[really-safe-money-gen] + in if r < 1
1105.60 s
[really-safe-money-gen] then Nothing
1105.60 s
[really-safe-money-gen] else Just (Amount ((fromInteger :: Integer -> Word64) r))
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] ListLit at src/Money/QuantisationFactor.hs:39:7-8
1105.60 s
[really-safe-money-gen] @@ -36,9 +36,8 @@
1105.60 s
[really-safe-money-gen] instance Validity QuantisationFactor where
1105.60 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1105.60 s
[really-safe-money-gen] mconcat
1105.60 s
[really-safe-money-gen] - [ genericValidate qf,
1105.60 s
[really-safe-money-gen] declare "The quantisation factor is not zero" $ w /= 0
1105.60 s
[really-safe-money-gen] ]
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] instance NFData QuantisationFactor
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] ListLit at src/Money/QuantisationFactor.hs:39:7-8
1105.60 s
[really-safe-money-gen] @@ -36,9 +36,7 @@
1105.60 s
[really-safe-money-gen] instance Validity QuantisationFactor where
1105.60 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1105.60 s
[really-safe-money-gen] mconcat
1105.60 s
[really-safe-money-gen] - [ genericValidate qf,
1105.60 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
1105.60 s
[really-safe-money-gen] ]
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] instance NFData QuantisationFactor
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] ConstBool at src/Money/QuantisationFactor.hs:40:57-63
1105.60 s
[really-safe-money-gen] @@ -37,7 +37,7 @@
1105.60 s
[really-safe-money-gen] validate qf@(QuantisationFactor w) =
1105.60 s
[really-safe-money-gen] mconcat
1105.60 s
[really-safe-money-gen] [ genericValidate qf,
1105.60 s
[really-safe-money-gen] - declare "The quantisation factor is not zero" $ w /= 0
1105.60 s
[really-safe-money-gen] + declare "The quantisation factor is not zero" $ Tru e
1105.60 s
[really-safe-money-gen] ]
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] instance NFData QuantisationFactor
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] Cmp at src/Money/ConversionRate.hs:72:21-26
1105.60 s
[really-safe-money-gen] @@ -69,7 +69,7 @@
1105.60 s
[really-safe-money-gen] -- >>> fromRational (0 % 1)
1105.60 s
[really-safe-money-gen] -- Nothing
1105.60 s
[really-safe-money-gen] fromRational :: Rational -> Maybe ConversionRate
1105.60 s
[really-safe-money-gen] - fromRational r = if r < 0 then Nothing else fromRatio (realToFrac r)
1105.60 s
[really-safe-money-gen] + fromRational r = if r < = 0 then Nothing else fromRatio (realToFrac r)
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] -- | Turn a 'ConversionRate' back into a 'Rational'
1105.60 s
[really-safe-money-gen] --
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] IntLit at src/Money/ConversionRate.hs:109:27-28
1105.60 s
[really-safe-money-gen] @@ -106,7 +106,7 @@
1105.60 s
[really-safe-money-gen]
1105.60 s
[really-safe-money-gen] -- | One-to-one conversion rate
1105.60 s
[really-safe-money-gen] oneToOne :: ConversionRate
1105.61 s
[really-safe-money-gen] - oneToOne = ConversionRate 1
1105.61 s
[really-safe-money-gen] + oneToOne = ConversionRate 0
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] -- | Invert a 'ConversionRate', to convert in the other direction.
1105.61 s
[really-safe-money-gen] --
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] Arith at src/Money/ConversionRate.hs:127:70-79
1105.61 s
[really-safe-money-gen] @@ -124,7 +124,7 @@
1105.61 s
[really-safe-money-gen] -- >>> compose (ConversionRate (2 % 1)) (ConversionRate (1 % 2))
1105.61 s
[really-safe-money-gen] -- ConversionRate {unConversionRate = 1 % 1}
1105.61 s
[really-safe-money-gen] compose :: ConversionRate -> ConversionRate -> ConversionRate
1105.61 s
[really-safe-money-gen] - compose (ConversionRate cr1) (ConversionRate cr2) = ConversionRate $ cr1 * cr2
1105.61 s
[really-safe-money-gen] + compose (ConversionRate cr1) (ConversionRate cr2) = ConversionRate $ cr1 + cr2
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] -- | The factor to multiply by when converting currencies.
1105.61 s
[really-safe-money-gen] conversionFactor :: QuantisationFactor -> ConversionRate -> QuantisationFactor -> Ratio Natural
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] RemoveCase at src/Money/AccountOf.hs:180:30-115
1105.61 s
[really-safe-money-gen] @@ -177,11 +177,10 @@
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] -- | See 'Account.distribute'
1105.61 s
[really-safe-money-gen] distribute :: AccountOf currency -> Word16 -> AccountDistributionOf currency
1105.61 s
[really-safe-money-gen] distribute (AccountOf a) w = case Account.distribute a w of
1105.61 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
1105.61 s
[really-safe-money-gen] DistributedZero -> DistributedZero
1105.61 s
[really-safe-money-gen] - DistributedIntoEqualChunks w' a' -> DistributedIntoEqualChunks w' (fromAccount a')
1105.61 s
[really-safe-money-gen] DistributedIntoUnequalChunks w1 a1 w2 a2 -> DistributedIntoUnequalChunks w1 (fromAccount a1) w2 (fromAccount a2)
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] -- | The result of 'distribute'
1105.61 s
[really-safe-money-gen] type AccountDistributionOf (currency :: k) = Distribution (AccountOf currency)
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] RemoveCase at src/Numeric/DecimalLiteral.hs:112:17-21
1105.61 s
[really-safe-money-gen] @@ -109,9 +109,8 @@
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] -- | Like 'fromString' but in a 'MonadFail'
1105.61 s
[really-safe-money-gen] fromStringM :: (MonadFail m) => String -> m DecimalLiteral
1105.61 s
[really-safe-money-gen] fromStringM s = case Numeric.DecimalLiteral.fromString s of
1105.61 s
[really-safe-money-gen] Nothing -> fail $ "Failed to parse decimal literal from: " <> show s
1105.61 s
[really-safe-money-gen] - Just dl -> pure dl
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] decimalLiteralP :: ReadP DecimalLiteral
1105.61 s
[really-safe-money-gen] decimalLiteralP = do
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] RemoveCase at src/Numeric/DecimalLiteral.hs:287:38-40
1105.61 s
[really-safe-money-gen] @@ -284,9 +284,8 @@
1105.61 s
[really-safe-money-gen] -- >>> toRatio (DecimalLiteral (Just False) 3 1)
1105.61 s
[really-safe-money-gen] -- Nothing
1105.61 s
[really-safe-money-gen] toRatio :: DecimalLiteral -> Maybe (Ratio Natural)
1105.61 s
[really-safe-money-gen] toRatio (DecimalLiteral mSign m e) = case mSign of
1105.61 s
[really-safe-money-gen] - Just False -> Nothing
1105.61 s
[really-safe-money-gen] _ -> Just $ fromIntegral m / (10 ^ e)
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Word'
1105.61 s
[really-safe-money-gen] fromWord :: Word -> DecimalLiteral
1105.61 s
[really-safe-money-gen]
1105.61 s
[really-safe-money-gen] IntLit at src/Numeric/DecimalLiteral.hs:289:33-35
1105.61 s
[really-safe-money-gen] @@ -286,7 +286,7 @@
1105.62 s
[really-safe-money-gen] toRatio :: DecimalLiteral -> Maybe (Ratio Natural)
1105.62 s
[really-safe-money-gen] toRatio (DecimalLiteral mSign m e) = case mSign of
1105.62 s
[really-safe-money-gen] Just False -> Nothing
1105.62 s
[really-safe-money-gen] - _ -> Just $ fromIntegral m / (1 0 ^ e)
1105.62 s
[really-safe-money-gen] + _ -> Just $ fromIntegral m / (1 ^ e)
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Word'
1105.62 s
[really-safe-money-gen] fromWord :: Word -> DecimalLiteral
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] RemoveAction at src/Numeric/DecimalLiteral.hs:299:3-47
1105.62 s
[really-safe-money-gen] @@ -296,7 +296,6 @@
1105.62 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
1105.62 s
[really-safe-money-gen] toWord dl = do
1105.62 s
[really-safe-money-gen] n <- toNatural dl
1105.62 s
[really-safe-money-gen] - guard $ n <= fromIntegral (maxBound :: Word)
1105.62 s
[really-safe-money-gen] pure $ fromIntegral n
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] ConstBool at src/Numeric/DecimalLiteral.hs:299:11-47
1105.62 s
[really-safe-money-gen] @@ -296,7 +296,7 @@
1105.62 s
[really-safe-money-gen] toWord :: DecimalLiteral -> Maybe Word
1105.62 s
[really-safe-money-gen] toWord dl = do
1105.62 s
[really-safe-money-gen] n <- toNatural dl
1105.62 s
[really-safe-money-gen] - guard $ n < = from I n te g r a l (maxB o u n d : : W ord)
1105.62 s
[really-safe-money-gen] + guard $ T r u e
1105.62 s
[really-safe-money-gen] pure $ fromIntegral n
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] -- | Construct a 'DecimalLiteral' from a 'Natural'
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] RemoveAction at src/Numeric/DecimalLiteral.hs:332:3-46
1105.62 s
[really-safe-money-gen] @@ -329,7 +329,6 @@
1105.62 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
1105.62 s
[really-safe-money-gen] toInt dl = do
1105.62 s
[really-safe-money-gen] n <- toInteger dl
1105.62 s
[really-safe-money-gen] - guard $ n <= fromIntegral (maxBound :: Int)
1105.62 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
1105.62 s
[really-safe-money-gen] pure $ fromIntegral n
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] RemoveAction at src/Numeric/DecimalLiteral.hs:333:3-46
1105.62 s
[really-safe-money-gen] @@ -330,7 +330,6 @@
1105.62 s
[really-safe-money-gen] toInt dl = do
1105.62 s
[really-safe-money-gen] n <- toInteger dl
1105.62 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
1105.62 s
[really-safe-money-gen] - guard $ n >= fromIntegral (minBound :: Int)
1105.62 s
[really-safe-money-gen] pure $ fromIntegral n
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] ConstBool at src/Numeric/DecimalLiteral.hs:333:11-46
1105.62 s
[really-safe-money-gen] @@ -330,7 +330,7 @@
1105.62 s
[really-safe-money-gen] toInt dl = do
1105.62 s
[really-safe-money-gen] n <- toInteger dl
1105.62 s
[really-safe-money-gen] guard $ n <= fromIntegral (maxBound :: Int)
1105.62 s
[really-safe-money-gen] - guard $ n >= f r om I n t e g ral (minBound :: Int)
1105.62 s
[really-safe-money-gen] + guard $ T r u e
1105.62 s
[really-safe-money-gen] pure $ fromIntegral n
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
1105.62 s
[really-safe-money-gen]
1105.62 s
[really-safe-money-gen] ConstBool at src/Numeric/DecimalLiteral.hs:332:11-46
1105.62 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1105.62 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
1105.62 s
[really-safe-money-gen] toInt dl = do
1105.62 s
[really-safe-money-gen] n <- toInteger dl
1105.62 s
[really-safe-money-gen] - guard $ n <= f r om I n t e g ral (maxBound :: Int)
1105.62 s
[really-safe-money-gen] + guard $ T r u e
1105.62 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
1105.63 s
[really-safe-money-gen] pure $ fromIntegral n
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] Cmp at src/Numeric/DecimalLiteral.hs:332:11-46
1105.63 s
[really-safe-money-gen] @@ -329,7 +329,7 @@
1105.63 s
[really-safe-money-gen] toInt :: DecimalLiteral -> Maybe Int
1105.63 s
[really-safe-money-gen] toInt dl = do
1105.63 s
[really-safe-money-gen] n <- toInteger dl
1105.63 s
[really-safe-money-gen] - guard $ n < = fromIntegral (maxBound :: Int)
1105.63 s
[really-safe-money-gen] + guard $ n < fromIntegral (maxBound :: Int)
1105.63 s
[really-safe-money-gen] guard $ n >= fromIntegral (minBound :: Int)
1105.63 s
[really-safe-money-gen] pure $ fromIntegral n
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] Cmp at src/Numeric/DecimalLiteral.hs:337:16-22
1105.63 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
1105.63 s
[really-safe-money-gen] pure $ fromIntegral n
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
1105.63 s
[really-safe-money-gen] - numSign a = if a > = 0 then Nothing else Just False
1105.63 s
[really-safe-money-gen] + numSign a = if a > 0 then Nothing else Just False
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
1105.63 s
[really-safe-money-gen] signSignum = \case
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] IntLit at src/Numeric/DecimalLiteral.hs:337:21-22
1105.63 s
[really-safe-money-gen] @@ -334,7 +334,7 @@
1105.63 s
[really-safe-money-gen] pure $ fromIntegral n
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] numSign :: (Ord a, Num a) => a -> Maybe Bool
1105.63 s
[really-safe-money-gen] - numSign a = if a >= 0 then Nothing else Just False
1105.63 s
[really-safe-money-gen] + numSign a = if a >= 1 then Nothing else Just False
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] signSignum :: (Num a) => Maybe Bool -> (a -> a)
1105.63 s
[really-safe-money-gen] signSignum = \case
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] Cmp at src/Money/Account.hs:131:20-26
1105.63 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
1105.63 s
[really-safe-money-gen] amount :: Amount
1105.63 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
1105.63 s
[really-safe-money-gen] in Just $
1105.63 s
[really-safe-money-gen] - if i > = 0
1105.63 s
[really-safe-money-gen] + if i > 0
1105.63 s
[really-safe-money-gen] then Positive amount
1105.63 s
[really-safe-money-gen] else Negative amount
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] IntLit at src/Money/Account.hs:131:25-26
1105.63 s
[really-safe-money-gen] @@ -128,7 +128,7 @@
1105.63 s
[really-safe-money-gen] amount :: Amount
1105.63 s
[really-safe-money-gen] amount = Amount.fromMinimalQuantisations w
1105.63 s
[really-safe-money-gen] in Just $
1105.63 s
[really-safe-money-gen] - if i >= 0
1105.63 s
[really-safe-money-gen] + if i >= 1
1105.63 s
[really-safe-money-gen] then Positive amount
1105.63 s
[really-safe-money-gen] else Negative amount
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen]
1105.63 s
[really-safe-money-gen] ConstBool at src/Money/Account.hs:123:10-23
1105.63 s
[really-safe-money-gen] @@ -120,7 +120,7 @@
1105.63 s
[really-safe-money-gen] maxBoundI = (toInteger :: Word64 -> Integer) (maxBound :: Word64)
1105.63 s
[really-safe-money-gen] a :: Integer
1105.63 s
[really-safe-money-gen] a = (Prelude.abs :: Integer -> Integer) i
1105.63 s
[really-safe-money-gen] - in if a > m a xB ound I
1105.64 s
[really-safe-money-gen] + in if F a l se
1105.64 s
[really-safe-money-gen] then Nothing
1105.64 s
[really-safe-money-gen] else
1105.64 s
[really-safe-money-gen] let w :: Word64
1105.64 s
[really-safe-money-gen]
1105.64 s
[really-safe-money-gen] Cmp at src/Money/Account.hs:197:14-20
1105.64 s
[really-safe-money-gen] @@ -194,7 +194,7 @@
1105.64 s
[really-safe-money-gen] fromDouble :: QuantisationFactor -> Double -> Maybe Account
1105.64 s
[really-safe-money-gen] fromDouble quantisationFactor d =
1105.64 s
[really-safe-money-gen] let d' = Prelude.abs d
1105.64 s
[really-safe-money-gen] - f = if d > = 0 then Positive else Negative
1105.64 s
[really-safe-money-gen] + f = if d > 0 then Positive else Negative
1105.64 s
[really-safe-money-gen] in f <$> Amount.fromDouble quantisationFactor d'
1105.64 s
[really-safe-money-gen]
1105.64 s
[really-safe-money-gen] -- | Turn an amount of money into a 'Rational'.
1105.64 s
[really-safe-money-gen]
1105.64 s
[really-safe-money-gen] Cmp at src/Money/Account.hs:503:10-16
1105.64 s
[really-safe-money-gen] @@ -500,7 +500,7 @@
1105.64 s
[really-safe-money-gen] RoundNearest -> RoundNearest
1105.64 s
[really-safe-money-gen] (ma, ar) = fractionRatio ro account af
1105.64 s
[really-safe-money-gen] r = (realToFrac :: Ratio Natural -> Rational) ar
1105.64 s
[really-safe-money-gen] - in if f > = 0
1105.64 s
[really-safe-money-gen] + in if f > 0
1105.64 s
[really-safe-money-gen] then (ma, r)
1105.64 s
[really-safe-money-gen] else (negate <$> ma, -r)
1105.64 s
[really-safe-money-gen]
1105.64 s
[really-safe-money-gen]
1105.64 s
[really-safe-money-gen] Cmp at src/Money/Account.hs:495:12-18
1105.64 s
[really-safe-money-gen] @@ -492,7 +492,7 @@
1105.64 s
[really-safe-money-gen] fraction rounding account f =
1105.64 s
[really-safe-money-gen] let af = (realToFrac :: Rational -> Ratio Natural) ((Prelude.abs :: Rational -> Rational) f)
1105.64 s
[really-safe-money-gen] ro =
1105.64 s
[really-safe-money-gen] - if f > = 0
1105.64 s
[really-safe-money-gen] + if f > 0
1105.64 s
[really-safe-money-gen] then rounding
1105.64 s
[really-safe-money-gen] else case rounding of
1105.64 s
[really-safe-money-gen] RoundUp -> RoundDown
1105.64 s
[really-safe-money-gen]
1105.64 s
[really-safe-money-gen] MaybeOp at src/Money/Account.hs:523:16-25
1105.64 s
[really-safe-money-gen] @@ -520,7 +520,7 @@
1105.64 s
[really-safe-money-gen] (amount, actualFraction) = Amount.fraction ro aa af
1105.64 s
[really-safe-money-gen] func :: Maybe Amount -> Ratio Natural -> (Maybe Account, Ratio Natural)
1105.64 s
[really-safe-money-gen] func ma r = case compare account zero of
1105.64 s
[really-safe-money-gen] - EQ -> ( J u st ze r o , r)
1105.64 s
[really-safe-money-gen] + EQ -> ( N o th in g , r)
1105.64 s
[really-safe-money-gen] GT -> (Positive <$> ma, r)
1105.64 s
[really-safe-money-gen] LT -> (Negative <$> ma, r)
1105.64 s
[really-safe-money-gen] in func amount actualFraction
1105.64 s
[really-safe-money-gen]
1105.64 s
[really-safe-money-gen] Cmp at src/Money/Account.hs:455:14-23
1105.64 s
[really-safe-money-gen] @@ -452,7 +452,7 @@
1105.64 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
1105.64 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
1105.64 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
1105.64 s
[really-safe-money-gen] - if a > = zero
1105.64 s
[really-safe-money-gen] + if a > zero
1105.64 s
[really-safe-money-gen] then DistributedIntoUnequalChunks numberOfLargerChunks (Positive largerChunk) numberOfSmallerChunks (Positive smallerChunk)
1105.65 s
[really-safe-money-gen] else DistributedIntoUnequalChunks numberOfSmallerChunks (Negative smallerChunk) numberOfLargerChunks (Negative largerChunk)
1105.65 s
[really-safe-money-gen]
1105.65 s
[really-safe-money-gen]
1105.65 s
[really-safe-money-gen] Cmp at src/Money/Account.hs:451:14-23
1105.65 s
[really-safe-money-gen] @@ -448,7 +448,7 @@
1105.65 s
[really-safe-money-gen] DistributedIntoZeroChunks -> DistributedIntoZeroChunks
1105.65 s
[really-safe-money-gen] DistributedZero -> DistributedZero
1105.65 s
[really-safe-money-gen] DistributedIntoEqualChunks numberOfChunks chunk ->
1105.65 s
[really-safe-money-gen] - if a > = zero
1105.65 s
[really-safe-money-gen] + if a > zero
1105.65 s
[really-safe-money-gen] then DistributedIntoEqualChunks numberOfChunks (Positive chunk)
1105.65 s
[really-safe-money-gen] else DistributedIntoEqualChunks numberOfChunks (Negative chunk)
1105.65 s
[really-safe-money-gen] DistributedIntoUnequalChunks numberOfLargerChunks largerChunk numberOfSmallerChunks smallerChunk ->
1105.65 s
[really-safe-money-gen] ccount"
1105.65 s
[really-safe-money-gen] where
1105.65 s
[really-safe-money-gen] f :: Integer -> Either String Account
1105.65 s
[really-safe-money-gen] f i = case Account.fromMinimalQuantisations i of
1105.65 s
[really-safe-money-gen] Nothing -> Left $ "Number did not fit into an account value: " <> show i
1105.65 s
[really-safe-money-gen] - Just a -> Right a
1105.65 s
[really-safe-money-gen] Testing mutation RemoveCase at src/Money/Amount/Codec.hs:46:11-86
1105.65 s
[really-safe-money-gen] @@ -43,15 +43,14 @@
1105.65 s
[really-safe-money-gen] codecViaString = bimapCodec f g stringCodec <?> "Amount"
1105.65 s
[really-safe-money-gen] where
1105.65 s
[really-safe-money-gen] f :: String -> Either String Amount
1105.65 s
[really-safe-money-gen] f s = case readMaybe s of
1105.65 s
[really-safe-money-gen] - Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1105.65 s
[really-safe-money-gen] Just i ->
1105.65 s
[really-safe-money-gen] if (i :: Integer) < toInteger (minBound :: Word64)
1105.65 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1105.65 s
[really-safe-money-gen] else
1105.65 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1105.65 s
[really-safe-money-gen] then Left $ unwords ["Number of minimal quantisations is too big:", show i]
1105.65 s
[really-safe-money-gen] else Right $ Amount.fromMinimalQuantisations (fromIntegral i :: Word64)
1105.65 s
[really-safe-money-gen] g :: Amount -> String
1105.65 s
[really-safe-money-gen] g = show . Amount.toMinimalQuantisations
1105.65 s
[really-safe-money-gen]
1105.65 s
[really-safe-money-gen] Testing mutation ConstBool at src/Money/Amount/Codec.hs:49:12-59
1105.65 s
[really-safe-money-gen] @@ -46,7 +46,7 @@
1105.65 s
[really-safe-money-gen] f s = case readMaybe s of
1105.65 s
[really-safe-money-gen] Nothing -> Left $ unwords ["Could not read string as an Amount:", s]
1105.65 s
[really-safe-money-gen] Just i ->
1105.65 s
[really-safe-money-gen] - if ( i :: Intege r) < toInteg e r (m inBoun d :: Word64)
1105.66 s
[really-safe-money-gen] + if F al s e
1105.66 s
[really-safe-money-gen] then Left $ unwords ["Negative number of minimal quantisations:", show i]
1105.66 s
[really-safe-money-gen] else
1105.66 s
[really-safe-money-gen] if (i :: Integer) > toInteger (maxBound :: Word64)
1105.66 s
[really-safe-money-gen] checkPhase completed in 16 minutes 36 seconds
1105.66 s
[really-safe-money-gen] Phase: haddockPhase
1106.09 s
[really-safe-money-gen] Preprocessing library for really-safe-money-gen-0.0.0.0...
1106.09 s
[really-safe-money-gen] Running Haddock on library for really-safe-money-gen-0.0.0.0...
1106.10 s
[really-safe-money-gen] Warning: The documentation for the following packages are not installed. No
1106.10 s
[really-safe-money-gen] links will be generated to these packages: really-safe-money-0.0.0.0
1106.88 s
[really-safe-money-gen] [ 1 of 13] Compiling Money.Amount.Gen ( src/Money/Amount/Gen.hs, nothing )
1107.31 s
[really-safe-money-gen] [ 2 of 13] Compiling Money.Account.Gen ( src/Money/Account/Gen.hs, nothing )
1107.34 s
[really-safe-money-gen] [ 3 of 13] Compiling Money.AccountOf.Gen ( src/Money/AccountOf/Gen.hs, nothing )
1107.37 s
[really-safe-money-gen] [ 4 of 13] Compiling Money.AmountOf.Gen ( src/Money/AmountOf/Gen.hs, nothing )
1107.38 s
[really-safe-money-gen] [ 5 of 13] Compiling Money.ConversionRate.Gen ( src/Money/ConversionRate/Gen.hs, nothing )
1107.43 s
[really-safe-money-gen] [ 6 of 13] Compiling Money.ConversionRateOf.Gen ( src/Money/ConversionRateOf/Gen.hs, nothing )
1107.44 s
[really-safe-money-gen] [ 7 of 13] Compiling Money.QuantisationFactor.Gen ( src/Money/QuantisationFactor/Gen.hs, nothing )
1107.46 s
[really-safe-money-gen] [ 8 of 13] Compiling Money.Currency.Gen ( src/Money/Currency/Gen.hs, nothing )
1107.48 s
[really-safe-money-gen] [ 9 of 13] Compiling Money.MultiAmount.Gen ( src/Money/MultiAmount/Gen.hs, nothing )
1107.53 s
[really-safe-money-gen] [10 of 13] Compiling Money.MultiAccount.Gen ( src/Money/MultiAccount/Gen.hs, nothing )
1107.56 s
[really-safe-money-gen] [11 of 13] Compiling Money.Gen ( src/Money/Gen.hs, nothing )
1107.56 s
[really-safe-money-gen] [12 of 13] Compiling Numeric.DecimalLiteral.Gen ( src/Numeric/DecimalLiteral/Gen.hs, nothing )
1107.60 s
[really-safe-money-gen] [13 of 13] Compiling Paths_really_safe_money_gen ( dist/build/autogen/Paths_really_safe_money_gen.hs, nothing )
1107.66 s
[really-safe-money-gen] Haddock coverage:
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.Amount.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.Account.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.AccountOf.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.AmountOf.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.ConversionRate.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.ConversionRateOf.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.QuantisationFactor.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.Currency.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.MultiAmount.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] 0% ( 0 / 1) in 'Money.MultiAccount.Gen'
1107.67 s
[really-safe-money-gen] Missing documentation for:
1107.67 s
[really-safe-money-gen] Module header
1107.67 s
[really-safe-money-gen] Warning: Money.Gen: Could not find documentation for exported module: Money.Gen
1107.68 s
[really-safe-money-gen] 90% ( 10 / 11) in 'Money.Gen'
1107.68 s
[really-safe-money-gen] Missing documentation for:
1107.68 s
[really-safe-money-gen] Module header
1107.68 s
[really-safe-money-gen] 0% ( 0 / 2) in 'Numeric.DecimalLiteral.Gen'
1107.68 s
[really-safe-money-gen] Missing documentation for:
1107.68 s
[really-safe-money-gen] Module header
1107.68 s
[really-safe-money-gen] shrinkSign (src/Numeric/DecimalLiteral/Gen.hs:16)
1108.03 s
[really-safe-money-gen] Warning: Money.Amount.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.Amount.Amount
1108.04 s
[really-safe-money-gen] - Money.Amount.Distribution
1108.04 s
[really-safe-money-gen] - Money.Amount.Rounding
1108.04 s
[really-safe-money-gen] Warning: Money.Account.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.Account.Account
1108.04 s
[really-safe-money-gen] Warning: Money.AccountOf.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.AccountOf.AccountOf
1108.04 s
[really-safe-money-gen] Warning: Money.AmountOf.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.AmountOf.AmountOf
1108.04 s
[really-safe-money-gen] Warning: Money.ConversionRate.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.ConversionRate.ConversionRate
1108.04 s
[really-safe-money-gen] Warning: Money.ConversionRateOf.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.ConversionRateOf.ConversionRateOf
1108.04 s
[really-safe-money-gen] Warning: Money.QuantisationFactor.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.QuantisationFactor.QuantisationFactor
1108.04 s
[really-safe-money-gen] Warning: Money.Currency.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.Currency.Currency
1108.04 s
[really-safe-money-gen] Warning: Money.MultiAmount.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.MultiAmount.MultiAmount
1108.04 s
[really-safe-money-gen] Warning: Money.MultiAccount.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Money.MultiAccount.MultiAccount
1108.04 s
[really-safe-money-gen] Warning: Numeric.DecimalLiteral.Gen: could not find link destinations for:
1108.04 s
[really-safe-money-gen] - Numeric.DecimalLiteral.DecimalLiteral
1122.38 s
[really-safe-money-gen] Documentation created: dist/doc/html/really-safe-money-gen/,
1122.38 s
[really-safe-money-gen] dist/doc/html/really-safe-money-gen/really-safe-money-gen.txt
1122.56 s
[really-safe-money-gen] Preprocessing test suite 'really-safe-money-test' for really-safe-money-gen-0.0.0.0...
1122.59 s
[really-safe-money-gen] Phase: installPhase
1123.03 s
[really-safe-money-gen] Installing library in /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/really-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A
1124.21 s
[really-safe-money-gen] Phase: fixupPhase
1124.25 s
[really-safe-money-gen] shrinking RPATHs of ELF executables and libraries in /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0
1124.27 s
[really-safe-money-gen] shrinking /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSreally-safe-money-gen-0.0.0.0-DUlrgfbYR751gcgZIqRr4A-ghc9.10.3.so
1124.30 s
[really-safe-money-gen] checking for references to /build/ in /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0...
1124.35 s
[really-safe-money-gen] patching script interpreter paths in /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0
1124.37 s
[really-safe-money-gen] stripping (with command strip and flags -S -p) in /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0/lib
1124.51 s
[really-safe-money-gen] shrinking RPATHs of ELF executables and libraries in /nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc
1124.52 s
[really-safe-money-gen] checking for references to /build/ in /nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc...
1124.57 s
[really-safe-money-gen] patching script interpreter paths in /nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc
1124.58 s
[really-safe-money-gen] shrinking RPATHs of ELF executables and libraries in /nix/store/mii4mv42yz4xkb0w01vvfq858fvpzjcl-really-safe-money-gen-0.0.0.0-report
1124.60 s
[really-safe-money-gen] checking for references to /build/ in /nix/store/mii4mv42yz4xkb0w01vvfq858fvpzjcl-really-safe-money-gen-0.0.0.0-report...
1124.66 s
[really-safe-money-gen] patching script interpreter paths in /nix/store/mii4mv42yz4xkb0w01vvfq858fvpzjcl-really-safe-money-gen-0.0.0.0-report
1124.92 s
[post-build-hook] Uploading to cachix cache "sydtest": /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0 /nix/store/mii4mv42yz4xkb0w01vvfq858fvpzjcl-really-safe-money-gen-0.0.0.0-report /nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc
1125.85 s
[post-build-hook] Pushing 3 paths (196 are already present) using zstd to cache sydtest ⏳
1125.85 s
[post-build-hook]
1126.21 s
[post-build-hook] Pushing /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0 (1.52 MiB)
1126.26 s
[post-build-hook] Pushing /nix/store/mii4mv42yz4xkb0w01vvfq858fvpzjcl-really-safe-money-gen-0.0.0.0-report (351.48 KiB)
1126.27 s
[post-build-hook] Pushing /nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc (288.17 KiB)
1127.69 s
[post-build-hook]
1127.69 s
[post-build-hook] All done.
1127.76 s
[post-build-hook] Uploading to the NixCI staging cache: /nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0 /nix/store/mii4mv42yz4xkb0w01vvfq858fvpzjcl-really-safe-money-gen-0.0.0.0-report /nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc
1127.91 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
1128.26 s
[post-build-hook] copying 3 paths...
1128.26 s
[post-build-hook] copying path '/nix/store/mii4mv42yz4xkb0w01vvfq858fvpzjcl-really-safe-money-gen-0.0.0.0-report' to 'https://cache.staging.nix-ci.com'...
1128.26 s
[post-build-hook] copying path '/nix/store/q3abqwgy7y2xfmrwq6ilddg7p3565d94-really-safe-money-gen-0.0.0.0-doc' to 'https://cache.staging.nix-ci.com'...
1128.45 s
[post-build-hook] copying path '/nix/store/9pkyysypair47k6nqj54labw5vwlgavg-really-safe-money-gen-0.0.0.0' to 'https://cache.staging.nix-ci.com'...
1129.34 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
1129.69 s
[post-build-hook] copying 1 paths...
1129.70 s
[post-build-hook] copying path '/nix/store/8d28j421j78ihrix7rkf8wk5f9z6sbh1-really-safe-money-gen-0.0.0.0.drv' to 'https://cache.staging.nix-ci.com'...
1130.05 s
Progress: 5 of 6 built