Fix in printing the ulms

Samo Penic

2019-08-15 df111bb0cf32bbe48718a5b77f8b9d9a7400d496

Fix in printing the ulms

 depcomp

@@ -1,9 +1,9 @@
#! /bin/sh
# depcomp - compile a program generating dependencies as side-effects

scriptversion=2016-01-11.22; # UTC
scriptversion=2013-05-30.07; # UTC

# Copyright (C) 1999-2017 Free Software Foundation, Inc.
# Copyright (C) 1999-2014 Free Software Foundation, Inc.

# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -786,6 +786,6 @@
# eval: (add-hook 'write-file-hooks 'time-stamp)
# time-stamp-start: "scriptversion="
# time-stamp-format: "%:y-%02m-%02d.%02H"
# time-stamp-time-zone: "UTC0"
# time-stamp-time-zone: "UTC"
# time-stamp-end: "; # UTC"
# End:

 src/shcomplex.c

@@ -1,6 +1,7 @@
/* vim: set ts=4 sts=4 sw=4 noet : */
#include<math.h>
#include<stdlib.h>
#include<string.h>
#include<gsl/gsl_complex.h>
#include<gsl/gsl_complex_math.h>
#include<gsl/gsl_sf_legendre.h>
@@ -120,12 +121,14 @@
char *Ulm2Complex2String(ts_vesicle *vesicle){
    ts_int i,j;
    char *strng=(char *)calloc(5000, sizeof(char));
    char tmpstrng[255];
    for(i=0;i<vesicle->sphHarmonics->l;i++){
            for(j=i;j<2*i+1;j++){
            sprintf(strng,"%e ", gsl_complex_abs2(vesicle->sphHarmonics->ulmComplex[i][j]));
            sprintf(tmpstrng,"%e ", gsl_complex_abs2(vesicle->sphHarmonics->ulmComplex[i][j]));
            strcat(strng,tmpstrng);
            }
    }
    sprintf(strng,"\n");
    //strcat(strng,"\n");

    return strng;
}