From 80a3ecdda01d23ae63e7efda08dfb042d69c7a7d Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Tue, 1 Oct 2019 13:02:26 +0200 Subject: [PATCH] Added class.irp.f --- devel/cassdtq/class.irp.f | 2 +- stable/cassd/class.irp.f | 8 ++++++++ 2 files changed, 9 insertions(+), 1 deletion(-) create mode 100644 stable/cassd/class.irp.f diff --git a/devel/cassdtq/class.irp.f b/devel/cassdtq/class.irp.f index 6d1838a..ad2b33e 100644 --- a/devel/cassdtq/class.irp.f +++ b/devel/cassdtq/class.irp.f @@ -1,7 +1,7 @@ BEGIN_PROVIDER [ logical, do_only_cas ] implicit none BEGIN_DOC - ! In the CASSDTQ case, all those are always false + ! In the CASSD case, always false END_DOC do_only_cas = .False. END_PROVIDER diff --git a/stable/cassd/class.irp.f b/stable/cassd/class.irp.f new file mode 100644 index 0000000..ad2b33e --- /dev/null +++ b/stable/cassd/class.irp.f @@ -0,0 +1,8 @@ +BEGIN_PROVIDER [ logical, do_only_cas ] + implicit none + BEGIN_DOC + ! In the CASSD case, always false + END_DOC + do_only_cas = .False. +END_PROVIDER +