gcc, fortran and OpenMP

===> Building from scratch calculix-ccx-2.22
===> Checking files for calculix-ccx-2.22
===> calculix-ccx-2.22 depends on: gcc-libs->=8,<9 -> gcc-libs-8.4.0p25
===> calculix-ccx-2.22 depends on: spooles-* -> spooles-2.2
`/usr/ports/distfiles/ccx_2.22.src.tar.bz2' is up to date.
===> calculix-ccx-2.22 depends on: arpack-* -> arpack-3.8.0p1v0
===> calculix-ccx-2.22 depends on: gcc->=8,<9 -> gcc-8.4.0p25
===> calculix-ccx-2.22 depends on: g95->=8,<9 -> g95-8.4.0p25
===> calculix-ccx-2.22 depends on: bzip2-* -> bzip2-1.0.8p0
>> (SHA256) ccx_2.22.src.tar.bz2: OK
===> Verifying specs: gfortran>=8 quadmath
===> found gfortran.8.0 quadmath.3.0
===> Extracting for calculix-ccx-2.22
===> calculix-ccx-2.22 depends on: arpack-* -> arpack-3.8.0p1v0
===> calculix-ccx-2.22 depends on: gcc->=8,<9 -> gcc-8.4.0p25
===> Patching for calculix-ccx-2.22
===> calculix-ccx-2.22 depends on: g95->=8,<9 -> g95-8.4.0p25
===> Applying OpenBSD patch patch-CalculiX_h
Hmm... Looks like a unified diff to me...
The text leading up to this was:
--------------------------
|Index: CalculiX.h
|--- CalculiX.h.orig
|+++ CalculiX.h
--------------------------
Patching file CalculiX.h using Plan A...
Hunk #1 succeeded at 21.
Hunk #2 succeeded at 31.
done
===> Applying OpenBSD patch patch-Makefile
Hmm... Looks like a unified diff to me...
The text leading up to this was:
--------------------------
|Index: Makefile
|--- Makefile.orig
|+++ Makefile
--------------------------
Patching file Makefile using Plan A...
Hunk #1 succeeded at 1.
Hunk #2 succeeded at 20.
done
===> calculix-ccx-2.22 depends on: bzip2-* -> bzip2-1.0.8p0
===> Compiler link: gcc -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/local/bin/egcc
===> Compiler link: cc -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/local/bin/egcc
===> Compiler link: gfortran -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/local/bin/egfortran
===> Compiler link: clang -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/bin/clang
===> Compiler link: clang++ -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/bin/clang++
===> Compiler link: c++ -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/bin/c++
===> calculix-ccx-2.22 depends on: gcc-libs->=8,<9 -> gcc-libs-8.4.0p25
===> Generating configure for calculix-ccx-2.22
===> Configuring for calculix-ccx-2.22
===> Verifying specs: gfortran>=8 quadmath
===> found gfortran.8.0 quadmath.3.0
===> Building for calculix-ccx-2.22
cc -Wall -O2 -I /usr/local/include -DARCH="OpenBSD" -DSPOOLES -DARPACK -DMATRIXSTORAGE -DNETWORKOUT -c ccx_2.22.c
In file included from ccx_2.22.c:30:
ccx_2.22.c: In function 'main':
CalculiX.h:63:29: warning: 'nkon0' may be used uninitialized in this function [-Wmaybe-uninitialized]
#define RENEW(a,b,c) a=(b *)u_realloc((b *)(a),(c)*sizeof(b),__FILE__,__LINE__,#a)
^~~~~~~~~
ccx_2.22.c:72:43: note: 'nkon0' was declared here
iprestr,kode,isolver,nslavs,nkon_,ne1,nkon0,mortar,
^~~~~
ccx_2.22.c:1789:53: warning: 'ne1' may be used uninitialized in this function [-Wmaybe-uninitialized]
if((ne1d!=0)||(ne2d!=0)) RENEW(offset,double,2*ne1);
^
ccx_2.22.c:63:22: warning: 'nxstate' may be used uninitialized in this function [-Wmaybe-uninitialized]
*ipoinpc=NULL,mt,nxstate,nload0,iload,*iuel=NULL,*ne2boun=NULL,
^~~~~~~
gfortran -Wall -O2 -c absolute_relative.f
absolute_relative.f:20:20:

& kon,ipkon, nactdog,identity,ielprop,prop,kflag,v,
1
Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument]
absolute_relative.f:22:25:

& iaxial,iplausi)
1
Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument]
absolute_relative.f:20:14:

& kon,ipkon, nactdog,identity,ielprop,prop,kflag,v,
1
Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument]
absolute_relative.f:39:13:

& p1,p2,T1,T2,cp,physcon(*),km1,kp1,kdkm1,
1
Warning: Unused variable 'p1' declared at (1) [-Wunused-variable]
absolute_relative.f:39:16:

& p1,p2,T1,T2,cp,physcon(*),km1,kp1,kdkm1,
1
Warning: Unused variable 'p2' declared at (1) [-Wunused-variable]
absolute_relative.f:40:21:

& kdkp1,u,pi,Qred_crit,pt1,pt2,Tt1,Tt2,ct,fact,
1
Warning: Unused variable 'pi' declared at (1) [-Wunused-variable]
absolute_relative.f:40:31:

& kdkp1,u,pi,Qred_crit,pt1,pt2,Tt1,Tt2,ct,fact,
1
Warning: Unused variable 'qred_crit' declared at (1) [-Wunused-variable]
absolute_relative.f:21:55:

& xflow,f,nodef,idirf,df,cp,R,physcon,numf,set,mi,ttime,time,
1
Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument]
absolute_relative.f:39:19:

& p1,p2,T1,T2,cp,physcon(*),km1,kp1,kdkm1,
1
Warning: Unused variable 't1' declared at (1) [-Wunused-variable]
absolute_relative.f:39:22:

& p1,p2,T1,T2,cp,physcon(*),km1,kp1,kdkm1,
1
Warning: Unused variable 't2' declared at (1) [-Wunused-variable]
absolute_relative.f:21:69:

& xflow,f,nodef,idirf,df,cp,R,physcon,numf,set,mi,ttime,time,
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
absolute_relative.f:21:64:

& xflow,f,nodef,idirf,df,cp,R,physcon,numf,set,mi,ttime,time,
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c acctube.f
acctube.f:21:31:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'cp' at (1) [-Wunused-dummy-argument]
acctube.f:21:28:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'df' at (1) [-Wunused-dummy-argument]
acctube.f:21:45:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'dvi' at (1) [-Wunused-dummy-argument]
acctube.f:20:59:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'f' at (1) [-Wunused-dummy-argument]
acctube.f:22:31:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument]
acctube.f:20:30:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'identity' at (1) [-Wunused-dummy-argument]
acctube.f:21:62:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument]
acctube.f:21:25:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'idirf' at (1) [-Wunused-dummy-argument]
acctube.f:20:38:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'ielprop' at (1) [-Wunused-dummy-argument]
acctube.f:19:64:

subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument]
acctube.f:22:39:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument]
acctube.f:20:49:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'kflag' at (1) [-Wunused-dummy-argument]
acctube.f:19:58:

subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument]
acctube.f:19:54:

subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'lakon' at (1) [-Wunused-dummy-argument]
acctube.f:20:21:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'nactdog' at (1) [-Wunused-dummy-argument]
acctube.f:19:48:

subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'nelem' at (1) [-Wunused-dummy-argument]
acctube.f:19:30:

subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'node1' at (1) [-Wunused-dummy-argument]
acctube.f:19:36:

subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'node2' at (1) [-Wunused-dummy-argument]
acctube.f:21:19:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'nodef' at (1) [-Wunused-dummy-argument]
acctube.f:19:42:

subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'nodem' at (1) [-Wunused-dummy-argument]
acctube.f:21:50:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'numf' at (1) [-Wunused-dummy-argument]
acctube.f:21:41:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'physcon' at (1) [-Wunused-dummy-argument]
acctube.f:20:43:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'prop' at (1) [-Wunused-dummy-argument]
acctube.f:21:33:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'r' at (1) [-Wunused-dummy-argument]
acctube.f:21:54:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument]
acctube.f:22:24:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
acctube.f:22:19:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
acctube.f:20:51:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'v' at (1) [-Wunused-dummy-argument]
acctube.f:20:57:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'xflow' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c acctube_one.f
acctube_one.f:21:31:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'cp' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:28:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'df' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:45:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'dvi' at (1) [-Wunused-dummy-argument]
acctube_one.f:20:59:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'f' at (1) [-Wunused-dummy-argument]
acctube_one.f:22:31:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument]
acctube_one.f:20:30:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'identity' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:62:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:25:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'idirf' at (1) [-Wunused-dummy-argument]
acctube_one.f:20:38:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'ielprop' at (1) [-Wunused-dummy-argument]
acctube_one.f:19:68:

subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument]
acctube_one.f:22:39:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument]
acctube_one.f:20:49:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'kflag' at (1) [-Wunused-dummy-argument]
acctube_one.f:19:62:

subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument]
acctube_one.f:19:58:

subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'lakon' at (1) [-Wunused-dummy-argument]
acctube_one.f:20:21:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'nactdog' at (1) [-Wunused-dummy-argument]
acctube_one.f:19:52:

subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'nelem' at (1) [-Wunused-dummy-argument]
acctube_one.f:19:34:

subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'node1' at (1) [-Wunused-dummy-argument]
acctube_one.f:19:40:

subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'node2' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:19:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'nodef' at (1) [-Wunused-dummy-argument]
acctube_one.f:19:46:

subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'nodem' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:50:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'numf' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:41:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'physcon' at (1) [-Wunused-dummy-argument]
acctube_one.f:20:43:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'prop' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:33:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'r' at (1) [-Wunused-dummy-argument]
acctube_one.f:21:54:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider,
1
Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument]
acctube_one.f:22:24:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
acctube_one.f:22:19:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
acctube_one.f:20:51:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'v' at (1) [-Wunused-dummy-argument]
acctube_one.f:20:57:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'xflow' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c actideacti.f
gfortran -Wall -O2 -c actideactistr.f
gfortran -Wall -O2 -c add_bo_st.f
gfortran -Wall -O2 -c addimd.f
gfortran -Wall -O2 -c addimdnodecload.f
gfortran -Wall -O2 -c addimdnodedload.f
addimdnodedload.f:34:0:

& ifaceq(8,6),ifacew(8,5),ifacet(6,4),ig,ielem,nope,imdnode(*),

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c addimdnodedof.f
gfortran -Wall -O2 -c addizdofcload.f
addizdofcload.f:20:44:

& nzdof,iforc,iznode,nznode,nk,imdnode,nmdnode,xforc,ntrans,
1
Warning: Unused dummy argument 'imdnode' at (1) [-Wunused-dummy-argument]
addizdofcload.f:20:52:

& nzdof,iforc,iznode,nznode,nk,imdnode,nmdnode,xforc,ntrans,
1
Warning: Unused dummy argument 'nmdnode' at (1) [-Wunused-dummy-argument]
addizdofcload.f:20:58:

& nzdof,iforc,iznode,nznode,nk,imdnode,nmdnode,xforc,ntrans,
1
Warning: Unused dummy argument 'xforc' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c addizdofdload.f
addizdofdload.f:33:0:

& ifacew(8,5),ifacet(7,4),ig,ielem,nope,iznode(*),nznode,

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c add_sm_ei.f
gfortran -Wall -O2 -c add_sm_fl.f
gfortran -Wall -O2 -c add_sm_st_as.f
gfortran -Wall -O2 -c add_sm_st_corio.f
add_sm_st_corio.f:19:38:

subroutine add_sm_st_corio(au,ad,jq,irow,i,j,value,i0,i1)
1
Warning: Unused dummy argument 'ad' at (1) [-Wunused-dummy-argument]
add_sm_st_corio.f:19:59:

subroutine add_sm_st_corio(au,ad,jq,irow,i,j,value,i0,i1)
1
Warning: Unused dummy argument 'i0' at (1) [-Wunused-dummy-argument]
add_sm_st_corio.f:19:62:

subroutine add_sm_st_corio(au,ad,jq,irow,i,j,value,i0,i1)
1
Warning: Unused dummy argument 'i1' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c add_sm_st.f
gfortran -Wall -O2 -c adjacentbounodes.f
gfortran -Wall -O2 -c adjustcontactnodes.f
adjustcontactnodes.f:20:53:

& co,vold,xo,yo,zo,x,y,z,nx,ny,nz,istep,iinc,iit,
1
Warning: Unused dummy argument 'iinc' at (1) [-Wunused-dummy-argument]
adjustcontactnodes.f:20:57:

& co,vold,xo,yo,zo,x,y,z,nx,ny,nz,istep,iinc,iit,
1
Warning: Unused dummy argument 'iit' at (1) [-Wunused-dummy-argument]
adjustcontactnodes.f:20:18:

& co,vold,xo,yo,zo,x,y,z,nx,ny,nz,istep,iinc,iit,
1
Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument]
adjustcontactnodes.f:38:0:

& istart,ilength,nope,nopes,nelems,jj,ifaces,itiefac(2,*),

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
adjustcontactnodes.f:232:0:

& iendset(iset)-istartset(iset)+1,id)

Warning: 'iset' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c addshell.f
gfortran -Wall -O2 -c advecforc.f
advecforc.f:20:48:

& nload,lakon,xload,istep,time,ttime,dtime,sideload,vold,mi,
1
Warning: Unused dummy argument 'dtime' at (1) [-Wunused-dummy-argument]
advecforc.f:21:32:

& xloadold,reltime,nmethod,tnl,iinc,iponoel,inoel,ielprop,prop,
1
Warning: Unused dummy argument 'nmethod' at (1) [-Wunused-dummy-argument]
advecforc.f:21:24:

& xloadold,reltime,nmethod,tnl,iinc,iponoel,inoel,ielprop,prop,
1
Warning: Unused dummy argument 'reltime' at (1) [-Wunused-dummy-argument]
advecforc.f:21:16:

& xloadold,reltime,nmethod,tnl,iinc,iponoel,inoel,ielprop,prop,
1
Warning: Unused dummy argument 'xloadold' at (1) [-Wunused-dummy-argument]
advecforc.f:171:0:

areaj=dxsj2*weight

Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c advecstiff.f
advecstiff.f:20:48:

& nload,lakon,xload,istep,time,ttime,dtime,sideload,vold,mi,
1
Warning: Unused dummy argument 'dtime' at (1) [-Wunused-dummy-argument]
advecstiff.f:21:32:

& xloadold,reltime,nmethod,s,iinc,iponoel,inoel,ielprop,prop,
1
Warning: Unused dummy argument 'nmethod' at (1) [-Wunused-dummy-argument]
advecstiff.f:21:24:

& xloadold,reltime,nmethod,s,iinc,iponoel,inoel,ielprop,prop,
1
Warning: Unused dummy argument 'reltime' at (1) [-Wunused-dummy-argument]
advecstiff.f:21:16:

& xloadold,reltime,nmethod,s,iinc,iponoel,inoel,ielprop,prop,
1
Warning: Unused dummy argument 'xloadold' at (1) [-Wunused-dummy-argument]
advecstiff.f:165:0:

areaj=dxsj2*weight

Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c air_valve.f
air_valve.f:21:57:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'co' at (1) [-Wunused-dummy-argument]
air_valve.f:21:31:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'cp' at (1) [-Wunused-dummy-argument]
air_valve.f:21:28:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'df' at (1) [-Wunused-dummy-argument]
air_valve.f:21:45:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'dvi' at (1) [-Wunused-dummy-argument]
air_valve.f:20:59:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'f' at (1) [-Wunused-dummy-argument]
air_valve.f:22:31:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument]
air_valve.f:20:30:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'identity' at (1) [-Wunused-dummy-argument]
air_valve.f:21:25:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'idirf' at (1) [-Wunused-dummy-argument]
air_valve.f:20:38:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'ielprop' at (1) [-Wunused-dummy-argument]
air_valve.f:19:66:

subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument]
air_valve.f:22:39:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument]
air_valve.f:20:49:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'kflag' at (1) [-Wunused-dummy-argument]
air_valve.f:19:60:

subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument]
air_valve.f:19:56:

subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'lakon' at (1) [-Wunused-dummy-argument]
air_valve.f:20:21:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'nactdog' at (1) [-Wunused-dummy-argument]
air_valve.f:19:50:

subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'nelem' at (1) [-Wunused-dummy-argument]
air_valve.f:19:32:

subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'node1' at (1) [-Wunused-dummy-argument]
air_valve.f:19:38:

subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'node2' at (1) [-Wunused-dummy-argument]
air_valve.f:21:19:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'nodef' at (1) [-Wunused-dummy-argument]
air_valve.f:19:44:

subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon,
1
Warning: Unused dummy argument 'nodem' at (1) [-Wunused-dummy-argument]
air_valve.f:21:50:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'numf' at (1) [-Wunused-dummy-argument]
air_valve.f:21:41:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'physcon' at (1) [-Wunused-dummy-argument]
air_valve.f:20:43:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'prop' at (1) [-Wunused-dummy-argument]
air_valve.f:21:33:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'r' at (1) [-Wunused-dummy-argument]
air_valve.f:21:54:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument]
air_valve.f:22:24:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
air_valve.f:22:19:

& ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
air_valve.f:20:51:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'v' at (1) [-Wunused-dummy-argument]
air_valve.f:21:62:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi,
1
Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument]
air_valve.f:20:57:

& nactdog,identity,ielprop,prop,kflag,v,xflow,f,
1
Warning: Unused dummy argument 'xflow' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c allocation.f
allocation.f:2219:0:

submset(12:12)=selabel

Warning: 'selabel[1]{lb: 1 sz: 1}' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation.f:1534:0:

nk_=nk_+numnodes

Warning: 'numnodes' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation.f:1158:0:

nkon_=nkon_+nopeexp

Warning: 'nopeexp' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation.f:1147:0:

if(nteller.lt.nope) then

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation.f:2434:0:

& multmast*meminset(imastset))

Warning: 'multslav' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation.f:2434:0: Warning: 'multmast' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation.f:55:0:

& istat,n,key,meminset(*),i,js,inoset,mi(*),ii,ipol,inl,

Warning: 'js' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation.f:420:0:

surface(ipos:ipos)='T'

Warning: 'ipos' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation.f:1533:0:

if(iorientation.eq.0) then

Warning: 'iorientation' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c allocation_rfn.f
allocation_rfn.f:104:0:

nkon_=nkon_+nopeexp

Warning: 'nopeexp' may be used uninitialized in this function [-Wmaybe-uninitialized]
allocation_rfn.f:98:0:

if(nteller+n.gt.nope) n=nope-nteller

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c allocont.f
gfortran -Wall -O2 -c amplitudes.f
amplitudes.f:20:27:

& nam_,namtot_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,
1
Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument]
amplitudes.f:20:33:

& nam_,namtot_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,
1
Warning: Unused dummy argument 'istep' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c angsum.f
angsum.f:73:0:

cotet(k,j+1)=co(k,nnr)

Warning: 'nnr' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c anisomaxwavspd.f
gfortran -Wall -O2 -c anisonl.f
gfortran -Wall -O2 -c anisotropic.f
gfortran -Wall -O2 -c applybounfem.f
gfortran -Wall -O2 -c applybounp.f
gfortran -Wall -O2 -c approxplane.f
gfortran -Wall -O2 -c assigndomtonodes.f
gfortran -Wall -O2 -c attach_1d.f
gfortran -Wall -O2 -c attach_1d_cracklength.f
gfortran -Wall -O2 -c attach_2d.f
gfortran -Wall -O2 -c attach_3d.f
gfortran -Wall -O2 -c attachline.f
gfortran -Wall -O2 -c autocovmatrix.f
gfortran -Wall -O2 -c basemotions.f
gfortran -Wall -O2 -c basis.f
gfortran -Wall -O2 -c beamextscheme.f
gfortran -Wall -O2 -c beamgeneralsections.f
beamgeneralsections.f:23:35:

& nprop,nprop_,prop,nelcon,ier)
1
Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument]
beamgeneralsections.f:373:0:

thicke(2,indexe+l)=thickness2

Warning: 'thickness2' may be used uninitialized in this function [-Wmaybe-uninitialized]
beamgeneralsections.f:383:0:

thicke(1,indexe+l)=thickness1

Warning: 'thickness1' may be used uninitialized in this function [-Wmaybe-uninitialized]
beamgeneralsections.f:294:0:

nprop=nprop+ndprop

Warning: 'ndprop' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c beamintscheme.f
gfortran -Wall -O2 -c beammpc.f
beammpc.f:112:0:

nodempc(1,mpcfree)=nodeb

Warning: 'nodeb' may be used uninitialized in this function [-Wmaybe-uninitialized]
beammpc.f:68:0:

if(l.gt.3) l=1

Warning: 'jmax' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c beamsections.f
beamsections.f:23:25:

& ipoinpc,mi,nelcon,ier)
1
Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c biotsavart.f
biotsavart.f:140:0:

c2=weight*xsj/((r(1)*r(1)+r(2)*r(2)+r(3)*r(3))**(1.5d0))

Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized]
biotsavart.f:121:0:

elseif(nope.eq.6) then

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
biotsavart.f:28:0:

integer ipkon(*),kon(*),ne,i,nka,nkb,mint3d,konl(26),

Warning: 'mint3d' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c bodyadd.f
bodyadd.f:51:0:

if(ilabel.eq.2) then

Warning: 'ilabel' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c bodyforce.f
bodyforce.f:19:52:

subroutine bodyforce(cbody,ibody,ipobody,nbody,set,istartset,
1
Warning: Unused dummy argument 'nbody' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c bounadd.f
gfortran -Wall -O2 -c bounaddf.f
bounaddf.f:23:38:

& typeboun,nmethod,iperturb,vold,mi,
1
Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument]
bounaddf.f:43:0:

& iy(3),inumber,iface,nload,nelemload(2,*),nopes,kon(*),nope,

Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized]
bounaddf.f:180:0:

elseif(nope.eq.4) then

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c boundaryfs.f
gfortran -Wall -O2 -c boundarymesh.f
gfortran -Wall -O2 -c boundarys.f
boundarys.f:44:68:

& ilmpc(*),nmpcold,id,idof,index1,ntrans,nk_,ipos,m,node,is,ie,
1
Warning: Unused variable 'ie' declared at (1) [-Wunused-variable]
boundarys.f:44:65:

& ilmpc(*),nmpcold,id,idof,index1,ntrans,nk_,ipos,m,node,is,ie,
1
Warning: Unused variable 'is' declared at (1) [-Wunused-variable]
boundarys.f:44:62:

& ilmpc(*),nmpcold,id,idof,index1,ntrans,nk_,ipos,m,node,is,ie,
1
Warning: Unused variable 'node' declared at (1) [-Wunused-variable]
gfortran -Wall -O2 -c bsort.f
gfortran -Wall -O2 -c buckles.f
gfortran -Wall -O2 -c calcdatarget.f
calcdatarget.f:30:58:

integer i,j,ifront(*),nnfront,istartfront(*),nstep,m,
1
Warning: Unused variable 'm' declared at (1) [-Wunused-variable]
calcdatarget.f:20:62:

& iendfront,isubsurffront,damax,datarget,acrack,nstep)
1
Warning: Unused dummy argument 'nstep' at (1) [-Wunused-dummy-argument]
calcdatarget.f:106:0:

xlan=dsqrt((xn-xa)**2+(yn-ya)**2+(zn-za)**2)

Warning: 'zn' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcdatarget.f:106:0: Warning: 'yn' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcdatarget.f:106:0: Warning: 'xn' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcdatarget.f:117:0:

rcur=xlpa*xlan*xlnp/denominator

Warning: 'xlan' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcdev.f
gfortran -Wall -O2 -c calcdhds.f
gfortran -Wall -O2 -c calceigenvalues.f
gfortran -Wall -O2 -c calcenergy.f
calcenergy.f:19:57:

subroutine calcenergy(ipkon,lakon,kon,co,ener,mi,ne,
1
Warning: Unused dummy argument 'ne' at (1) [-Wunused-dummy-argument]
calcenergy.f:171:0:

mint3d=8*nlayer

Warning: 'nlayer' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcenergy.f:29:0:

& konl(20),mint3d,jj,iflag,ne,ki,kl,ilayer,nlayer,kk,

Warning: 'ilayer' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcexternalwork.f
calcexternalwork.f:269:0:

& (disp(1)*xsj2(1)+disp(2)*xsj2(2)+disp(3)*xsj2(3))

Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcexternalwork.f:269:0: Warning: 'pres' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcexternalwork.f:251:0:

elseif(nopes.eq.6) then

Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcexternalwork.f:32:0:

& jj,ig,nope,nopes,igpres,id,

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcexternalwork.f:33:0:

& mint2d,ifacet(6,4),ifacew(8,5),iflag,indexe,jface,istartset(*),

Warning: 'mint2d' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcfeasibledirection_gd.f
calcfeasibledirection_gd.f:20:16:

& nactive,nobject,nk,gradproj)
1
Warning: Unused dummy argument 'nactive' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c calcfeasibledirection_gp.f
calcfeasibledirection_gp.f:20:24:

& nactive,nobject,nk,gradproj)
1
Warning: Unused dummy argument 'nobject' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c calcgeomelemnet.f
calcgeomelemnet.f:20:28:

& time,ielprop,mi,A,A2,d,l,s)
1
Warning: Unused dummy argument 'a2' at (1) [-Wunused-dummy-argument]
calcgeomelemnet.f:20:30:

& time,ielprop,mi,A,A2,d,l,s)
1
Warning: Unused dummy argument 'd' at (1) [-Wunused-dummy-argument]
calcgeomelemnet.f:20:32:

& time,ielprop,mi,A,A2,d,l,s)
1
Warning: Unused dummy argument 'l' at (1) [-Wunused-dummy-argument]
calcgeomelemnet.f:20:34:

& time,ielprop,mi,A,A2,d,l,s)
1
Warning: Unused dummy argument 's' at (1) [-Wunused-dummy-argument]
calcgeomelemnet.f:20:12:

& time,ielprop,mi,A,A2,d,l,s)
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
calcgeomelemnet.f:19:63:

subroutine calcgeomelemnet(vold,co,prop,lakon,nelem,ttime,
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c calch0interface.f
gfortran -Wall -O2 -c calcheatnet.f
calcheatnet.f:20:61:

& ielmat,ntmat_,shcon,nshcon,rhcon,nrhcon,ipobody,ibody,xbody,
1
Warning: Unused dummy argument 'ibody' at (1) [-Wunused-dummy-argument]
calcheatnet.f:20:55:

& ielmat,ntmat_,shcon,nshcon,rhcon,nrhcon,ipobody,ibody,xbody,
1
Warning: Unused dummy argument 'ipobody' at (1) [-Wunused-dummy-argument]
calcheatnet.f:20:67:

& ielmat,ntmat_,shcon,nshcon,rhcon,nrhcon,ipobody,ibody,xbody,
1
Warning: Unused dummy argument 'xbody' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c calc_ider_cross_split.f
gfortran -Wall -O2 -c calc_ider_tee.f
gfortran -Wall -O2 -c calc_ider_wye.f
gfortran -Wall -O2 -c calcmac.f
gfortran -Wall -O2 -c calcmach.f
gfortran -Wall -O2 -c calcmass.f
calcmass.f:20:22:

& mi,nelem,ne,thicke,ielmat,nope,t0,rhcon,nrhcon,ntmat_,
1
Warning: Unused dummy argument 'ne' at (1) [-Wunused-dummy-argument]
calcmass.f:166:0:

mint3d=8*nlayer

Warning: 'nlayer' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcmechstrain.f
gfortran -Wall -O2 -c calcnormal.f
calcnormal.f:178:0:

if(nface.eq.3) then

Warning: 'nface' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcnormal.f:301:0:

elseif(nopes.eq.8) then

Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calc_residual_cross_split.f
calc_residual_cross_split.f:22:33:

&pt2,Tt2,ichan_num,A1,A2,A_s,dh1,dh2,alpha,zeta_fac,
1
Warning: Unused dummy argument 'a_s' at (1) [-Wunused-dummy-argument]
calc_residual_cross_split.f:46:56:

&zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1
1
Warning: Unused variable 'asa1' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:23:18:

&kappa,R,ider,iflag)
1
Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument]
calc_residual_cross_split.f:27:58:

integer icase,ichan_num,ider,icrit1,icrit2,iflag,ier
1
Warning: Unused variable 'ier' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:46:38:

&zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1
1
Warning: Unused variable 'pspt_s' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:38:13:

&pt2_lim,
1
Warning: Unused variable 'pt2_lim' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:46:26:

&zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1
1
Warning: Unused variable 'q_s' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:48:29:

real*8 Table_zeta(2,10)
1
Warning: Unused variable 'table_zeta' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:46:31:

&zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1
1
Warning: Unused variable 'ts_s' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:46:61:

&zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1
1
Warning: Unused variable 'vsv1' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:46:42:

&zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1
1
Warning: Unused variable 'w_s' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:46:47:

&zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1
1
Warning: Unused variable 'wsw1' declared at (1) [-Wunused-variable]
calc_residual_cross_split.f:46:22:

&zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1
1
Warning: Unused variable 'xflow_s' declared at (1) [-Wunused-variable]
gfortran -Wall -O2 -c calc_residual_tee.f
calc_residual_tee.f:19:41:

&pt2,Tt2,A1,A2,zeta_fac,kappa,R,ider,iflag,zeta)
1
Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument]
calc_residual_tee.f:55:13:

&pt2_lim,
1
Warning: Unused variable 'pt2_lim' declared at (1) [-Wunused-variable]
gfortran -Wall -O2 -c calc_residual_wye.f
calc_residual_wye.f:228:3:

80 format(3x,a,f10.6,a,f10.2,a,f10.6)
1
Warning: Label 80 at (1) defined but not used [-Wunused-label]
calc_residual_wye.f:229:3:

77 format(3x,a,f10.6,a,f10.2,a,f10.6)
1
Warning: Label 77 at (1) defined but not used [-Wunused-label]
calc_residual_wye.f:21:38:

& pt2,Tt2,ichan_num,A1,A2,A_s,dh1,dh2,alpha,zeta_fac,kappa,
1
Warning: Unused dummy argument 'a_s' at (1) [-Wunused-dummy-argument]
calc_residual_wye.f:22:17:

& R,ider,iflag,zeta)
1
Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument]
calc_residual_wye.f:79:26:

real*8 Table_A(2,11)
1
Warning: Unused variable 'table_a' declared at (1) [-Wunused-variable]
calc_residual_wye.f:51:15:

& Ts_s,
1
Warning: Unused variable 'ts_s' declared at (1) [-Wunused-variable]
calc_residual_wye.f:66:15:

& VsV1,
1
Warning: Unused variable 'vsv1' declared at (1) [-Wunused-variable]
gfortran -Wall -O2 -c calcspringforc.f
gfortran -Wall -O2 -c calcstabletimeinccont.f
calcstabletimeinccont.f:176:0:

& ((springmm+springms)*xk))

Warning: 'springfac' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcstabletimeincvol.f
calcstabletimeincvol.f:338:0:

volume=weight*xsj

Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcstabletimeincvol.f:63:0:

& konl(26),nopered,npmat_,nmat,kon(*),indexe,iflag,nopes,

Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcstress.f
calcstress.f:164:0:

p_(j)=p_(j)*maxs

Warning: 'p_[2]' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcstress.f:164:0: Warning: 'p_[1]' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcstress.f:164:0: Warning: 'p_[0]' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcstressheatfluxfem.f
calcstressheatfluxfem.f:33:0:

& jj,indexe,isti,iqfx,kk,ielmat(mi(3),*),nshcon(*),ntmat_,nope,

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcstressheatfluxfem.f:34:0:

& imat,ncocon(2,*),mint3d,k1,ipvar(*),index,iturbulent,nk,

Warning: 'mint3d' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcstressheatfluxfem.f:158:0:

if(compressible.eq.1) t(i1,i1)=t(i1,i1)-2.d0*div/3.d0

Warning: 'div' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcsurf.f
gfortran -Wall -O2 -c calctotstrain.f
gfortran -Wall -O2 -c calculated.f
gfortran -Wall -O2 -c calculateh.f
calculateh.f:114:0:

h(i)=h(i)*targetsize/size

Warning: 'size' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calculatehmid.f
gfortran -Wall -O2 -c calcview.f
calcview.f:49:39:

& dirloc(3),dist(*),area(*),dd,p21(3),sidemean,r(3,3),
1
Warning: Unused variable 'dd' declared at (1) [-Wunused-variable]
calcview.f:37:17:

integer ntr,i,j,k,l,mi(*),ntria,ntrib,
1
Warning: Unused variable 'ntr' declared at (1) [-Wunused-variable]
calcview.f:40:56:

& k1,kflag,idist(*),ndist,i2,i3,ng,idi,idj,ntri,
1
Warning: Unused variable 'ntri' declared at (1) [-Wunused-variable]
calcview.f:45:50:

& pmid(3,*),e3(4,*),e1(3,*),e2(3,*),p1(3),p2(3),p3(3),
1
Warning: Unused variable 'p1' declared at (1) [-Wunused-variable]
calcview.f:28:49:

& ntrit,mi,jqrad,irowrad,nzsrad,sidemean,ntria,ntrib,
1
Warning: Unused dummy argument 'sidemean' at (1) [-Wunused-dummy-argument]
calcview.f:46:14:

& x,y,porigin(3),yqmin,yqmax,xqmin,anglemin,distance,
1
Warning: Unused variable 'y' declared at (1) [-Wunused-variable]
calcview.f:504:37:

real*8 function fform(x,y,idata,rdata)
1
Warning: Unused dummy argument 'idata' at (1) [-Wunused-dummy-argument]
calcview.f:408:0:

if(((imin.eq.1).and.(imax.eq.2)).or.

Warning: 'imin' may be used uninitialized in this function [-Wmaybe-uninitialized]
calcview.f:408:0: Warning: 'imax' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c calcvol.f
gfortran -Wall -O2 -c calinput.f
gfortran -Wall -O2 -c calinput_rfn.f
gfortran -Wall -O2 -c carbon_seal.f
carbon_seal.f:22:25:

& iaxial,iplausi)
1
Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument]
carbon_seal.f:21:48:

& nodef,idirf,df,R,physcon,dvi,numf,set,mi,ttime,time,
1
Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument]
carbon_seal.f:21:62:

& nodef,idirf,df,R,physcon,dvi,numf,set,mi,ttime,time,
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
carbon_seal.f:21:57:

& nodef,idirf,df,R,physcon,dvi,numf,set,mi,ttime,time,
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c catedges_crackprop.f
gfortran -Wall -O2 -c catedges_refine.f
gfortran -Wall -O2 -c catnodes.f
gfortran -Wall -O2 -c cattet.f
gfortran -Wall -O2 -c cattri.f
gfortran -Wall -O2 -c cavity_refine.f
cavity_refine.f:534:0:

if(isol.eq.0) then

Warning: 'isol' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c cavityext_refine.f
cavityext_refine.f:751:0:

if(isol.eq.0) then

Warning: 'isol' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c cd_bleedtapping.f
cd_bleedtapping.f:34:32:

integer nummer,id,i,number,curve,index
1
Warning: Unused variable 'number' declared at (1) [-Wunused-variable]
gfortran -Wall -O2 -c cd_bragg.f
cd_bragg.f:29:47:

subroutine cd_bragg(cd,p2p1,cdbragg,itype)
1
Warning: Unused dummy argument 'itype' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c cd_chamfer.f
gfortran -Wall -O2 -c cd_lab_1spike.f
gfortran -Wall -O2 -c cd_lab_correction.f
gfortran -Wall -O2 -c cd_lab_honeycomb.f
gfortran -Wall -O2 -c cd_lab_radius.f
gfortran -Wall -O2 -c cd_lab_straight.f
gfortran -Wall -O2 -c cd_lichtarowicz.f
gfortran -Wall -O2 -c cd_Mcgreehan_Schotsch.f
gfortran -Wall -O2 -c cd_ms_ms.f
gfortran -Wall -O2 -c cd_own_albers.f
gfortran -Wall -O2 -c cd_pk_albers.f
gfortran -Wall -O2 -c cd_pk_ms.f
gfortran -Wall -O2 -c cd_preswirlnozzle.f
cd_preswirlnozzle.f:24:55:

subroutine cd_preswirlnozzle(ps2,pt1,number,curve,x_tab,y_tab,cd)
1
Warning: Unused dummy argument 'curve' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c cfdconv.f
gfortran -Wall -O2 -c cfds.f
cfds.f:21:39:

& inl,ipoinp,inp,ipoinpc,alpha,ctrl,iexpl,tincf,ttime,physcon,
1
Warning: Unused dummy argument 'alpha' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c cflux.f
cflux.f:21:46:

& shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon)
1
Warning: Unused dummy argument 'cocon' at (1) [-Wunused-dummy-argument]
cflux.f:19:62:

subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold,
1
Warning: Unused dummy argument 'coords' at (1) [-Wunused-dummy-argument]
cflux.f:20:60:

& mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat,
1
Warning: Unused dummy argument 'ielmat' at (1) [-Wunused-dummy-argument]
cflux.f:20:48:

& mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat,
1
Warning: Unused dummy argument 'ielprop' at (1) [-Wunused-dummy-argument]
cflux.f:20:40:

& mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat,
1
Warning: Unused dummy argument 'inoel' at (1) [-Wunused-dummy-argument]
cflux.f:20:16:

& mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat,
1
Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument]
cflux.f:20:34:

& mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat,
1
Warning: Unused dummy argument 'iponoel' at (1) [-Wunused-dummy-argument]
cflux.f:19:45:

subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold,
1
Warning: Unused dummy argument 'kinc' at (1) [-Wunused-dummy-argument]
cflux.f:20:20:

& mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat,
1
Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument]
cflux.f:19:40:

subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold,
1
Warning: Unused dummy argument 'kstep' at (1) [-Wunused-dummy-argument]
cflux.f:20:26:

& mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat,
1
Warning: Unused dummy argument 'lakon' at (1) [-Wunused-dummy-argument]
cflux.f:21:53:

& shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon)
1
Warning: Unused dummy argument 'ncocon' at (1) [-Wunused-dummy-argument]
cflux.f:19:55:

subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold,
1
Warning: Unused dummy argument 'node' at (1) [-Wunused-dummy-argument]
cflux.f:21:33:

& shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon)
1
Warning: Unused dummy argument 'nrhcon' at (1) [-Wunused-dummy-argument]
cflux.f:21:20:

& shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon)
1
Warning: Unused dummy argument 'nshcon' at (1) [-Wunused-dummy-argument]
cflux.f:20:53:

& mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat,
1
Warning: Unused dummy argument 'prop' at (1) [-Wunused-dummy-argument]
cflux.f:21:26:

& shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon)
1
Warning: Unused dummy argument 'rhcon' at (1) [-Wunused-dummy-argument]
cflux.f:21:13:

& shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon)
1
Warning: Unused dummy argument 'shcon' at (1) [-Wunused-dummy-argument]
cflux.f:19:50:

subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold,
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
cflux.f:19:67:

subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold,
1
Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c cfluxs.f
gfortran -Wall -O2 -c changecontacttypes.f
gfortran -Wall -O2 -c changedepterm.f
gfortran -Wall -O2 -c changefrictions.f
changefrictions.f:20:14:

& irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,ipoinpc,
1
Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument]
changefrictions.f:19:65:

subroutine changefrictions(inpc,textpart,matname,nmat,nmat_,
1
Warning: Unused dummy argument 'nmat_' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c changekon.f
gfortran -Wall -O2 -c changematerials.f
changematerials.f:20:14:

& irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,ipoinpc,
1
Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument]
changematerials.f:19:65:

subroutine changematerials(inpc,textpart,matname,nmat,nmat_,
1
Warning: Unused dummy argument 'nmat_' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c changeplastics.f
gfortran -Wall -O2 -c changesolidsections.f
changesolidsections.f:22:21:

& ipoinp,inp,cs,mcs,iaxial,ipoinpc,mi,nelcon,ier)
1
Warning: Unused dummy argument 'cs' at (1) [-Wunused-dummy-argument]
changesolidsections.f:22:32:

& ipoinp,inp,cs,mcs,iaxial,ipoinpc,mi,nelcon,ier)
1
Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument]
changesolidsections.f:35:48:

& ielorien(mi(3),*),kon(*),ipkon(*),indexe,irstrt(*),nset,nmat,
1
Warning: Unused variable 'indexe' declared at (1) [-Wunused-variable]
changesolidsections.f:21:30:

& lakon,thicke,kon,ipkon,irstrt,istep,istat,n,iline,ipol,inl,
1
Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument]
changesolidsections.f:21:37:

& lakon,thicke,kon,ipkon,irstrt,istep,istat,n,iline,ipol,inl,
1
Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument]
changesolidsections.f:21:24:

& lakon,thicke,kon,ipkon,irstrt,istep,istat,n,iline,ipol,inl,
1
Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument]
changesolidsections.f:37:33:

& istep,istat,n,key,i,j,k,l,imaterial,iorientation,ipos,
1
Warning: Unused variable 'l' declared at (1) [-Wunused-variable]
changesolidsections.f:22:25:

& ipoinp,inp,cs,mcs,iaxial,ipoinpc,mi,nelcon,ier)
1
Warning: Unused dummy argument 'mcs' at (1) [-Wunused-dummy-argument]
changesolidsections.f:22:50:

& ipoinp,inp,cs,mcs,iaxial,ipoinpc,mi,nelcon,ier)
1
Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument]
changesolidsections.f:21:20:

& lakon,thicke,kon,ipkon,irstrt,istep,istat,n,iline,ipol,inl,
1
Warning: Unused dummy argument 'thicke' at (1) [-Wunused-dummy-argument]
changesolidsections.f:40:38:

real*8 thicke(mi(3),*),thickness,pi,cs(17,*)
1
Warning: Unused variable 'thickness' declared at (1) [-Wunused-variable]
gfortran -Wall -O2 -c changesurfacebehaviors.f
changesurfacebehaviors.f:20:20:

& nmat_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,ipoinpc,
1
Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument]
changesurfacebehaviors.f:20:13:

& nmat_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,ipoinpc,
1
Warning: Unused dummy argument 'nmat_' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c channeljointback.f
channeljointback.f:336:0:

u2=xflow2/(rho*area2)

Warning: 'xflow2' may be used uninitialized in this function [-Wmaybe-uninitialized]
channeljointback.f:332:0:

u1=xflow1/(rho*area1)

Warning: 'xflow1' may be used uninitialized in this function [-Wmaybe-uninitialized]
channeljointback.f:360:0:

v(2,nup2)=h2

Warning: 'nup2' may be used uninitialized in this function [-Wmaybe-uninitialized]
channeljointback.f:110:0:

istackb(2,nstackb)=nup1

Warning: 'nup1' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c channeljointfront.f
channeljointfront.f:240:0:

istackb(2,nstackb)=nup2

Warning: 'nup2' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c characteristic.f
characteristic.f:22:42:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,
1
Warning: Unused dummy argument 'dvi' at (1) [-Wunused-dummy-argument]
characteristic.f:20:20:

& kon,ipkon,
1
Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument]
characteristic.f:23:39:

& mi,ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument]
characteristic.f:20:14:

& kon,ipkon,
1
Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument]
characteristic.f:22:51:

& nodef,idirf,df,cp,r,physcon,dvi,numf,set,
1
Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument]
characteristic.f:23:24:

& mi,ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
characteristic.f:23:19:

& mi,ttime,time,iaxial,iplausi)
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c characteristiclength.f
gfortran -Wall -O2 -c checkconstraint.f
checkconstraint.f:186:0:

& abs(obj),bounds(iobj),objnorm(iobj),

Warning: 'obj' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c checkcrosssections.f
gfortran -Wall -O2 -c checkdispoutonly.f
checkdispoutonly.f:19:39:

subroutine checkdispoutonly(prlab,nprint,nlabel,filab,
1
Warning: Unused dummy argument 'prlab' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c checkexiedge.f
gfortran -Wall -O2 -c checkforhomnet.f
gfortran -Wall -O2 -c checkimpacts.f
gfortran -Wall -O2 -c checkinputvaluesnet.f
gfortran -Wall -O2 -c checkintegrity.f
checkintegrity.f:24:0:

& ifatet(4,*),iel1,iel2,j1,j2,j

Warning: 'j2' may be used uninitialized in this function [-Wmaybe-uninitialized]
checkintegrity.f:24:0: Warning: 'j1' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c checkjac.f
gfortran -Wall -O2 -c checkprojectgrad.f
checkprojectgrad.f:21:38:

& inameactiold,g0,nobject,ndesi,nodedesi,dgdxglob,nk)
1
Warning: Unused dummy argument 'ndesi' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c checksharp.f
gfortran -Wall -O2 -c checktemp.f
gfortran -Wall -O2 -c checktempload.f
gfortran -Wall -O2 -c checktime.f
checktime.f:20:13:

& istep,tper)
1
Warning: Unused dummy argument 'istep' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c checktruecontact.f
gfortran -Wall -O2 -c checkvol.f
gfortran -Wall -O2 -c chksurf.f
chksurf.f:366:0:

& /(vlen(1)*vlen(2)))

Warning: 'lastvec[2]' may be used uninitialized in this function [-Wmaybe-uninitialized]
chksurf.f:366:0: Warning: 'lastvec[1]' may be used uninitialized in this function [-Wmaybe-uninitialized]
chksurf.f:366:0: Warning: 'lastvec[0]' may be used uninitialized in this function [-Wmaybe-uninitialized]
chksurf.f:366:0: Warning: 'vlen[0]' may be used uninitialized in this function [-Wmaybe-uninitialized]
chksurf.f:37:0:

& iscount,lnod,icont,iston4tet(3,4)

Warning: 'lnod' may be used uninitialized in this function [-Wmaybe-uninitialized]
chksurf.f:190:0:

if(kon(ipkon(ielem1)+j).eq.isnode)

Warning: 'isnode' may be used uninitialized in this function [-Wmaybe-uninitialized]
chksurf.f:36:0:

& isnode, isidx,ifreesur(3),iston20h(8,6),iston10tet(6,4),

Warning: 'isidx' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c cident80.f
gfortran -Wall -O2 -c cident81.f
gfortran -Wall -O2 -c cident.f
gfortran -Wall -O2 -c clearances.f
gfortran -Wall -O2 -c cload.f
cload.f:19:39:

subroutine cload(xload,kstep,kinc,time,node,idof,coords,vold,
1
Warning: Unused dummy argument 'kinc' at (1) [-Wunused-dummy-argument]
cload.f:19:34:

subroutine cload(xload,kstep,kinc,time,node,idof,coords,vold,
1
Warning: Unused dummy argument 'kstep' at (1) [-Wunused-dummy-argument]
cload.f:19:44:

subroutine cload(xload,kstep,kinc,time,node,idof,coords,vold,
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
cload.f:19:66:

subroutine cload(xload,kstep,kinc,time,node,idof,coords,vold,
1
Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument]
cload.f:114:0:

xload=f1*a(idof,1)+f2*a(idof,2)+f3*a(idof,3)

Warning: 'f1' may be used uninitialized in this function [-Wmaybe-uninitialized]
cload.f:114:0: Warning: 'f2' may be used uninitialized in this function [-Wmaybe-uninitialized]
cload.f:114:0: Warning: 'f3' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c cloaddistributing.f
gfortran -Wall -O2 -c cloads.f
gfortran -Wall -O2 -c clonesensitivities.f
clonesensitivities.f:25:32:

integer nobject,nk,i,j,k,l,objective_id
1
Warning: Unused variable 'l' declared at (1) [-Wunused-variable]
clonesensitivities.f:74:0:

objectset(i,1)(40:81)=objectset(i,objective_id)(40:81)

Warning: 'objective_id' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c closefile.f
gfortran -Wall -O2 -c closefilefluid.f
gfortran -Wall -O2 -c cmatrix.f
gfortran -Wall -O2 -c combilcfhcf.f
gfortran -Wall -O2 -c compdt.f
compdt.f:95:0:

dtmed=dh(i)*dh(i)*rho/(2.d0*dvi)

Warning: 'rho' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c complexfrequencys.f
gfortran -Wall -O2 -c con2phys.f
gfortran -Wall -O2 -c condrandomfield.f
gfortran -Wall -O2 -c conductivitys.f
gfortran -Wall -O2 -c constassembly.f
constassembly.f:41:72:

write(5,'(a113)') ' ################################################
1
Warning: Line truncated at (1) [-Wline-truncation]
constassembly.f:52:72:

write(5,'(a113)') ' ################################################
1
Warning: Line truncated at (1) [-Wline-truncation]
constassembly.f:31:0:

& nset,ndesiboun,nodedesiboun(*),id,istartset(*),iendset(*),

Warning: 'ndesiboun' may be used uninitialized in this function [-Wmaybe-uninitialized]
constassembly.f:122:0:

& abs(funcvalabs),bound,funcvalnorm,'ACTIVE '

Warning: 'funcvalabs' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c constraints.f
gfortran -Wall -O2 -c contactdampings.f
contactdampings.f:20:12:

& nmat,ntmat_,ncmat_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,
1
Warning: Unused dummy argument 'nmat' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c contactpairs.f
gfortran -Wall -O2 -c contactprints.f
contactprints.f:21:37:

& contactprint_flag,ithermal,istep,istat,n,iline,ipol,inl,
1
Warning: Unused dummy argument 'ithermal' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c contingentsurf.f
contingentsurf.f:43:47:

& pa,pb,pc,crackarea(*),v1(3),v2(3),al,p(3),
1
Warning: Unused variable 'al' declared at (1) [-Wunused-variable]
contingentsurf.f:32:27:

character*9 filelabel
1
Warning: Unused variable 'filelabel' declared at (1) [-Wunused-variable]
contingentsurf.f:31:26:

character*8 filename
1
Warning: Unused variable 'filename' declared at (1) [-Wunused-variable]
contingentsurf.f:30:26:

character*5 outlabel
1
Warning: Unused variable 'outlabel' declared at (1) [-Wunused-variable]
contingentsurf.f:40:0:

& itrend,itrendprev

Warning: 'itrend' may be used uninitialized in this function [-Wmaybe-uninitialized]
contingentsurf.f:297:0:

if(alambda.gt.alambdaprev) then

Warning: 'alambdaprev' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c contraction.f
contraction.f:24:27:

& mi,v,inv,epsilon,co)
1
Warning: Unused dummy argument 'epsilon' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c controlss.f
controlss.f:19:51:

subroutine controlss(inpc,textpart,ctrl,istep,istat,n,iline,ipol,
1
Warning: Unused dummy argument 'istep' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c copysens.f
gfortran -Wall -O2 -c coriolissolve.f
coriolissolve.f:181:0:

x(j,id+1)=temp(j,ksmall)

Warning: 'ksmall' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c correctem.f
correctem.f:32:0:

integer nprint,ne,ipkon(*),ncmat_,ntmat_,nk,i,ii,mint3d,k,

Warning: 'mint3d' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c correlationlengths.f
gfortran -Wall -O2 -c couplings.f
couplings.f:678:0:

xsj=weight*dsqrt(xsj2(1)**2+xsj2(2)**2+xsj2(3)**2)

Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized]
couplings.f:48:0:

& npt,mint,mpcfreeold,id,idof,iflag,nk_,l,ndirboun(*),

Warning: 'mint' may be used uninitialized in this function [-Wmaybe-uninitialized]
couplings.f:49:0:

& irotnode_kin,idupnode,ier,nopes,nfcstart,nfc,ikdc(*),ndc,

Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized]
couplings.f:47:0:

& kon(*),istep,nelem,ics(2,*),nodef(8),nboun_,nodeboun(*),

Warning: 'nelem' may be used uninitialized in this function [-Wmaybe-uninitialized]
couplings.f:42:0:

& iorientation,iface,jface,nset,nboun,istat,n,i,j,k,ibounstart,

Warning: 'jface' may be used uninitialized in this function [-Wmaybe-uninitialized]
couplings.f:255:0:

node=kon(indexe+ifaceq(m,jface))

Warning: 'indexe' may be used uninitialized in this function [-Wmaybe-uninitialized]
couplings.f:478:0:

if(surfkind.eq.'S') then

Warning: 'surfkind[1]{lb: 1 sz: 1}' may be used uninitialized in this function [-Wmaybe-uninitialized]
couplings.f:509:0:

do k=istartset(jsurf),iendset(jsurf)

Warning: 'jsurf' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c couptempdisps.f
gfortran -Wall -O2 -c cp_corrected.f
gfortran -Wall -O2 -c cracklength.f
cracklength.f:46:40:

& acrackglob(*),dlength,alambda,pneigh(3,2),xil,pnode(3),
1
Warning: Unused variable 'alambda' declared at (1) [-Wunused-variable]
cracklength.f:45:45:

& acrack(*),p(3),q(3),r(3),coords(3),posfront(*),dd,ratio(2),
1
Warning: Unused variable 'coords' declared at (1) [-Wunused-variable]
cracklength.f:47:45:

& doubleglob(*),dummy(1),dist,cosang
1
Warning: Unused variable 'cosang' declared at (1) [-Wunused-variable]
cracklength.f:22:37:

& ifront,posfront,doubleglob,integerglob,
1
Warning: Unused dummy argument 'doubleglob' at (1) [-Wunused-dummy-argument]
cracklength.f:47:33:

& doubleglob(*),dummy(1),dist,cosang
1
Warning: Unused variable 'dummy' declared at (1) [-Wunused-variable]
cracklength.f:39:53:

& konl(20),istartset(1),iendset(1),ialset(1),iselect(1),
1
Warning: Unused variable 'ialset' declared at (1) [-Wunused-variable]
cracklength.f:20:58:

& co,istartcrackbou,iendcrackbou,costruc,ibounnod,xt,acrack,
1
Warning: Unused dummy argument 'ibounnod' at (1) [-Wunused-dummy-argument]
cracklength.f:39:43:

& konl(20),istartset(1),iendset(1),ialset(1),iselect(1),
1
Warning: Unused variable 'iendset' declared at (1) [-Wunused-variable]
cracklength.f:39:64:

& konl(20),istartset(1),iendset(1),ialset(1),iselect(1),
1
Warning: Unused variable 'iselect' declared at (1) [-Wunused-variable]
cracklength.f:39:32:

& konl(20),istartset(1),iendset(1),ialset(1),iselect(1),
1
Warning: Unused variable 'istartset' declared at (1) [-Wunused-variable]
cracklength.f:39:19:

& konl(20),istartset(1),iendset(1),ialset(1),iselect(1),
1
Warning: Unused variable 'konl' declared at (1) [-Wunused-variable]
cracklength.f:23:45:

& nproc,iinc,acrackglob,ier,nbounnod,nfront)
1
Warning: Unused dummy argument 'nbounnod' at (1) [-Wunused-dummy-argument]
cracklength.f:38:52:

& node,nktet,nkon,nfield,nfaces,netet,nelem,ne,loopa,
1
Warning: Unused variable 'nelem' declared at (1) [-Wunused-variable]
cracklength.f:37:58:

& nnfront,jrel,ifrontrel(*),integerglob(*),nterms,nselect,
1
Warning: Unused variable 'nterms' declared at (1) [-Wunused-variable]
cracklength.f:45:25:

& acrack(*),p(3),q(3),r(3),coords(3),posfront(*),dd,ratio(2),
1
Warning: Unused variable 'p' declared at (1) [-Wunused-variable]
cracklength.f:45:30:

& acrack(*),p(3),q(3),r(3),coords(3),posfront(*),dd,ratio(2),
1
Warning: Unused variable 'q' declared at (1) [-Wunused-variable]
cracklength.f:45:35:

& acrack(*),p(3),q(3),r(3),coords(3),posfront(*),dd,ratio(2),
1
Warning: Unused variable 'r' declared at (1) [-Wunused-variable]
gfortran -Wall -O2 -c cracklength_smoothing.f
cracklength_smoothing.f:21:50:

& istartcrackfro,iendcrackfro,acrack,amin,nfront,ncrack,
1
Warning: Unused dummy argument 'amin' at (1) [-Wunused-dummy-argument]
cracklength_smoothing.f:21:38:

& istartcrackfro,iendcrackfro,acrack,amin,nfront,ncrack,
1
Warning: Unused dummy argument 'iendcrackfro' at (1) [-Wunused-dummy-argument]
cracklength_smoothing.f:21:25:

& istartcrackfro,iendcrackfro,acrack,amin,nfront,ncrack,
1
Warning: Unused dummy argument 'istartcrackfro' at (1) [-Wunused-dummy-argument]
cracklength_smoothing.f:32:18:

& nstep,m
1
Warning: Unused variable 'm' declared at (1) [-Wunused-variable]
cracklength_smoothing.f:21:64:

& istartcrackfro,iendcrackfro,acrack,amin,nfront,ncrack,
1
Warning: Unused dummy argument 'ncrack' at (1) [-Wunused-dummy-argument]
cracklength_smoothing.f:22:22:

& idist,nstep)
1
Warning: Unused dummy argument 'nstep' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c crackprop.f
gfortran -Wall -O2 -c crackpropagations.f
crackpropagations.f:23:45:

& iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,
1
Warning: Unused dummy argument 'coefmpc' at (1) [-Wunused-dummy-argument]
crackpropagations.f:22:19:

& ithermal,cs,ics,tieset,istartset,
1
Warning: Unused dummy argument 'cs' at (1) [-Wunused-dummy-argument]
crackpropagations.f:23:22:

& iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,
1
Warning: Unused dummy argument 'ialset' at (1) [-Wunused-dummy-argument]
crackpropagations.f:25:14:

& iaxial,nelcon,nmat,ier,jobnamec,matname)
1
Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument]
crackpropagations.f:22:23:

& ithermal,cs,ics,tieset,istartset,
1
Warning: Unused dummy argument 'ics' at (1) [-Wunused-dummy-argument]
crackpropagations.f:23:15:

& iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,
1
Warning: Unused dummy argument 'iendset' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:55:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'iexpl' at (1) [-Wunused-dummy-argument]
crackpropagations.f:23:62:

& iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,
1
Warning: Unused dummy argument 'ikmpc' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:13:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'ilmpc' at (1) [-Wunused-dummy-argument]
crackpropagations.f:19:65:

subroutine crackpropagations(inpc,textpart,nmethod,iperturb,
1
Warning: Unused dummy argument 'iperturb' at (1) [-Wunused-dummy-argument]
crackpropagations.f:23:29:

& iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,
1
Warning: Unused dummy argument 'ipompc' at (1) [-Wunused-dummy-argument]
crackpropagations.f:20:15:

& isolver,istep,
1
Warning: Unused dummy argument 'isolver' at (1) [-Wunused-dummy-argument]
crackpropagations.f:22:40:

& ithermal,cs,ics,tieset,istartset,
1
Warning: Unused dummy argument 'istartset' at (1) [-Wunused-dummy-argument]
crackpropagations.f:22:16:

& ithermal,cs,ics,tieset,istartset,
1
Warning: Unused dummy argument 'ithermal' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:41:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'labmpc' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:25:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'mcs' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:21:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'mpcfree' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:59:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'nef' at (1) [-Wunused-dummy-argument]
crackpropagations.f:25:21:

& iaxial,nelcon,nmat,ier,jobnamec,matname)
1
Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument]
crackpropagations.f:23:50:

& iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,
1
Warning: Unused dummy argument 'nmpc' at (1) [-Wunused-dummy-argument]
crackpropagations.f:23:56:

& iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,
1
Warning: Unused dummy argument 'nmpc_' at (1) [-Wunused-dummy-argument]
crackpropagations.f:23:37:

& iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,
1
Warning: Unused dummy argument 'nodempc' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:34:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'nset' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:29:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument]
crackpropagations.f:42:35:

character*20 labmpc(*),solver
1
Warning: Unused variable 'solver' declared at (1) [-Wunused-variable]
crackpropagations.f:22:30:

& ithermal,cs,ics,tieset,istartset,
1
Warning: Unused dummy argument 'tieset' at (1) [-Wunused-dummy-argument]
crackpropagations.f:24:65:

& ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime,
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
crackpropagations.f:209:0:

71 write(*,*) '*ERROR in openfile: could not open file ',fnfrd(1:i+4)

Warning: 'i' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c crackrate.f
crackrate.f:21:53:

& crconloc,ncrconst,xk1,xk2,xk3,nstep,acrack,
1
Warning: Unused dummy argument 'acrack' at (1) [-Wunused-dummy-argument]
crackrate.f:23:31:

& param,nparam,law,ier,r)
1
Warning: Unused dummy argument 'ier' at (1) [-Wunused-dummy-argument]
crackrate.f:19:59:

subroutine crackrate(nfront,ifrontrel,xkeq,phi,ifront,
1
Warning: Unused dummy argument 'ifront' at (1) [-Wunused-dummy-argument]
crackrate.f:23:27:

& param,nparam,law,ier,r)
1
Warning: Unused dummy argument 'law' at (1) [-Wunused-dummy-argument]
crackrate.f:23:23:

& param,nparam,law,ier,r)
1
Warning: Unused dummy argument 'nparam' at (1) [-Wunused-dummy-argument]
crackrate.f:23:16:

& param,nparam,law,ier,r)
1
Warning: Unused dummy argument 'param' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c crackshape.f
crackshape.f:19:42:

subroutine crackshape(nnfront,ifront,istartfront,iendfront,
1
Warning: Unused dummy argument 'ifront' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c create_contactdofs.f
gfortran -Wall -O2 -c create_t.f
gfortran -Wall -O2 -c create_tinv.f
gfortran -Wall -O2 -c createbd.f
gfortran -Wall -O2 -c createblock_struct.f
gfortran -Wall -O2 -c createelemneigh.f
gfortran -Wall -O2 -c createfint.f
createfint.f:26:0:

integer i,j,k,ne,indexe,ipkon(*),nope,node,kon(*),mi(*),

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c createialnk.f
gfortran -Wall -O2 -c createinterfacempcs.f
gfortran -Wall -O2 -c createinum.f
createinum.f:20:46:

& nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat,
1
Warning: Unused dummy argument 'ithermal' at (1) [-Wunused-dummy-argument]
createinum.f:20:28:

& nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat,
1
Warning: Unused dummy argument 'nboun' at (1) [-Wunused-dummy-argument]
createinum.f:20:37:

& nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat,
1
Warning: Unused dummy argument 'ndirboun' at (1) [-Wunused-dummy-argument]
createinum.f:19:70:

subroutine createinum(ipkon,inum,kon,lakon,nk,ne,cflag,nelemload,
1
Warning: Unused dummy argument 'nelemload' at (1) [-Wunused-dummy-argument]
createinum.f:20:13:

& nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat,
1
Warning: Unused dummy argument 'nload' at (1) [-Wunused-dummy-argument]
createinum.f:32:43:

& nk,i,j,nelemload(2,*),nload,node,nboun,nlayer,nopeexp,
1
Warning: Unused variable 'node' declared at (1) [-Wunused-variable]
createinum.f:20:22:

& nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat,
1
Warning: Unused dummy argument 'nodeboun' at (1) [-Wunused-dummy-argument]
createinum.f:32:0:

& nk,i,j,nelemload(2,*),nload,node,nboun,nlayer,nopeexp,

Warning: 'nopeexp' may be used uninitialized in this function [-Wmaybe-uninitialized]
createinum.f:103:0:

do j=1,nope*nlayer

Warning: 'nlayer' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c createlocalsys.f
createlocalsys.f:22:26:

& angle,nstep,ier)
1
Warning: Unused dummy argument 'ier' at (1) [-Wunused-dummy-argument]
createlocalsys.f:20:29:

& co,xt,xn,xa,nfront,ifrontrel,stress,iedno,ibounedg,ieled,
1
Warning: Unused dummy argument 'nfront' at (1) [-Wunused-dummy-argument]
createlocalsys.f:20:46:

& co,xt,xn,xa,nfront,ifrontrel,stress,iedno,ibounedg,ieled,
1
Warning: Unused dummy argument 'stress' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c createmddof.f
gfortran -Wall -O2 -c createmdelem.f
createmdelem.f:46:23:

& iendset(*),idof,m,ikforc(*),ilforc(*),nforc
1
Warning: Unused variable 'idof' declared at (1) [-Wunused-variable]
createmdelem.f:40:19:

integer iforc,node,imdnode(*),nmdnode,ikmpc(*),
1
Warning: Unused variable 'iforc' declared at (1) [-Wunused-variable]
createmdelem.f:25:26:

& ikforc,ilforc)
1
Warning: Unused dummy argument 'ikforc' at (1) [-Wunused-dummy-argument]
createmdelem.f:25:33:

& ikforc,ilforc)
1
Warning: Unused dummy argument 'ilforc' at (1) [-Wunused-dummy-argument]
createmdelem.f:24:60:

& ialset,ipkon,kon,istartset,iendset,nforc,
1
Warning: Unused dummy argument 'nforc' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c createnodeneigh.f
createnodeneigh.f:28:41:

& istartnk(*),ialnk(*),ifree,index,i,j,k,nea,neb,elem,
1
Warning: Unused variable 'index' declared at (1) [-Wunused-variable]
createnodeneigh.f:29:0:

& ipkon(*),kon(*),indexe,nope,ichecknodes(*),node,

Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c createtet.f
createtet.f:25:39:

& ipofa(*),ifreetet,ifreefa,ifree,ig(3,4),j,
1
Warning: Unused variable 'ifree' declared at (1) [-Wunused-variable]
createtet.f:25:25:

& ipofa(*),ifreetet,ifreefa,ifree,ig(3,4),j,
1
Warning: Unused variable 'ifreetet' declared at (1) [-Wunused-variable]
createtet.f:25:49:

& ipofa(*),ifreetet,ifreefa,ifree,ig(3,4),j,
1
Warning: Unused variable 'j' declared at (1) [-Wunused-variable]
createtet.f:27:44:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'j1' declared at (1) [-Wunused-variable]
createtet.f:27:47:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'j2' declared at (1) [-Wunused-variable]
createtet.f:27:50:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'j3' declared at (1) [-Wunused-variable]
createtet.f:26:10:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'n1' declared at (1) [-Wunused-variable]
createtet.f:26:13:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'n2' declared at (1) [-Wunused-variable]
createtet.f:26:16:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'n3' declared at (1) [-Wunused-variable]
createtet.f:26:19:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'n4' declared at (1) [-Wunused-variable]
createtet.f:28:34:

& node,indexold,ielement,ndx,ndy,ndz,iparentelement
1
Warning: Unused variable 'ndx' declared at (1) [-Wunused-variable]
createtet.f:28:38:

& node,indexold,ielement,ndx,ndy,ndz,iparentelement
1
Warning: Unused variable 'ndy' declared at (1) [-Wunused-variable]
createtet.f:28:42:

& node,indexold,ielement,ndx,ndy,ndz,iparentelement
1
Warning: Unused variable 'ndz' declared at (1) [-Wunused-variable]
createtet.f:27:15:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'nx1' declared at (1) [-Wunused-variable]
createtet.f:27:19:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'nx2' declared at (1) [-Wunused-variable]
createtet.f:26:23:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nxa' declared at (1) [-Wunused-variable]
createtet.f:26:27:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nxb' declared at (1) [-Wunused-variable]
createtet.f:26:31:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nxc' declared at (1) [-Wunused-variable]
createtet.f:26:35:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nxd' declared at (1) [-Wunused-variable]
createtet.f:27:23:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'ny1' declared at (1) [-Wunused-variable]
createtet.f:27:27:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'ny2' declared at (1) [-Wunused-variable]
createtet.f:26:39:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nya' declared at (1) [-Wunused-variable]
createtet.f:26:43:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nyb' declared at (1) [-Wunused-variable]
createtet.f:26:47:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nyc' declared at (1) [-Wunused-variable]
createtet.f:26:51:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nyd' declared at (1) [-Wunused-variable]
createtet.f:27:31:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'nz1' declared at (1) [-Wunused-variable]
createtet.f:27:35:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'nz2' declared at (1) [-Wunused-variable]
createtet.f:26:55:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nza' declared at (1) [-Wunused-variable]
createtet.f:26:59:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nzb' declared at (1) [-Wunused-variable]
createtet.f:26:63:

& n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc,
1
Warning: Unused variable 'nzc' declared at (1) [-Wunused-variable]
createtet.f:27:11:

& nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n,
1
Warning: Unused variable 'nzd' declared at (1) [-Wunused-variable]
createtet.f:78:0:

inodfa(4,indexold)=index

Warning: 'indexold' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c createtiedsurfs.f
gfortran -Wall -O2 -c creep.f
creep.f:20:49:

& temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend,
1
Warning: Unused dummy argument 'cmname' at (1) [-Wunused-dummy-argument]
creep.f:21:14:

& coords,nstatv,noel,npt,layer,kspt,kstep,kinc)
1
Warning: Unused dummy argument 'coords' at (1) [-Wunused-dummy-argument]
creep.f:19:34:

subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild,
1
Warning: Unused dummy argument 'deswa' at (1) [-Wunused-dummy-argument]
creep.f:20:31:

& temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend,
1
Warning: Unused dummy argument 'dpred' at (1) [-Wunused-dummy-argument]
creep.f:20:18:

& temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend,
1
Warning: Unused dummy argument 'dtemp' at (1) [-Wunused-dummy-argument]
creep.f:19:49:

subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild,
1
Warning: Unused dummy argument 'ec' at (1) [-Wunused-dummy-argument]
creep.f:19:53:

subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild,
1
Warning: Unused dummy argument 'esw' at (1) [-Wunused-dummy-argument]
creep.f:21:52:

& coords,nstatv,noel,npt,layer,kspt,kstep,kinc)
1
Warning: Unused dummy argument 'kinc' at (1) [-Wunused-dummy-argument]
creep.f:21:41:

& coords,nstatv,noel,npt,layer,kspt,kstep,kinc)
1
Warning: Unused dummy argument 'kspt' at (1) [-Wunused-dummy-argument]
creep.f:21:47:

& coords,nstatv,noel,npt,layer,kspt,kstep,kinc)
1
Warning: Unused dummy argument 'kstep' at (1) [-Wunused-dummy-argument]
creep.f:21:36:

& coords,nstatv,noel,npt,layer,kspt,kstep,kinc)
1
Warning: Unused dummy argument 'layer' at (1) [-Wunused-dummy-argument]
creep.f:20:61:

& temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend,
1
Warning: Unused dummy argument 'lend' at (1) [-Wunused-dummy-argument]
creep.f:20:56:

& temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend,
1
Warning: Unused dummy argument 'leximp' at (1) [-Wunused-dummy-argument]
creep.f:21:26:

& coords,nstatv,noel,npt,layer,kspt,kstep,kinc)
1
Warning: Unused dummy argument 'noel' at (1) [-Wunused-dummy-argument]
creep.f:21:30:

& coords,nstatv,noel,npt,layer,kspt,kstep,kinc)
1
Warning: Unused dummy argument 'npt' at (1) [-Wunused-dummy-argument]
creep.f:21:21:

& coords,nstatv,noel,npt,layer,kspt,kstep,kinc)
1
Warning: Unused dummy argument 'nstatv' at (1) [-Wunused-dummy-argument]
creep.f:19:55:

subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild,
1
Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument]
creep.f:20:25:

& temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend,
1
Warning: Unused dummy argument 'predef' at (1) [-Wunused-dummy-argument]
creep.f:19:46:

subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild,
1
Warning: Unused dummy argument 'serd' at (1) [-Wunused-dummy-argument]
creep.f:19:41:

subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild,
1
Warning: Unused dummy argument 'statev' at (1) [-Wunused-dummy-argument]
creep.f:20:12:

& temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend,
1
Warning: Unused dummy argument 'temp' at (1) [-Wunused-dummy-argument]
creep.f:20:36:

& temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend,
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c creeps.f
gfortran -Wall -O2 -c cross_split.f
cross_split.f:22:25:

& iaxial,iplausi)
1
Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument]
cross_split.f:21:47:

& nodef,idirf,df,cp,r,physcon,numf,set,mi,ider,ttime,time,
1
Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument]
cross_split.f:21:66:

& nodef,idirf,df,cp,r,physcon,numf,set,mi,ider,ttime,time,
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
cross_split.f:21:61:

& nodef,idirf,df,cp,r,physcon,numf,set,mi,ider,ttime,time,
1
Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument]
cross_split.f:42:0:

&tdkp1,A,A1,A2,calc_residual_cross_split,dh1,dh2,alpha,xflow1,

Warning: 'a' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c cubic.f
gfortran -Wall -O2 -c cubtri.f
cubtri.f:145:0:

IF (ERR.LT.DMAX1(ONE,ABS(ANS))*EPS) GO TO 90

Warning: 'terr' may be used uninitialized in this function [-Wmaybe-uninitialized]
cubtri.f:145:0: Warning: 'tans' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c cyclichardenings.f
cyclichardenings.f:20:45:

& npmat_,plicon,nplicon,ncmat_,elcon,matname,
1
Warning: Unused dummy argument 'elcon' at (1) [-Wunused-dummy-argument]
cyclichardenings.f:33:60:

& n,key,i,nplicon(0:ntmat_,*),istat,ncmat_,itemp,id,
1
Warning: Unused variable 'id' declared at (1) [-Wunused-variable]
cyclichardenings.f:33:57:

& n,key,i,nplicon(0:ntmat_,*),istat,ncmat_,itemp,id,
1
Warning: Unused variable 'itemp' declared at (1) [-Wunused-variable]
cyclichardenings.f:34:42:

& ipoinpc(0:*),ndata,ndatamax,kin,irstrt(*),iline,ipol,inl,
1
Warning: Unused variable 'kin' declared at (1) [-Wunused-variable]
cyclichardenings.f:20:53:

& npmat_,plicon,nplicon,ncmat_,elcon,matname,
1
Warning: Unused dummy argument 'matname' at (1) [-Wunused-dummy-argument]
cyclichardenings.f:34:29:

& ipoinpc(0:*),ndata,ndatamax,kin,irstrt(*),iline,ipol,inl,
1
Warning: Unused variable 'ndata' declared at (1) [-Wunused-variable]
cyclichardenings.f:34:38:

& ipoinpc(0:*),ndata,ndatamax,kin,irstrt(*),iline,ipol,inl,
1
Warning: Unused variable 'ndatamax' declared at (1) [-Wunused-variable]
cyclichardenings.f:38:49:

& elcon(0:ncmat_,ntmat_,*),plconloc(802),t1l
1
Warning: Unused variable 'plconloc' declared at (1) [-Wunused-variable]
cyclichardenings.f:38:53:

& elcon(0:ncmat_,ntmat_,*),plconloc(802),t1l
1
Warning: Unused variable 't1l' declared at (1) [-Wunused-variable]
gfortran -Wall -O2 -c cyclicsymmetrymodels.f
cyclicsymmetrymodels.f:27:58:

& trab,ntrans,ntrans_,jobnamec,vold,nef,mi,iaxial,ier)
1
Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument]
cyclicsymmetrymodels.f:22:29:

& coefmpc,nmpc,nmpc_,ikmpc,ilmpc,mpcfree,rcs,zcs,ics,nr,nz,
1
Warning: Unused dummy argument 'nmpc_' at (1) [-Wunused-dummy-argument]
cyclicsymmetrymodels.f:844:0:

y1=x3*z2-x2*z3

Warning: 'z2' may be used uninitialized in this function [-Wmaybe-uninitialized]
cyclicsymmetrymodels.f:845:0:

z1=x2*y3-x3*y2

Warning: 'y2' may be used uninitialized in this function [-Wmaybe-uninitialized]
cyclicsymmetrymodels.f:848:0:

& dacos(x2*x3+y2*y3+z2*z3)

Warning: 'x2' may be used uninitialized in this function [-Wmaybe-uninitialized]
cyclicsymmetrymodels.f:72:0:

& nodempc(3,*),itiecyc,ntiecyc,iaxial,nopes,nelems,m,indexe,

Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized]
cyclicsymmetrymodels.f:681:0:

noded=kon(indexe+ifaceq(m,jfaces))

Warning: 'indexe' may be used uninitialized in this function [-Wmaybe-uninitialized]
cyclicsymmetrymodels.f:78:0:

& ifacetet(*),inodface(*),ipoinpc(0:*),maxsectors,id,jfaces,

Warning: 'jfaces' may be used uninitialized in this function [-Wmaybe-uninitialized]
cyclicsymmetrymodels.f:72:0:

& nodempc(3,*),itiecyc,ntiecyc,iaxial,nopes,nelems,m,indexe,

Warning: 'nelems' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c dampings.f
gfortran -Wall -O2 -c dashdamp.f
dashdamp.f:19:33:

subroutine dashdamp(xl,konl,voldl,s,imat,elcon,nelcon,
1
Warning: Unused dummy argument 'konl' at (1) [-Wunused-dummy-argument]
dashdamp.f:20:33:

& ncmat_,ntmat_,nope,lakonl,t0l,t1l,kode,elconloc,plicon,
1
Warning: Unused dummy argument 'lakonl' at (1) [-Wunused-dummy-argument]
dashdamp.f:20:37:

& ncmat_,ntmat_,nope,lakonl,t0l,t1l,kode,elconloc,plicon,
1
Warning: Unused dummy argument 't0l' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c dashpots.f
dashpots.f:214:0:

elset(ipos:ipos)=' '

Warning: 'ipos' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c dattime.f
gfortran -Wall -O2 -c ddeabm.f
ddeabm.f:2086:22:

INTEGER DIVER(4)
1
Warning: Unused variable 'diver' declared at (1) [-Wunused-variable]
ddeabm.f:2084:22:

INTEGER LARGE(4)
1
Warning: Unused variable 'large' declared at (1) [-Wunused-variable]
ddeabm.f:2087:22:

INTEGER LOG10(4)
1
Warning: Unused variable 'log10' declared at (1) [-Wunused-variable]
ddeabm.f:2085:22:

INTEGER RIGHT(4)
1
Warning: Unused variable 'right' declared at (1) [-Wunused-variable]
ddeabm.f:2083:22:

INTEGER SMALL(4)
1
Warning: Unused variable 'small' declared at (1) [-Wunused-variable]
ddeabm.f:4601:30:

SUBROUTINE XERHLT (MESSG)
1
Warning: Unused dummy argument 'messg' at (1) [-Wunused-dummy-argument]
ddeabm.f:4541:67:

SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL)
1
Warning: Unused dummy argument 'kontrl' at (1) [-Wunused-dummy-argument]
ddeabm.f:4541:59:

SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL)
1
Warning: Unused dummy argument 'level' at (1) [-Wunused-dummy-argument]
ddeabm.f:4541:31:

SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL)
1
Warning: Unused dummy argument 'librar' at (1) [-Wunused-dummy-argument]
ddeabm.f:4541:46:

SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL)
1
Warning: Unused dummy argument 'messg' at (1) [-Wunused-dummy-argument]
ddeabm.f:4541:52:

SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL)
1
Warning: Unused dummy argument 'nerr' at (1) [-Wunused-dummy-argument]
ddeabm.f:4541:39:

SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL)
1
Warning: Unused dummy argument 'subrou' at (1) [-Wunused-dummy-argument]
ddeabm.f:1206:0:

GDI = 1.0D0/TEMP1

Warning: 'temp1' may be used uninitialized in this function [-Wmaybe-uninitialized]
ddeabm.f:4082:0:

WRITE (UNIT = OUTPUT, FMT = 9000)

Warning: 'output' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c ddebdf.f
ddebdf.f:2626:39:

SUBROUTINE DSLVS (WM, IWM, X, TEM)
1
Warning: Unused dummy argument 'tem' at (1) [-Wunused-dummy-argument]
ddebdf.f:2399:27:

SUBROUTINE DPJAC (NEQ, Y, YH, NYH, EWT, FTEM, SAVF, WM, IWM, DF,
1
Warning: Unused dummy argument 'neq' at (1) [-Wunused-dummy-argument]
ddebdf.f:1912:0:

IF (M .GE. 2 .AND. DEL .GT. 2.0D0*DELP)

Warning: 'delp' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c deformationplasticitys.f
gfortran -Wall -O2 -c defplas.f
defplas.f:20:15:

& beta,stre,ckl,vj,xstate,nstate_,iel,iint,mi)
1
Warning: Unused dummy argument 'beta' at (1) [-Wunused-dummy-argument]
defplas.f:19:52:

subroutine defplas(elconloc,elas,emec,ithermal,icmd,
1
Warning: Unused dummy argument 'ithermal' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c delaun.f
gfortran -Wall -O2 -c deltri.f
gfortran -Wall -O2 -c densitys.f
gfortran -Wall -O2 -c depvars.f
depvars.f:21:20:

& ncocon,ipoinpc,ier)
1
Warning: Unused dummy argument 'ncocon' at (1) [-Wunused-dummy-argument]
depvars.f:19:45:

subroutine depvars(inpc,textpart,nelcon,nmat,
1
Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c designresponses.f
gfortran -Wall -O2 -c designvariabless.f
designvariabless.f:19:61:

subroutine designvariabless(inpc,textpart,tieset,tietol,istep,
1
Warning: Unused dummy argument 'tietol' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c desiperelem.f
gfortran -Wall -O2 -c detectactivecont.f
gfortran -Wall -O2 -c determineextern.f
gfortran -Wall -O2 -c dflux.f
dflux.f:20:41:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'area' at (1) [-Wunused-dummy-argument]
dflux.f:20:49:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'co' at (1) [-Wunused-dummy-argument]
dflux.f:21:33:

& ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi,
1
Warning: Unused dummy argument 'coefmpc' at (1) [-Wunused-dummy-argument]
dflux.f:19:63:

subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords,
1
Warning: Unused dummy argument 'coords' at (1) [-Wunused-dummy-argument]
dflux.f:113:68:

integer kstep,kinc,noel,npt,jltyp,konl(20),ipompc(*),nstate_,i,
1
Warning: Unused variable 'i' declared at (1) [-Wunused-variable]
dflux.f:114:56:

& nodempc(3,*),nmpc,ikmpc(*),ilmpc(*),node,idof,id,iscale,mi(*)
1
Warning: Unused variable 'id' declared at (1) [-Wunused-variable]
dflux.f:114:53:

& nodempc(3,*),nmpc,ikmpc(*),ilmpc(*),node,idof,id,iscale,mi(*)
1
Warning: Unused variable 'idof' declared at (1) [-Wunused-variable]
dflux.f:21:44:

& ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi,
1
Warning: Unused dummy argument 'ikmpc' at (1) [-Wunused-dummy-argument]
dflux.f:21:50:

& ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi,
1
Warning: Unused dummy argument 'ilmpc' at (1) [-Wunused-dummy-argument]
dflux.f:21:17:

& ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi,
1
Warning: Unused dummy argument 'ipompc' at (1) [-Wunused-dummy-argument]
dflux.f:21:57:

& ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi,
1
Warning: Unused dummy argument 'iscale' at (1) [-Wunused-dummy-argument]
dflux.f:20:16:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'jltyp' at (1) [-Wunused-dummy-argument]
dflux.f:19:42:

subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords,
1
Warning: Unused dummy argument 'kinc' at (1) [-Wunused-dummy-argument]
dflux.f:20:61:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'konl' at (1) [-Wunused-dummy-argument]
dflux.f:19:37:

subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords,
1
Warning: Unused dummy argument 'kstep' at (1) [-Wunused-dummy-argument]
dflux.f:20:56:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'lakonl' at (1) [-Wunused-dummy-argument]
dflux.f:20:36:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'loadtype' at (1) [-Wunused-dummy-argument]
dflux.f:21:38:

& ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi,
1
Warning: Unused dummy argument 'nmpc' at (1) [-Wunused-dummy-argument]
dflux.f:114:48:

& nodempc(3,*),nmpc,ikmpc(*),ilmpc(*),node,idof,id,iscale,mi(*)
1
Warning: Unused variable 'node' declared at (1) [-Wunused-variable]
dflux.f:21:25:

& ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi,
1
Warning: Unused dummy argument 'nodempc' at (1) [-Wunused-dummy-argument]
dflux.f:20:27:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'press' at (1) [-Wunused-dummy-argument]
dflux.f:19:31:

subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords,
1
Warning: Unused dummy argument 'sol' at (1) [-Wunused-dummy-argument]
dflux.f:20:21:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'temp' at (1) [-Wunused-dummy-argument]
dflux.f:19:47:

subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords,
1
Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument]
dflux.f:20:46:

& jltyp,temp,press,loadtype,area,vold,co,lakonl,konl,
1
Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c dfluxs.f
dfluxs.f:21:17:

& ielmat,ntmat_,iamload,
1
Warning: Unused dummy argument 'ielmat' at (1) [-Wunused-dummy-argument]
dfluxs.f:21:24:

& ielmat,ntmat_,iamload,
1
Warning: Unused dummy argument 'ntmat_' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c dgesv.f
dgesv.f:878:69:

INTEGER FUNCTION ILAENV( ISPEC, NAME, OPTS, N1, N2, N3,
1
Warning: Unused dummy argument 'n3' at (1) [-Wunused-dummy-argument]
dgesv.f:878:57:

INTEGER FUNCTION ILAENV( ISPEC, NAME, OPTS, N1, N2, N3,
1
Warning: Unused dummy argument 'opts' at (1) [-Wunused-dummy-argument]
gfortran -Wall -O2 -c dgmres1.f
dgmres1.f:998:36:

INTEGER FUNCTION ISDGMR1 (N, B, X, XL, NELT, IA, JA, A, ISYM,
1
Warning: Unused dummy argument 'b' at (1) [-Wunused-dummy-argument]
dgmres1.f:999:31:

+ NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ,
1
Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument]
dgmres1.f:1000:37:

+ RWORK, IWORK, RNRM, BNRM, SB, SX, JSCAL, KMP, LGMR, MAXL,
1
Warning: Unused dummy argument 'sb' at (1) [-Wunused-dummy-argument]
dgmres1.f:999:55:

+ NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ,
1
Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument]
dgmres1.f:11:25:

+ ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, SB, SX, RGWK, LRGW,
1
Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument]
dgmres1.f:940:0:

IF (RHO .LT. R0NRM) GO TO 150

Warning: 'rho' may be used uninitialized in this function [-Wmaybe-uninitialized]
gfortran -Wall -O2 -c dgmres.f
dgmres.f:644:72:

10 ASSIGN 30 TO NEXT
1
Warning: Deleted feature: ASSIGN statement at (1)
dgmres.f:651:19:

20 GO TO NEXT,(30, 50, 70, 110)
1
Warning: Deleted feature: Assigned GOTO statement at (1)
dgmres.f:653:72:

ASSIGN 50 TO NEXT
1
Warning: Deleted feature: ASSIGN statement at (1)
dgmres.f:663:72:

ASSIGN 70 TO NEXT
1
Warning: Deleted feature: ASSIGN statement at (1)
dgmres.f:669:72:

ASSIGN 110 TO NEXT
1
Warning: Deleted feature: ASSIGN statement at (1)
dgmres.f:1276:9:

use omp_lib
1
Fatal Error: Can't open module file 'omp_lib.mod' for reading at (1): No such file or directory
compilation terminated.
*** Error 1 in /usr/ports/pobj/calculix-ccx-2.22/CalculiX/ccx_2.22/src (Makefile:11 'dgmres.o')
*** Error 2 in . (/usr/ports/infrastructure/mk/bsd.port.mk:3061 '/usr/ports/pobj/calculix-ccx-2.22/.build_done')
*** Error 2 in /usr/ports/mystuff/cad/calculix/ccx (/usr/ports/infrastructure/mk/bsd.port.mk:2704 'build')
I'm working on porting cad/calculix (attached w/dependency) which is
required to perform FEM analyses on cad/freecad, another port I've been
working on[1]. To build calculix-ccx, the file 'omp_lib.mod' is
needed (full build log attached), which only seems to be provided by the
currently broken lang/flang/flang. I couldn't find a way to compile
calculix-ccx without OpenMP support and I have zero knowledge on fortran
to find out if this can be patched.

I found here[2] a previous effort to include this file among others with
lang/gcc/8, but I believe this never happened. Is this something that
could perhaps be reconsidered? If not, any ideas for a workaround?

Thank you.

[1] https://forum.freecad.org/viewtopic.php?t=80792
[2] https://marc.info/?l=openbsd-ports&m=159260052211114&w=2