From 0f3bf0da415c5e25c577bfeb91959f1bde7a308f Mon Sep 17 00:00:00 2001 From: Derek Slaughter Date: Wed, 20 Sep 2023 19:10:44 +0000 Subject: [PATCH] OpenFOAM: remove FlowFIeld DDT initialization --- modules/openfoam/src/OpenFOAM.f90 | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/modules/openfoam/src/OpenFOAM.f90 b/modules/openfoam/src/OpenFOAM.f90 index 188892d9ed..114f440971 100644 --- a/modules/openfoam/src/OpenFOAM.f90 +++ b/modules/openfoam/src/OpenFOAM.f90 @@ -254,11 +254,9 @@ SUBROUTINE Init_OpFM( InitInp, p_FAST, AirDens, u_AD, initOut_AD, y_AD, OpFM, In call SetErrStat( ErrID_Fatal, 'Error allocating m%FlowField', ErrStat, ErrMsg, RoutineName ) return end if - - ! Initialize flow field with point type - OpFm%m%FlowField = FlowFieldType(FieldType=Point_FieldType) - + ! Initialize flowfield points type + OpFm%m%FlowField%FieldType = Point_FieldType Points_InitInput%NumWindPoints = OpFM%p%nNodesVel call IfW_Points_Init(Points_InitInput, OpFm%m%FlowField%Points, ErrStat2, ErrMsg2); if (Failed()) return