From c48bbce073eff9ebb2a28373c202cb808574bd80 Mon Sep 17 00:00:00 2001 From: Antoine Hoffmann <antoine.hoffmann@epfl.ch> Date: Fri, 16 Feb 2024 16:05:19 +0100 Subject: [PATCH] commenting --- src/coeff_mod.F90 | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/coeff_mod.F90 b/src/coeff_mod.F90 index 3c4c9125..9739766c 100644 --- a/src/coeff_mod.F90 +++ b/src/coeff_mod.F90 @@ -1,7 +1,9 @@ MODULE coeff -! this module contains routines to compute normalization coefficients and velocity integrals -! +! this module contains routines to compute the Laguerre-Laguerre products coefficients +! dnjs for the nonlinear term. ALL2L(n,j,s,0) = dnjs +! Lpjl(p,j,l) returns the l-th coefficient of the j-th order associated Laguerre_{p-1/2} poynomial + ! the canonical basis (p=0) writes L_j(x) = sum_{l=0}^j c_l x^l USE PREC_CONST use BASIC -- GitLab