@@ -1229,6 +1229,45 @@ void IRICLIBDLL FMNAME(cg_iric_write_sol_particle_integer_mul_f, CG_IRIC_WRITE_S
12291229 * ier = cg_iRIC_Write_Sol_Particle_Integer_Mul (* fid , c_name , value );
12301230}
12311231
1232+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_groupbegin_mul_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_GROUPBEGIN_MUL_F ) (int * fid , STR_PSTR (name ), int * ier STR_PLEN (name )) {
1233+ char c_name [CGIO_MAX_NAME_LENGTH + 1 ];
1234+ string_2_C_string (STR_PTR (name ), STR_LEN (name ),
1235+ c_name , CGIO_MAX_NAME_LENGTH , ier );
1236+ if (* ier ) return ;
1237+
1238+ * ier = cg_iRIC_Write_Sol_ParticleGroup_GroupBegin_Mul (* fid , c_name );
1239+ }
1240+
1241+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_groupend_mul_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_GROUPEND_MUL_F ) (int * fid , int * ier ) {
1242+ * ier = cg_iRIC_Write_Sol_ParticleGroup_GroupEnd_Mul (* fid );
1243+ }
1244+
1245+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_pos2d_mul_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_POS2D_MUL_F ) (int * fid , double * x , double * y , int * ier ) {
1246+ * ier = cg_iRIC_Write_Sol_ParticleGroup_Pos2d_Mul (* fid , * x , * y );
1247+ }
1248+
1249+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_pos3d_mul_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_POS3D_MUL_F ) (int * fid , double * x , double * y , double * z , int * ier ) {
1250+ * ier = cg_iRIC_Write_Sol_ParticleGroup_Pos3d_Mul (* fid , * x , * y , * z );
1251+ }
1252+
1253+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_integer_mul_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_INTEGER_MUL_F ) (int * fid , STR_PSTR (name ), int * value , int * ier STR_PLEN (name )) {
1254+ char c_name [CGIO_MAX_NAME_LENGTH + 1 ];
1255+ string_2_C_string (STR_PTR (name ), STR_LEN (name ),
1256+ c_name , CGIO_MAX_NAME_LENGTH , ier );
1257+ if (* ier ) return ;
1258+
1259+ * ier = cg_iRIC_Write_Sol_ParticleGroup_Integer_Mul (* fid , c_name , * value );
1260+ }
1261+
1262+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_real_mul_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_REAL_MUL_F ) (int * fid , STR_PSTR (name ), double * value , int * ier STR_PLEN (name )) {
1263+ char c_name [CGIO_MAX_NAME_LENGTH + 1 ];
1264+ string_2_C_string (STR_PTR (name ), STR_LEN (name ),
1265+ c_name , CGIO_MAX_NAME_LENGTH , ier );
1266+ if (* ier ) return ;
1267+
1268+ * ier = cg_iRIC_Write_Sol_ParticleGroup_Real_Mul (* fid , c_name , * value );
1269+ }
1270+
12321271void IRICLIBDLL FMNAME (cg_iric_write_sol_polydata_groupbegin_mul_f , CG_IRIC_WRITE_SOL_POLYDATA_GROUPBEGIN_MUL_F ) (int * fid , STR_PSTR (name ), int * ier STR_PLEN (name )) {
12331272 char c_name [CGIO_MAX_NAME_LENGTH + 1 ];
12341273 string_2_C_string (STR_PTR (name ), STR_LEN (name ),
@@ -2489,6 +2528,45 @@ void IRICLIBDLL FMNAME(cg_iric_write_sol_particle_integer_f, CG_IRIC_WRITE_SOL_P
24892528 * ier = cg_iRIC_Write_Sol_Particle_Integer (c_name , value );
24902529}
24912530
2531+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_groupbegin_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_GROUPBEGIN_F ) (STR_PSTR (name ), int * ier STR_PLEN (name )) {
2532+ char c_name [CGIO_MAX_NAME_LENGTH + 1 ];
2533+ string_2_C_string (STR_PTR (name ), STR_LEN (name ),
2534+ c_name , CGIO_MAX_NAME_LENGTH , ier );
2535+ if (* ier ) return ;
2536+
2537+ * ier = cg_iRIC_Write_Sol_ParticleGroup_GroupBegin (c_name );
2538+ }
2539+
2540+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_groupend_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_GROUPEND_F ) (int * ier ) {
2541+ * ier = cg_iRIC_Write_Sol_ParticleGroup_GroupEnd ();
2542+ }
2543+
2544+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_pos2d_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_POS2D_F ) (double * x , double * y , int * ier ) {
2545+ * ier = cg_iRIC_Write_Sol_ParticleGroup_Pos2d (* x , * y );
2546+ }
2547+
2548+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_pos3d_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_POS3D_F ) (double * x , double * y , double * z , int * ier ) {
2549+ * ier = cg_iRIC_Write_Sol_ParticleGroup_Pos3d (* x , * y , * z );
2550+ }
2551+
2552+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_integer_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_INTEGER_F ) (STR_PSTR (name ), int * value , int * ier STR_PLEN (name )) {
2553+ char c_name [CGIO_MAX_NAME_LENGTH + 1 ];
2554+ string_2_C_string (STR_PTR (name ), STR_LEN (name ),
2555+ c_name , CGIO_MAX_NAME_LENGTH , ier );
2556+ if (* ier ) return ;
2557+
2558+ * ier = cg_iRIC_Write_Sol_ParticleGroup_Integer (c_name , * value );
2559+ }
2560+
2561+ void IRICLIBDLL FMNAME (cg_iric_write_sol_particlegroup_real_f , CG_IRIC_WRITE_SOL_PARTICLEGROUP_REAL_F ) (STR_PSTR (name ), double * value , int * ier STR_PLEN (name )) {
2562+ char c_name [CGIO_MAX_NAME_LENGTH + 1 ];
2563+ string_2_C_string (STR_PTR (name ), STR_LEN (name ),
2564+ c_name , CGIO_MAX_NAME_LENGTH , ier );
2565+ if (* ier ) return ;
2566+
2567+ * ier = cg_iRIC_Write_Sol_ParticleGroup_Real (c_name , * value );
2568+ }
2569+
24922570void IRICLIBDLL FMNAME (cg_iric_write_sol_polydata_groupbegin_f , CG_IRIC_WRITE_SOL_POLYDATA_GROUPBEGIN_F ) (STR_PSTR (name ), int * ier STR_PLEN (name )) {
24932571 char c_name [CGIO_MAX_NAME_LENGTH + 1 ];
24942572 string_2_C_string (STR_PTR (name ), STR_LEN (name ),
0 commit comments