36e2ad3023
Former-commit-id:11f96dbedd[formerly16bf591a33] [formerly11f96dbedd[formerly16bf591a33] [formerlyc42ae0fa39[formerly 46767a18a0d6e1f2182720c8a04c6e1e59cb18a1]]] Former-commit-id:c42ae0fa39Former-commit-id:f2102bfb24[formerly9f97182964] Former-commit-id:9aabe438b9
32 lines
903 B
C
32 lines
903 B
C
#include "geminc.h"
|
|
#include "gemprm.h"
|
|
#include "dbcmn.h"
|
|
#include <sys/timeb.h>
|
|
|
|
void db_retsubgcrs ( char *prj, int kx, int ky,
|
|
float lllat, float lllon, float urlat, float urlon,
|
|
float angl1, float angl2, float angl3, int *iret )
|
|
/************************************************************************
|
|
* *
|
|
* db_retsubgcrs *
|
|
* *
|
|
************************************************************************/
|
|
{
|
|
int ier;
|
|
char nav[320];
|
|
/*---------------------------------------------------------------------*/
|
|
if ( subgCrsClbkPtr == NULL ) {
|
|
ier = -17;
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Initialization
|
|
*/
|
|
sprintf ( nav,"%s;%d;%d;%f;%f;%f;%f;%f;%f;%f",
|
|
prj, kx, ky, lllat,lllon,urlat,urlon,
|
|
angl1,angl2,angl3);
|
|
subgCrsClbkPtr(nav);
|
|
|
|
return;
|
|
}
|