@@ -1018,20 +1018,20 @@ void VerifyHaltBinary(BODY *body, CONTROL *control, OPTIONS *options, int iBody,
1018
1018
1019
1019
void WriteFreeEccBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1020
1020
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1021
- double * dTmp , char cUnit [] ) {
1021
+ double * dTmp , char * * cUnit ) {
1022
1022
// Note: Only makes sense for planets (iBodyType == 0)
1023
1023
if (body [iBody ].iBodyType == 0 ) {
1024
1024
* dTmp = body [iBody ].dFreeEcc ;
1025
1025
} else {
1026
1026
* dTmp = -1 ;
1027
1027
}
1028
1028
1029
- fvFormattedString (& cUnit , "" );
1029
+ fvFormattedString (cUnit , "" );
1030
1030
}
1031
1031
1032
1032
void WriteFreeIncBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1033
1033
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1034
- double * dTmp , char cUnit [] ) {
1034
+ double * dTmp , char * * cUnit ) {
1035
1035
// Note: Only makes sense for planets (iBodyType == 0)
1036
1036
if (body [iBody ].iBodyType == 0 ) {
1037
1037
* dTmp = body [iBody ].dFreeInc ;
@@ -1041,7 +1041,7 @@ void WriteFreeIncBinary(BODY *body, CONTROL *control, OUTPUT *output,
1041
1041
1042
1042
if (output -> bDoNeg [iBody ]) {
1043
1043
* dTmp *= output -> dNeg ;
1044
- fvFormattedString (& cUnit , output -> cNeg );
1044
+ fvFormattedString (cUnit , output -> cNeg );
1045
1045
} else {
1046
1046
* dTmp /= fdUnitsAngle (units -> iAngle );
1047
1047
fsUnitsAngle (units -> iAngle , cUnit );
@@ -1051,7 +1051,7 @@ void WriteFreeIncBinary(BODY *body, CONTROL *control, OUTPUT *output,
1051
1051
/** Write the binary primary star radial position */
1052
1052
void WriteBinPriRBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1053
1053
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1054
- double * dTmp , char cUnit [] ) {
1054
+ double * dTmp , char * * cUnit ) {
1055
1055
1056
1056
// Compute current binary true anomaly
1057
1057
double meanAnomaly = body [1 ].dMeanMotion * body [0 ].dAge + body [1 ].dLL13PhiAB ;
@@ -1069,7 +1069,7 @@ void WriteBinPriRBinary(BODY *body, CONTROL *control, OUTPUT *output,
1069
1069
* dTmp = body [1 ].dMass * radius * dInvMass ;
1070
1070
if (output -> bDoNeg [iBody ]) {
1071
1071
* dTmp *= output -> dNeg ;
1072
- fvFormattedString (& cUnit , output -> cNeg );
1072
+ fvFormattedString (cUnit , output -> cNeg );
1073
1073
} else {
1074
1074
* dTmp /= fdUnitsLength (units -> iLength );
1075
1075
fsUnitsLength (units -> iLength , cUnit );
@@ -1079,7 +1079,7 @@ void WriteBinPriRBinary(BODY *body, CONTROL *control, OUTPUT *output,
1079
1079
/** Write the binary secondary star radial position */
1080
1080
void WriteBinSecRBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1081
1081
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1082
- double * dTmp , char cUnit [] ) {
1082
+ double * dTmp , char * * cUnit ) {
1083
1083
1084
1084
// Compute current binary true anomaly
1085
1085
double meanAnomaly = body [1 ].dMeanMotion * body [1 ].dAge + body [1 ].dLL13PhiAB ;
@@ -1097,7 +1097,7 @@ void WriteBinSecRBinary(BODY *body, CONTROL *control, OUTPUT *output,
1097
1097
* dTmp = body [0 ].dMass * radius * dInvMass ;
1098
1098
if (output -> bDoNeg [iBody ]) {
1099
1099
* dTmp *= output -> dNeg ;
1100
- fvFormattedString (& cUnit , output -> cNeg );
1100
+ fvFormattedString (cUnit , output -> cNeg );
1101
1101
} else {
1102
1102
* dTmp /= fdUnitsLength (units -> iLength );
1103
1103
fsUnitsLength (units -> iLength , cUnit );
@@ -1107,7 +1107,7 @@ void WriteBinSecRBinary(BODY *body, CONTROL *control, OUTPUT *output,
1107
1107
1108
1108
void WriteBinPriPhiBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1109
1109
SYSTEM * system , UNITS * units , UPDATE * update ,
1110
- int iBody , double * dTmp , char cUnit [] ) {
1110
+ int iBody , double * dTmp , char * * cUnit ) {
1111
1111
1112
1112
// Compute current binary true anomaly
1113
1113
double meanAnomaly = body [1 ].dMeanMotion * body [0 ].dAge + body [1 ].dLL13PhiAB ;
@@ -1117,7 +1117,7 @@ void WriteBinPriPhiBinary(BODY *body, CONTROL *control, OUTPUT *output,
1117
1117
* dTmp = fndEccToTrue (eccAnomaly , body [1 ].dEcc );
1118
1118
if (output -> bDoNeg [iBody ]) {
1119
1119
* dTmp *= output -> dNeg ;
1120
- fvFormattedString (& cUnit , output -> cNeg );
1120
+ fvFormattedString (cUnit , output -> cNeg );
1121
1121
} else {
1122
1122
* dTmp /= fdUnitsAngle (units -> iAngle );
1123
1123
fsUnitsAngle (units -> iAngle , cUnit );
@@ -1127,7 +1127,7 @@ void WriteBinPriPhiBinary(BODY *body, CONTROL *control, OUTPUT *output,
1127
1127
1128
1128
void WriteBinSecPhiBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1129
1129
SYSTEM * system , UNITS * units , UPDATE * update ,
1130
- int iBody , double * dTmp , char cUnit [] ) {
1130
+ int iBody , double * dTmp , char * * cUnit ) {
1131
1131
1132
1132
// Compute current binary true anomaly
1133
1133
double meanAnomaly = body [1 ].dMeanMotion * body [1 ].dAge + body [1 ].dLL13PhiAB ;
@@ -1138,7 +1138,7 @@ void WriteBinSecPhiBinary(BODY *body, CONTROL *control, OUTPUT *output,
1138
1138
* dTmp = fndEccToTrue (eccAnomaly , body [1 ].dEcc ) + PI ;
1139
1139
if (output -> bDoNeg [iBody ]) {
1140
1140
* dTmp *= output -> dNeg ;
1141
- fvFormattedString (& cUnit , output -> cNeg );
1141
+ fvFormattedString (cUnit , output -> cNeg );
1142
1142
} else {
1143
1143
* dTmp /= fdUnitsAngle (units -> iAngle );
1144
1144
fsUnitsAngle (units -> iAngle , cUnit );
@@ -1148,7 +1148,7 @@ void WriteBinSecPhiBinary(BODY *body, CONTROL *control, OUTPUT *output,
1148
1148
1149
1149
void WriteCBPPhiBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1150
1150
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1151
- double * dTmp , char cUnit [] ) {
1151
+ double * dTmp , char * * cUnit ) {
1152
1152
if (body [iBody ].iBodyType == 0 ) {
1153
1153
* dTmp = body [iBody ].dCBPPhi ;
1154
1154
} else {
@@ -1157,7 +1157,7 @@ void WriteCBPPhiBinary(BODY *body, CONTROL *control, OUTPUT *output,
1157
1157
1158
1158
if (output -> bDoNeg [iBody ]) {
1159
1159
* dTmp *= output -> dNeg ;
1160
- fvFormattedString (& cUnit , output -> cNeg );
1160
+ fvFormattedString (cUnit , output -> cNeg );
1161
1161
} else {
1162
1162
* dTmp /= fdUnitsAngle (units -> iAngle );
1163
1163
fsUnitsAngle (units -> iAngle , cUnit );
@@ -1166,12 +1166,12 @@ void WriteCBPPhiBinary(BODY *body, CONTROL *control, OUTPUT *output,
1166
1166
1167
1167
void WriteCBPPhiDotBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1168
1168
SYSTEM * system , UNITS * units , UPDATE * update ,
1169
- int iBody , double * dTmp , char cUnit [] ) {
1169
+ int iBody , double * dTmp , char * * cUnit ) {
1170
1170
1171
1171
* dTmp = body [iBody ].dCBPPhiDot ;
1172
1172
if (output -> bDoNeg [iBody ]) {
1173
1173
* dTmp *= output -> dNeg ;
1174
- fvFormattedString (& cUnit , output -> cNeg );
1174
+ fvFormattedString (cUnit , output -> cNeg );
1175
1175
} else {
1176
1176
* dTmp *= fdUnitsTime (units -> iTime );
1177
1177
fsUnitsRate (units -> iTime , cUnit );
@@ -1180,7 +1180,7 @@ void WriteCBPPhiDotBinary(BODY *body, CONTROL *control, OUTPUT *output,
1180
1180
1181
1181
void WriteLL13N0Binary (BODY * body , CONTROL * control , OUTPUT * output ,
1182
1182
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1183
- double * dTmp , char cUnit [] ) {
1183
+ double * dTmp , char * * cUnit ) {
1184
1184
// Note: Only applies to planets (iBodyType == 0)
1185
1185
if (body [iBody ].iBodyType == 0 ) {
1186
1186
* dTmp = body [iBody ].dLL13N0 ;
@@ -1190,7 +1190,7 @@ void WriteLL13N0Binary(BODY *body, CONTROL *control, OUTPUT *output,
1190
1190
1191
1191
if (output -> bDoNeg [iBody ]) {
1192
1192
* dTmp *= output -> dNeg ;
1193
- fvFormattedString (& cUnit , output -> cNeg );
1193
+ fvFormattedString (cUnit , output -> cNeg );
1194
1194
} else {
1195
1195
* dTmp *= fdUnitsTime (units -> iTime );
1196
1196
fsUnitsTime (units -> iTime , cUnit );
@@ -1200,7 +1200,7 @@ void WriteLL13N0Binary(BODY *body, CONTROL *control, OUTPUT *output,
1200
1200
1201
1201
void WriteLL13K0Binary (BODY * body , CONTROL * control , OUTPUT * output ,
1202
1202
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1203
- double * dTmp , char cUnit [] ) {
1203
+ double * dTmp , char * * cUnit ) {
1204
1204
// Note: Only applies to planets (iBodyType == 0)
1205
1205
if (body [iBody ].iBodyType == 0 ) {
1206
1206
* dTmp = body [iBody ].dLL13K0 ;
@@ -1210,7 +1210,7 @@ void WriteLL13K0Binary(BODY *body, CONTROL *control, OUTPUT *output,
1210
1210
1211
1211
if (output -> bDoNeg [iBody ]) {
1212
1212
* dTmp *= output -> dNeg ;
1213
- fvFormattedString (& cUnit , output -> cNeg );
1213
+ fvFormattedString (cUnit , output -> cNeg );
1214
1214
} else {
1215
1215
* dTmp *= fdUnitsTime (units -> iTime );
1216
1216
fsUnitsTime (units -> iTime , cUnit );
@@ -1219,7 +1219,7 @@ void WriteLL13K0Binary(BODY *body, CONTROL *control, OUTPUT *output,
1219
1219
1220
1220
void WriteLL13V0Binary (BODY * body , CONTROL * control , OUTPUT * output ,
1221
1221
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1222
- double * dTmp , char cUnit [] ) {
1222
+ double * dTmp , char * * cUnit ) {
1223
1223
// Note: Only applies to planets (iBodyType == 0)
1224
1224
if (body [iBody ].iBodyType == 0 ) {
1225
1225
* dTmp = body [iBody ].dLL13V0 ;
@@ -1229,7 +1229,7 @@ void WriteLL13V0Binary(BODY *body, CONTROL *control, OUTPUT *output,
1229
1229
1230
1230
if (output -> bDoNeg [iBody ]) {
1231
1231
* dTmp *= output -> dNeg ;
1232
- fvFormattedString (& cUnit , output -> cNeg );
1232
+ fvFormattedString (cUnit , output -> cNeg );
1233
1233
} else {
1234
1234
* dTmp *= fdUnitsTime (units -> iTime );
1235
1235
fsUnitsTime (units -> iTime , cUnit );
@@ -1239,12 +1239,12 @@ void WriteLL13V0Binary(BODY *body, CONTROL *control, OUTPUT *output,
1239
1239
/** Write the circumbinary planet orbital radius (CBPR) */
1240
1240
void WriteCBPRBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1241
1241
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1242
- double * dTmp , char cUnit [] ) {
1242
+ double * dTmp , char * * cUnit ) {
1243
1243
1244
1244
* dTmp = body [iBody ].dCBPR ;
1245
1245
if (output -> bDoNeg [iBody ]) {
1246
1246
* dTmp *= output -> dNeg ;
1247
- fvFormattedString (& cUnit , output -> cNeg );
1247
+ fvFormattedString (cUnit , output -> cNeg );
1248
1248
} else {
1249
1249
* dTmp /= fdUnitsLength (units -> iLength );
1250
1250
fsUnitsLength (units -> iLength , cUnit );
@@ -1254,12 +1254,12 @@ void WriteCBPRBinary(BODY *body, CONTROL *control, OUTPUT *output,
1254
1254
/** Write the circumbinary planet guiding radius (CBPR0) */
1255
1255
void WriteCBPR0Binary (BODY * body , CONTROL * control , OUTPUT * output ,
1256
1256
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1257
- double * dTmp , char cUnit [] ) {
1257
+ double * dTmp , char * * cUnit ) {
1258
1258
1259
1259
* dTmp = body [iBody ].dR0 ;
1260
1260
if (output -> bDoNeg [iBody ]) {
1261
1261
* dTmp *= output -> dNeg ;
1262
- fvFormattedString (& cUnit , output -> cNeg );
1262
+ fvFormattedString (cUnit , output -> cNeg );
1263
1263
} else {
1264
1264
* dTmp /= fdUnitsLength (units -> iLength );
1265
1265
fsUnitsLength (units -> iLength , cUnit );
@@ -1268,12 +1268,12 @@ void WriteCBPR0Binary(BODY *body, CONTROL *control, OUTPUT *output,
1268
1268
1269
1269
void WriteCBPZBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1270
1270
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1271
- double * dTmp , char cUnit [] ) {
1271
+ double * dTmp , char * * cUnit ) {
1272
1272
1273
1273
* dTmp = body [iBody ].dCBPZ ;
1274
1274
if (output -> bDoNeg [iBody ]) {
1275
1275
* dTmp *= output -> dNeg ;
1276
- fvFormattedString (& cUnit , output -> cNeg );
1276
+ fvFormattedString (cUnit , output -> cNeg );
1277
1277
} else {
1278
1278
* dTmp /= fdUnitsLength (units -> iLength );
1279
1279
fsUnitsLength (units -> iLength , cUnit );
@@ -1282,12 +1282,12 @@ void WriteCBPZBinary(BODY *body, CONTROL *control, OUTPUT *output,
1282
1282
1283
1283
void WriteCBPRDotBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1284
1284
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1285
- double * dTmp , char cUnit [] ) {
1285
+ double * dTmp , char * * cUnit ) {
1286
1286
1287
1287
* dTmp = body [iBody ].dCBPRDot ;
1288
1288
if (output -> bDoNeg [iBody ]) {
1289
1289
* dTmp *= output -> dNeg ;
1290
- fvFormattedString (& cUnit , output -> cNeg );
1290
+ fvFormattedString (cUnit , output -> cNeg );
1291
1291
} else {
1292
1292
* dTmp *= fdUnitsTime (units -> iTime ) / fdUnitsLength (units -> iLength );
1293
1293
fsUnitsVel (units , cUnit );
@@ -1296,12 +1296,12 @@ void WriteCBPRDotBinary(BODY *body, CONTROL *control, OUTPUT *output,
1296
1296
1297
1297
void WriteCBPZDotBinary (BODY * body , CONTROL * control , OUTPUT * output ,
1298
1298
SYSTEM * system , UNITS * units , UPDATE * update , int iBody ,
1299
- double * dTmp , char cUnit [] ) {
1299
+ double * dTmp , char * * cUnit ) {
1300
1300
1301
1301
* dTmp = body [iBody ].dCBPZDot ;
1302
1302
if (output -> bDoNeg [iBody ]) {
1303
1303
* dTmp *= output -> dNeg ;
1304
- fvFormattedString (& cUnit , output -> cNeg );
1304
+ fvFormattedString (cUnit , output -> cNeg );
1305
1305
} else {
1306
1306
* dTmp *= fdUnitsTime (units -> iTime ) / fdUnitsLength (units -> iLength );
1307
1307
fsUnitsVel (units , cUnit );
@@ -1312,7 +1312,7 @@ void WriteCBPZDotBinary(BODY *body, CONTROL *control, OUTPUT *output,
1312
1312
orbit assuming P_bin << P_cbp */
1313
1313
void WriteCBPInsol (BODY * body , CONTROL * control , OUTPUT * output , SYSTEM * system ,
1314
1314
UNITS * units , UPDATE * update , int iBody , double * dTmp ,
1315
- char cUnit [] ) {
1315
+ char * * cUnit ) {
1316
1316
1317
1317
// Make sure that this is a planet, if not, -1
1318
1318
if (iBody < 2 || body [iBody ].iBodyType != 0 ) {
@@ -1322,7 +1322,7 @@ void WriteCBPInsol(BODY *body, CONTROL *control, OUTPUT *output, SYSTEM *system,
1322
1322
}
1323
1323
1324
1324
// Always in units of insolation received by Earth
1325
- fvFormattedString (& cUnit , "F/F_Earth" );
1325
+ fvFormattedString (cUnit , "F/F_Earth" );
1326
1326
}
1327
1327
1328
1328
void InitializeOutputBinary (OUTPUT * output , fnWriteOutput fnWrite []) {
0 commit comments