From ac4a59434a5c3fc1938ba63fca0cbc331689e430 Mon Sep 17 00:00:00 2001 From: Christopher Kormanyos Date: Mon, 18 Mar 2024 15:53:51 +0100 Subject: [PATCH] Update and simplify CI and licensing --- .github/workflows/gamma_f77.yml | 8 +------- gamma.f | 8 +++++++- 2 files changed, 8 insertions(+), 8 deletions(-) diff --git a/.github/workflows/gamma_f77.yml b/.github/workflows/gamma_f77.yml index 573d30e..a50c271 100644 --- a/.github/workflows/gamma_f77.yml +++ b/.github/workflows/gamma_f77.yml @@ -169,17 +169,11 @@ jobs: valgrind --leak-check=yes --log-file=gamma_valgrind_8.txt ./gamma.exe | grep '0.296439082102472192334520537379648E+06' valgrind --leak-check=yes --log-file=gamma_valgrind_9.txt ./gamma.exe | grep '0.554521067573633755529159865936434E-01' valgrind --leak-check=yes --log-file=gamma_valgrind_10.txt ./gamma.exe | grep '0.265252859812191058636308480000000E+33' - - name: ubuntu-native-valgrind-blocks + - name: ubuntu-native-valgrind-check run: | #!/bin/bash for i in {0..10}; do filename="gamma_valgrind_$i.txt" grep '0 bytes in 0 blocks' $filename - done - - name: ubuntu-native-valgrind-contexts - run: | - #!/bin/bash - for i in {0..10}; do - filename="gamma_valgrind_$i.txt" grep '0 errors from 0 contexts' $filename done diff --git a/gamma.f b/gamma.f index 283f2f7..566c258 100644 --- a/gamma.f +++ b/gamma.f @@ -1,4 +1,10 @@ CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC80 +C +C Copyright Christopher Kormanyos 1987 - 2024. +C Distributed under the Boost Software License, +C Version 1.0. (See accompanying file LICENSE_1_0.txt +C or copy at http://www.boost.org/LICENSE_1_0.txt) +C C cd /mnt/c/Users/User/Documents/Ks/PC_Software/Fortran/gamma C Compile with legacy (FORTRAN77). C g++ -x f77 -std=legacy -O2 gamma.f -lgfortran -lquadmath -o gamma.exe @@ -152,7 +158,7 @@ PROGRAM GAMMA CALL TGAMMA(X, GA) WRITE(6, "(E44.33)") GA - END + END PROGRAM GAMMA C C Program Output: C